paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-07-18 23:55:55 +02:00
Code Issues Packages Projects Releases Wiki Activity

* defaultreplacement expansion for -XP and -Xr

Browse Source
This commit is contained in:
florian 2005-02-19 18:32:16 +00:00
parent 16718b81e4
commit 83b04efbc3
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/options.pas
View File

@ -1144,10 +1144,12 @@ begin
'd' : Dontlinkstdlibpath:=TRUE; 'd' : Dontlinkstdlibpath:=TRUE;
'P' : Begin 'P' : Begin
utilsprefix:=Copy(more,2,length(More)-1); utilsprefix:=Copy(more,2,length(More)-1);
DefaultReplacements(utilsprefix);
More:=''; More:='';
End; End;
'r' : Begin 'r' : Begin
rlinkpath:=Copy(more,2,length(More)-1); rlinkpath:=Copy(more,2,length(More)-1);
DefaultReplacements(rlinkpath);
More:=''; More:='';
end; end;
'S' : 'S' :
@ -2098,7 +2100,10 @@ finalization
end. end.
{ {
$Log$ $Log$
Revision 1.166 2005-02-19 18:10:57 florian Revision 1.167 2005-02-19 18:32:16 florian
* defaultreplacement expansion for -XP and -Xr
Revision 1.166 2005/02/19 18:10:57 florian
* cross compiliation defines * cross compiliation defines
Revision 1.165 2005/02/14 17:13:06 peter Revision 1.165 2005/02/14 17:13:06 peter