Ver Fonte

* renamefest

marco há 23 anos atrás
pai
commit
77df4660ff
2 ficheiros alterados com 16 adições e 6 exclusões
  1. 5 2
      compiler/new/pp.pas
  2. 11 4
      compiler/new/symtable/cobjects.pas

+ 5 - 2
compiler/new/pp.pas

@@ -136,7 +136,7 @@ uses
 {$ifdef heaptrc}
 {$ifdef heaptrc}
   ppheap,
   ppheap,
 {$endif heaptrc}
 {$endif heaptrc}
-{$ifdef linux}
+{$ifdef Unix}
   catch,
   catch,
 {$endif}
 {$endif}
 {$endif FPC}
 {$endif FPC}
@@ -276,7 +276,10 @@ begin
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.1  2000-07-13 06:30:08  michael
+  Revision 1.2  2002-06-02 08:41:22  marco
+   * renamefest
+
+  Revision 1.1  2000/07/13 06:30:08  michael
   + Initial import
   + Initial import
 
 
   Revision 1.8  2000/01/07 01:14:54  peter
   Revision 1.8  2000/01/07 01:14:54  peter

+ 11 - 4
compiler/new/symtable/cobjects.pas

@@ -36,10 +36,14 @@ uses    strings,objects
 {$IFDEF TP}
 {$IFDEF TP}
         ,xobjects
         ,xobjects
 {$ENDIF}
 {$ENDIF}
-{$ifndef linux}
+{$ifndef Unix}
         ,dos
         ,dos
 {$else}
 {$else}
+	{$ifdef VER1_0}
         ,linux
         ,linux
+	{$else}
+   	,Unix
+	{$endif}
 {$endif};
 {$endif};
 
 
     const
     const
@@ -1729,11 +1733,11 @@ end;
 
 
       var
       var
          l : longint;
          l : longint;
-{$ifdef linux}
+{$ifdef Unix}
          Info : Stat;
          Info : Stat;
 {$endif}
 {$endif}
       begin
       begin
-{$ifndef linux}
+{$ifndef Unix}
          { this only works if the file is open !! }
          { this only works if the file is open !! }
          dos.getftime(f,l);
          dos.getftime(f,l);
 {$else}
 {$else}
@@ -1971,7 +1975,10 @@ end;
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.1  2000-07-13 06:30:13  michael
+  Revision 1.2  2002-06-02 08:41:22  marco
+   * renamefest
+
+  Revision 1.1  2000/07/13 06:30:13  michael
   + Initial import
   + Initial import
 
 
   Revision 1.3  2000/03/11 21:11:24  daniel
   Revision 1.3  2000/03/11 21:11:24  daniel