paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-12 03:46:10 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ make $SUBARCH (cputypestr) and $FPCABI available to configuration files

Browse Source 
git-svn-id: trunk@29124 -
This commit is contained in:
florian 2014-11-23 17:29:00 +00:00
parent 0a3f00ef2f
commit 03521f0413
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
compiler/globals.pas
View File

@ -41,7 +41,6 @@ interface
{$ELSE} {$ELSE}
fksysutl, fksysutl,
{$ENDIF} {$ENDIF}
{ comphook pulls in sysutils anyways } { comphook pulls in sysutils anyways }
cutils,cclasses,cfileutl, cutils,cclasses,cfileutl,
cpuinfo, cpuinfo,
@ -835,6 +834,8 @@ implementation
Replace(s,'$FPCTARGET',target_os_string) Replace(s,'$FPCTARGET',target_os_string)
else else
Replace(s,'$FPCTARGET',target_full_string); Replace(s,'$FPCTARGET',target_full_string);
Replace(s,'$SUBARCH',lower(cputypestr[init_settings.cputype]));
Replace(s,'$FPCABI',lower(abiinfo[target_info.abi].name));
{$ifdef mswindows} {$ifdef mswindows}
ReplaceSpecialFolder('$LOCAL_APPDATA',CSIDL_LOCAL_APPDATA); ReplaceSpecialFolder('$LOCAL_APPDATA',CSIDL_LOCAL_APPDATA);
ReplaceSpecialFolder('$APPDATA',CSIDL_APPDATA); ReplaceSpecialFolder('$APPDATA',CSIDL_APPDATA);