paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-19 06:19:32 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Add FPCBINDIR macro for paths

Browse Source 
git-svn-id: trunk@44697 -
This commit is contained in:
michael 2020-04-12 07:56:01 +00:00
parent 4141df7fe6
commit f3560004cf
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
compiler/globals.pas
View File

@ -941,6 +941,7 @@ implementation
Replace(s,'$FPCDATE',date_string);
Replace(s,'$FPCCPU',target_cpu_string);
Replace(s,'$FPCOS',target_os_string);
Replace(s,'$FPCBINDIR',ExtractFilePath(FixFileName(system.paramstr(0))));
if (tf_use_8_3 in Source_Info.Flags) or
(tf_use_8_3 in Target_Info.Flags) then
Replace(s,'$FPCTARGET',target_os_string)