Browse Source

* comment removed and four dud instrcutions

marco 21 years ago
parent
commit
cc5c75b714
2 changed files with 8 additions and 11 deletions
  1. 4 7
      rtl/linux/x86_64/syscall.inc
  2. 4 4
      rtl/linux/x86_64/syscallh.inc

+ 4 - 7
rtl/linux/x86_64/syscall.inc

@@ -16,18 +16,12 @@
 
  **********************************************************************}
 
-
 {$ASMMODE GAS}
 
 function FpSysCall(sysnr:TSysParam):TSysResult; assembler;[public,alias:'FPC_SYSCALL0'];
 
 asm
   movq sysnr, %rax        { Syscall number -> rax.  }
-  movq %rsi, %rdi         { shift arg1 - arg5. }
-  movq %rdx, %rsi
-  movq %rcx, %rdx
-  movq %r8, %r10
-  movq %r9, %r8
   syscall                 { Do the system call. }
   cmpq $-4095, %rax       { Check %rax for error.  }
   jnae .LSyscOK           { Jump to error handler if error.  }
@@ -230,7 +224,10 @@ end;
 
 {
   $Log$
-  Revision 1.5  2004-04-22 17:17:23  peter
+  Revision 1.6  2004-05-16 11:04:27  marco
+   * comment removed and four dud instrcutions
+
+  Revision 1.5  2004/04/22 17:17:23  peter
     * x86-64 fixes
 
   Revision 1.4  2004/02/06 23:06:16  florian

+ 4 - 4
rtl/linux/x86_64/syscallh.inc

@@ -28,9 +28,6 @@ type
                         // use int64, and typecast all calls that don't
                         // return off_t to cint.
 
-// I don't think this is going to work on several platforms
-// 64-bit machines don't have only 64-bit params.
-
   TSysParam  = int64;
 
 function Do_SysCall(sysnr:TSysParam):TSysResult;  external name 'FPC_SYSCALL0';
@@ -43,7 +40,10 @@ function Do_SysCall(sysnr,param1,param2,param3,param4,param5,param6:TSysParam):T
 
 {
   $Log$
-  Revision 1.4  2004-04-22 17:17:23  peter
+  Revision 1.5  2004-05-16 11:04:27  marco
+   * comment removed and four dud instrcutions
+
+  Revision 1.4  2004/04/22 17:17:23  peter
     * x86-64 fixes
 
   Revision 1.3  2004/02/06 15:58:21  florian