From 049d2cbd1ae946e1a07fc3776adc8b12e8d01209 Mon Sep 17 00:00:00 2001
From: marco <marco@freepascal.org>
Date: Thu, 30 Oct 2003 16:42:58 +0000
Subject: [PATCH]  * fixes for old syscall() convention removing

---
 rtl/unix/unix.pp | 16 ++++++++++------
 1 file changed, 10 insertions(+), 6 deletions(-)

diff --git a/rtl/unix/unix.pp b/rtl/unix/unix.pp
index 9aa5a5a4ca..318261b4a5 100644
--- a/rtl/unix/unix.pp
+++ b/rtl/unix/unix.pp
@@ -280,7 +280,11 @@ Uses Strings;
 {$i filerec.inc}
 
 { Raw System calls are in Syscalls.inc}
+{$ifdef Linux}			// Linux has more "oldlinux" compability.
+{$i sysc11.inc}
+{$else}
 {$i syscalls.inc}
+{$endif}
 
 {$i unixsysc.inc}   {Syscalls only used in unit Unix/Linux}
 
@@ -647,13 +651,10 @@ End;
 {$ifndef BSD}
 {$ifdef linux}
 Function stime (t : longint) : Boolean;
-var
-  sr : Syscallregs;
 begin
-  sr.reg2:=longint(@t);
-  SysCall(Syscall_nr_stime,sr);
+  do_SysCall(Syscall_nr_stime,longint(@t));
   linuxerror:=fpgeterrno;;
-   stime:=linuxerror=0;
+  stime:=linuxerror=0;
 end;
 {$endif}
 {$endif}
@@ -1714,7 +1715,10 @@ End.
 
 {
   $Log$
-  Revision 1.41  2003-10-12 19:40:43  marco
+  Revision 1.42  2003-10-30 16:42:58  marco
+   * fixes for old syscall() convention removing
+
+  Revision 1.41  2003/10/12 19:40:43  marco
    * ioctl fixes. IDE now starts, but
 
   Revision 1.40  2003/09/29 14:36:06  peter