浏览代码

* more Renamefest

marco 23 年之前
父节点
当前提交
9fb1b5377c
共有 3 个文件被更改,包括 20 次插入11 次删除
  1. 8 5
      rtl/inc/lineinfo.pp
  2. 6 3
      rtl/unix/crt.pp
  3. 6 3
      rtl/unix/sysunix.inc

+ 8 - 5
rtl/inc/lineinfo.pp

@@ -22,7 +22,7 @@ interface
 
 { This is very important as this code can be called
   from inside the RTE 202 error PM }
-{$ifndef linux}
+{$ifndef Unix}
   {$S-}
 {$endif}
 
@@ -352,7 +352,7 @@ end;
 {$ENDIF EMX}
 
 
-{$ifdef linux}
+{$ifdef Unix}
 function LoadElf32:boolean;
 type
   telf32header=packed record
@@ -443,7 +443,7 @@ begin
    end;
   LoadElf32:=(stabofs<>-1) and (stabstrofs<>-1);
 end;
-{$endif linux}
+{$endif}
 
 {$ifdef sunos}
 function LoadElf32:boolean;
@@ -689,7 +689,7 @@ begin
      exit;
    end;
 {$endif}
-{$ifdef linux}
+{$ifdef Unix}
   if LoadElf32 then
    begin
      OpenStabs:=true;
@@ -879,7 +879,10 @@ finalization
 end.
 {
   $Log$
-  Revision 1.8  2001-12-13 03:50:00  carl
+  Revision 1.9  2002-05-31 13:37:24  marco
+   * more Renamefest
+
+  Revision 1.8  2001/12/13 03:50:00  carl
   + SunOS target
 
   Revision 1.1  2000/07/13 06:30:47  michael

+ 6 - 3
rtl/unix/crt.pp

@@ -958,7 +958,7 @@ Begin
            '-','=' : PushExt(FAltKey(ch));
                #10 : PushKey(#10);
                '[' : State:=2;
-{$IFDEF LINUX}
+{$IFDEF Unix}
               'O': State:=7;
 {$ENDIF}
                else
@@ -1091,7 +1091,7 @@ Begin
               if (Ch<>'~') then
                State:=255;
             end;
-{$ifdef LINUX}
+{$ifdef Unix}
         7 : begin {Esc[O}
               case ch of
                'A' : PushExt(72);
@@ -1682,7 +1682,10 @@ Finalization
 End.
 {
   $Log$
-  Revision 1.8  2001-12-26 21:03:57  peter
+  Revision 1.9  2002-05-31 13:37:24  marco
+   * more Renamefest
+
+  Revision 1.8  2001/12/26 21:03:57  peter
     * merged fixes from 1.0.x
 
   Revision 1.7  2001/07/30 21:53:53  peter

+ 6 - 3
rtl/unix/sysunix.inc

@@ -572,14 +572,14 @@ begin
   dir:=thedir
 end;
 
-{$ifdef linux}
+{$ifdef Unix}
 {*****************************************************************************
                              Thread Handling
 *****************************************************************************}
 
 { include threading stuff, this is os independend part }
 {$I thread.inc}
-{$endif linux}
+{$endif Unix}
 
 {*****************************************************************************
                          SystemUnit Initialization
@@ -767,7 +767,10 @@ End.
 
 {
   $Log$
-  Revision 1.21  2002-04-21 15:55:00  carl
+  Revision 1.22  2002-05-31 13:37:24  marco
+   * more Renamefest
+
+  Revision 1.21  2002/04/21 15:55:00  carl
   + initialize some global variables
 
   Revision 1.20  2002/04/12 17:43:28  carl