From 83b04efbc346e8e0970a543db74b70c13c6eb5d0 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Sat, 19 Feb 2005 18:32:16 +0000
Subject: [PATCH] * defaultreplacement expansion for -XP and -Xr
---
compiler/options.pas | 7 ++++++-
1 file changed, 6 insertions(+), 1 deletion(-)
diff --git a/compiler/options.pas b/compiler/options.pas
index 4cc4af9dd5..88394512c9 100644
--- a/compiler/options.pas
+++ b/compiler/options.pas
@@ -1144,10 +1144,12 @@ begin
'd' : Dontlinkstdlibpath:=TRUE;
'P' : Begin
utilsprefix:=Copy(more,2,length(More)-1);
+ DefaultReplacements(utilsprefix);
More:='';
End;
'r' : Begin
rlinkpath:=Copy(more,2,length(More)-1);
+ DefaultReplacements(rlinkpath);
More:='';
end;
'S' :
@@ -2098,7 +2100,10 @@ finalization
end.
{
$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
Revision 1.165 2005/02/14 17:13:06 peter