sysunixh.inc 1.3 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758
  1. {
  2. $Id$
  3. This file is part of the Free Pascal Run time library.
  4. Copyright (c) 2001 by the Free Pascal development team
  5. This file contains the OS independent declarations of the system unit
  6. for unix styled systems
  7. See the File COPYING.FPC, included in this distribution,
  8. for details about the copyright.
  9. This program is distributed in the hope that it will be useful,
  10. but WITHOUT ANY WARRANTY; without even the implied warranty of
  11. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  12. **********************************************************************}
  13. {$ifdef m68k}
  14. { used for single computations }
  15. const
  16. BIAS4 = $7f-1;
  17. {$endif}
  18. {$define newsignal}
  19. {$I systemh.inc}
  20. {$I heaph.inc}
  21. const
  22. UnusedHandle = -1;
  23. StdInputHandle = 0;
  24. StdOutputHandle = 1;
  25. StdErrorHandle = 2;
  26. FileNameCaseSensitive : boolean = true;
  27. sLineBreak : string[1] = #10;
  28. DefaultTextLineBreakStyle : TTextLineBreakStyle = tlbsLF;
  29. var
  30. argc : longint;
  31. argv : ppchar;
  32. envp : ppchar;
  33. {
  34. $Log$
  35. Revision 1.7 2001-04-13 23:49:49 peter
  36. * fixes for the stricter compiler
  37. Revision 1.6 2001/04/13 22:30:55 peter
  38. * added filenamecasesensitive var
  39. Revision 1.5 2001/03/22 21:56:27 florian
  40. * typo fixed
  41. Revision 1.4 2001/03/21 23:32:13 florian
  42. + header and log added
  43. }