* Unix renamefest for defines

rtl/objpas/fina.inc

@@ -93,7 +93,7 @@ Var S : String;
 Begin
  S:=FileName;
  DoDirSeparators(S);
-{$ifdef linux}
+{$ifdef Unix}
   Result:=Linux.fexpand(S);
 {$else}
   Result:=Dos.Fexpand(S);
@@ -188,7 +188,10 @@ end;
 
 {
   $Log$
-  Revision 1.2  2000-07-13 11:33:51  michael
+  Revision 1.3  2000-11-13 14:41:20  marco
+   * Unix renamefest for defines
+
+  Revision 1.2  2000/07/13 11:33:51  michael
   + removed logs
  
 }

rtl/objpas/finah.inc

@@ -23,7 +23,7 @@
 
 Const
   DirSeparators : set of char = ['/','\'];  
-{$ifdef Linux}
+{$ifdef Unix}
   OSDirSeparator = '/';
 {$else}
   OsDirSeparator = '\';
@@ -44,7 +44,10 @@ Function GetDirs (Var DirName : String; Var Dirs : Array of pchar) : Longint;
 
 {
   $Log$
-  Revision 1.2  2000-07-13 11:33:51  michael
+  Revision 1.3  2000-11-13 14:41:20  marco
+   * Unix renamefest for defines
+
+  Revision 1.2  2000/07/13 11:33:51  michael
   + removed logs
  
 }

rtl/objpas/objpas.pp

@@ -15,7 +15,7 @@
  **********************************************************************}
 {$Mode ObjFpc}
 {$I-}
-{$ifndef linux}
+{$ifndef Unix}
   {$S-}
 {$endif}
 unit objpas;
@@ -349,7 +349,10 @@ end.
 
 {
   $Log$
-  Revision 1.3  2000-07-14 10:33:10  michael
+  Revision 1.4  2000-11-13 14:41:20  marco
+   * Unix renamefest for defines
+
+  Revision 1.3  2000/07/14 10:33:10  michael
   + Conditionals fixed
 
   Revision 1.2  2000/07/13 11:33:51  michael

rtl/objpas/sysstr.inc

@@ -476,7 +476,7 @@ j := 0;
 count := Length(S);
 while i < count do begin
    i := i + 1;
-{$ifndef linux}
+{$ifndef Unix}
    if (S[i] = #13) and ((i = count) or (S[i + 1] <> #10)) then
      begin
      result := result + Copy(S, 1 + j, i - j) + #10;
@@ -1267,7 +1267,10 @@ const
 
 {
   $Log$
-  Revision 1.5  2000-09-30 15:51:41  michael
+  Revision 1.6  2000-11-13 14:41:20  marco
+   * Unix renamefest for defines
+
+  Revision 1.5  2000/09/30 15:51:41  michael
   + Merged int64 fix from fixbranch
 
   Revision 1.1.2.2  2000/09/30 15:07:41  michael