~ubuntu-branches/ubuntu/dapper/fpc/dapper

« back to all changes in this revision

Viewing changes to rtl/linux/x86_64/syscallh.inc

  • Committer: Bazaar Package Importer
  • Author(s): Carlos Laviola
  • Date: 2004-08-12 16:29:37 UTC
  • mfrom: (1.2.1 upstream) (2.1.1 warty)
  • Revision ID: james.westby@ubuntu.com-20040812162937-moo8ulvysp1ln771
Tags: 1.9.4-5
fp-compiler: needs ld, adding dependency on binutils.  (Closes: #265265)

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
{
 
2
    $Id: syscallh.inc,v 1.5 2004/05/16 11:04:27 marco Exp $
 
3
    Copyright (c) 2002 by Marco van de Voort
 
4
 
 
5
    Header for syscall in system unit for i386 *BSD.
 
6
 
 
7
    This program is free software; you can redistribute it and/or modify
 
8
    it under the terms of the GNU General Public License as published by
 
9
    the Free Software Foundation; either version 2 of the License, or
 
10
    (at your option) any later version.
 
11
 
 
12
    This program is distributed in the hope that it will be useful,
 
13
    but WITHOUT ANY WARRANTY; without even the implied warranty of
 
14
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 
15
    GNU General Public License for more details.
 
16
 
 
17
    You should have received a copy of the GNU General Public License
 
18
    along with this program; if not, write to the Free Software
 
19
    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 
20
 
 
21
 ****************************************************************************
 
22
 
 
23
}
 
24
 
 
25
type
 
26
  TSysResult = int64;   // all platforms, cint=32-bit.
 
27
                        // On platforms with off_t =64-bit, people should
 
28
                        // use int64, and typecast all calls that don't
 
29
                        // return off_t to cint.
 
30
 
 
31
  TSysParam  = int64;
 
32
 
 
33
function Do_SysCall(sysnr:TSysParam):TSysResult;  external name 'FPC_SYSCALL0';
 
34
function Do_SysCall(sysnr,param1:TSysParam):TSysResult; external name 'FPC_SYSCALL1';
 
35
function Do_SysCall(sysnr,param1,param2:TSysParam):TSysResult;  external name 'FPC_SYSCALL2';
 
36
function Do_SysCall(sysnr,param1,param2,param3:TSysParam):TSysResult; external name 'FPC_SYSCALL3';
 
37
function Do_SysCall(sysnr,param1,param2,param3,param4:TSysParam):TSysResult; external name 'FPC_SYSCALL4';
 
38
function Do_SysCall(sysnr,param1,param2,param3,param4,param5:TSysParam):TSysResult;  external name 'FPC_SYSCALL5';
 
39
function Do_SysCall(sysnr,param1,param2,param3,param4,param5,param6:TSysParam):TSysResult;  external name 'FPC_SYSCALL6';
 
40
 
 
41
{
 
42
  $Log: syscallh.inc,v $
 
43
  Revision 1.5  2004/05/16 11:04:27  marco
 
44
   * comment removed and four dud instrcutions
 
45
 
 
46
  Revision 1.4  2004/04/22 17:17:23  peter
 
47
    * x86-64 fixes
 
48
 
 
49
  Revision 1.3  2004/02/06 15:58:21  florian
 
50
    * fixed x86-64 assembler problems
 
51
 
 
52
  Revision 1.2  2003/05/01 08:05:23  florian
 
53
    * started to make the rtl 64 bit save by introducing SizeInt and SizeUInt (similar to size_t of C)
 
54
 
 
55
  Revision 1.1  2003/04/30 22:11:06  florian
 
56
    + for a lot of x86-64 dependend files mostly dummies added
 
57
}
 
 
b'\\ No newline at end of file'