Home Explore Help
Sign In
pascal
/
freepascal.compiler
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Tree: a8a89995bd
Branches Tags
freepascal.comp...
/
rtl
/
bsd
/
i386
/
syscallh.inc

syscallh.inc 2.1 KB
History Raw

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950 
  1. {
    2. 

  2.     $Id$
    3. 

  3.     Copyright (c) 2002 by Marco van de Voort
    4. 

  4. 

  5.     Header for syscall in system unit for i386 *BSD.
    6. 

  6. 

  7.     This program is free software; you can redistribute it and/or modify
    8. 

  8.     it under the terms of the GNU General Public License as published by
    9. 

  9.     the Free Software Foundation; either version 2 of the License, or
    10. 

  10.     (at your option) any later version.
    11. 

  11. 

  12.     This program is distributed in the hope that it will be useful,
    13. 

  13.     but WITHOUT ANY WARRANTY; without even the implied warranty of
    14. 

  14.     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    15. 

  15.     GNU General Public License for more details.
    16. 

  16. 

  17.     You should have received a copy of the GNU General Public License
    18. 

  18.     along with this program; if not, write to the Free Software
    19. 

  19.     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
    20. 

  20. 

  21.  ****************************************************************************
    22. 

  22. 

  23. }
    24. 

  24. 

  25. function Do_SysCall(sysnr:LONGINT):longint;  external name 'FPC_DOSYS0';
    26. 

  26. function Do_SysCall(sysnr,param1:longint):longint; external name 'FPC_DOSYS1';
    27. 

  27. function Do_SysCall(sysnr,param1:integer):longint; external name 'FPC_DOSYS1w';
    28. 

  28. function Do_SysCall(sysnr,param1,param2:LONGINT):longint;  external name 'FPC_DOSYS2';
    29. 

  29. function Do_SysCall(sysnr,param1,param2,param3:LONGINT):longint; external name 'FPC_DOSYS3';
    30. 

  30. function Do_SysCall(sysnr,param1,param2,param3,param4:LONGINT):longint; external name 'FPC_DOSYS4';
    31. 

  31. function Do_SysCall(sysnr,param1,param2,param3,param4,param5:LONGINT):longint;  external name 'FPC_DOSYS5';
    32. 

  32. function Do_SysCall(sysnr,param1,param2,param3,param4,param5,param6:LONGINT):int64;  external name 'FPC_DOSYS6';
    33. 

  33. function Do_SysCall(sysnr,param1,param2,param3,param4,param5,param6,param7:LONGINT):int64;   external name 'FPC_DOSYS7';
    34. 

  34. 

  35. {
    36. 

  36.   $Log$
    37. 

  37.   Revision 1.4  2002-10-16 18:44:00  marco
    38. 

  38.    * and again for ftruncate (sigh)
    39. 

  39. 

  40.   Revision 1.3  2002/10/16 18:41:14  marco
    41. 

  41.    * the 7 param syscall (for lseek and truncate) now returns a int64.
    42. 

  42. 

  43.   Revision 1.2  2002/09/07 16:01:17  peter
    44. 

  44.     * old logs removed and tabs fixed
    45. 

  45. 

  46.   Revision 1.1  2002/08/20 08:28:14  marco
    47. 

  47.    * Updates for new errno scheme.
    48. 

  48. 

  49. 

  50. }
    51.