Browse Source

* Unix renamefest for defines.

marco 25 years ago
parent
commit
e678eac6d3
4 changed files with 21 additions and 9 deletions
  1. 5 2
      fcl/inc/classesh.inc
  2. 6 3
      fcl/inc/stringl.inc
  3. 5 2
      fcl/inc/zstream.pp
  4. 5 2
      fcl/shedit/doc_text.pp

+ 5 - 2
fcl/inc/classesh.inc

@@ -1001,7 +1001,7 @@ type
     property ReturnValue: Integer read FReturnValue write FReturnValue;
     property Terminated: Boolean read FTerminated;
   public
-{$ifdef linux}
+{$ifdef Unix}
     { Needed for linux }
     FStackPointer : integer;
     FStackSize    : integer;
@@ -1236,7 +1236,10 @@ function LineStart(Buffer, BufPos: PChar): PChar;
 
 {
   $Log$
-  Revision 1.4  2000-10-15 10:04:39  peter
+  Revision 1.5  2000-11-13 15:46:55  marco
+   * Unix renamefest for defines.
+
+  Revision 1.4  2000/10/15 10:04:39  peter
     + Capitalization of TBits interface fixed; CheckBitIndex now checks for
       size (merged)
 

+ 6 - 3
fcl/inc/stringl.inc

@@ -219,7 +219,7 @@ end;
 Function TStrings.GetTextStr: string;
 
 Const
-{$ifdef linux}
+{$ifdef Unix}
   NewLineSize=1;
 {$else}
   NewLineSize=2;
@@ -243,7 +243,7 @@ begin
     if L<>0 then
       System.Move(Pointer(S)^,P^,L);
     P:=P+L;
-{$ifndef linux}
+{$ifndef Unix}
     p[0]:=#13;
     p[1]:=#10;
 {$else}
@@ -957,7 +957,10 @@ end;
 
 {
   $Log$
-  Revision 1.2  2000-07-13 11:33:01  michael
+  Revision 1.3  2000-11-13 15:46:55  marco
+   * Unix renamefest for defines.
+
+  Revision 1.2  2000/07/13 11:33:01  michael
   + removed logs
  
 }

+ 5 - 2
fcl/inc/zstream.pp

@@ -23,7 +23,7 @@ unit zstream;
   paszlib in all cases, just define -dUsePasZlib
   ---------------------------------------------------------------------}
 
-{$ifndef linux}
+{$ifndef Unix}
   {$define usepaszlib}
 {$endif}
 
@@ -449,7 +449,10 @@ end;
 end.
 {
   $Log$
-  Revision 1.2  2000-07-13 11:33:01  michael
+  Revision 1.3  2000-11-13 15:46:55  marco
+   * Unix renamefest for defines.
+
+  Revision 1.2  2000/07/13 11:33:01  michael
   + removed logs
  
 }

+ 5 - 2
fcl/shedit/doc_text.pp

@@ -112,7 +112,7 @@ uses Strings;
 constructor TTextDoc.Create;
 begin
   FModified := False;
-{$IFDEF Linux}
+{$IFDEF Unix}
   LineEnding := #10;
 {$ELSE}
   LineEnding := #13#10;
@@ -410,7 +410,10 @@ end.
 
 {
   $Log$
-  Revision 1.2  2000-07-13 11:33:02  michael
+  Revision 1.3  2000-11-13 15:46:55  marco
+   * Unix renamefest for defines.
+
+  Revision 1.2  2000/07/13 11:33:02  michael
   + removed logs
  
 }