syscallh.inc 2.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445
  1. {
  2. Copyright (c) 2002 by Marco van de Voort
  3. Header for syscall in system unit for i386 *BSD.
  4. This program is free software; you can redistribute it and/or modify
  5. it under the terms of the GNU General Public License as published by
  6. the Free Software Foundation; either version 2 of the License, or
  7. (at your option) any later version.
  8. This program is distributed in the hope that it will be useful,
  9. but WITHOUT ANY WARRANTY; without even the implied warranty of
  10. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  11. GNU General Public License for more details.
  12. You should have received a copy of the GNU General Public License
  13. along with this program; if not, write to the Free Software
  14. Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  15. ****************************************************************************
  16. }
  17. {$ifdef FPC_USE_SYSCALL}
  18. Type
  19. TSysResult = int64; // all platforms, cint=32-bit.
  20. // On platforms with off_t =64-bit, people should
  21. // use int64, and typecast all calls that don't
  22. // return off_t to cint.
  23. TSysParam = int64;
  24. function do_sysCall(sysnr:TSysParam):TSysResult; external name 'FPC_DOSYS0';
  25. function do_sysCall(sysnr,param1:TSysParam):TSysResult; external name 'FPC_DOSYS1';
  26. function do_sysCall(sysnr,param1,param2:TSysParam):TSysResult; external name 'FPC_DOSYS2';
  27. function do_sysCall(sysnr,param1,param2,param3:TSysParam):TSysResult; external name 'FPC_DOSYS3';
  28. function do_sysCall(sysnr,param1,param2,param3,param4:TSysParam):TSysResult; external name 'FPC_DOSYS4';
  29. function do_sysCall(sysnr,param1,param2,param3,param4,param5:TSysParam):TSysResult; external name 'FPC_DOSYS5';
  30. function do_sysCall(sysnr,param1,param2,param3,param4,param5,param6:TSysParam):int64; external name 'FPC_DOSYS6';
  31. function do_sysCall(sysnr,param1,param2,param3,param4,param5,param6,param7:TSysParam):int64; external name 'FPC_DOSYS7';
  32. {$endif}