فهرست منبع

* voodoo is now linux only

marco 22 سال پیش
والد
کامیت
6d12c4b987
1فایلهای تغییر یافته به همراه8 افزوده شده و 2 حذف شده
  1. 8 2
      rtl/unix/linuxold.inc

+ 8 - 2
rtl/unix/linuxold.inc

@@ -43,6 +43,7 @@ Uses BaseUnix,Unix;
 {$i errno.inc}
 {$i errno.inc}
 {$I signal.inc}
 {$I signal.inc}
 
 
+{$ifdef linux}
 {$IFNDEF VER1_0}		// ugly voodoo. Sacrifice a chicken and hope
 {$IFNDEF VER1_0}		// ugly voodoo. Sacrifice a chicken and hope
 				// that it works.
 				// that it works.
 Type stat=baseunix.tstat;
 Type stat=baseunix.tstat;
@@ -50,7 +51,9 @@ Type stat=baseunix.tstat;
 type
 type
 {$I stat.inc}
 {$I stat.inc}
 {$ENDIF}
 {$ENDIF}
-
+{$ELSE}
+Type stat=baseunix.tstat;
+{$ENDIF}
 
 
 var
 var
   LinuxError : Longint;
   LinuxError : Longint;
@@ -3127,7 +3130,10 @@ finalization
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.4  2003-09-16 15:39:31  marco
+  Revision 1.5  2003-09-16 15:40:31  marco
+   * voodoo is now linux only
+
+  Revision 1.4  2003/09/16 15:39:31  marco
    * voodoo....
    * voodoo....
 
 
   Revision 1.3  2003/09/15 21:07:41  marco
   Revision 1.3  2003/09/15 21:07:41  marco