paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-11 21:29:42 +02:00
Code Issues Packages Projects Releases Wiki Activity

* voodoo is now linux only

Browse Source
This commit is contained in:
marco 2003-09-16 15:40:31 +00:00
parent 2ce14177e7
commit 6d12c4b987
1 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
rtl/unix/linuxold.inc
View File

@ -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