| 12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576 |
- (* Release 3.10 *)
- (*-------------------------------------------------------------------------*
- * *
- * ERRNO.DEF - Modula-2 interface to ERRNO.H *
- * *
- * COPYRIGHT (C) 1989..1992 Clarion Software Corporation. *
- * All Rights Reserved *
- * *
- *--------------------------------------------------------------------------*)
- (*# project("#set tsc='on'") *)
- (*# call(o_a_size=>off, o_a_copy=>off, c_conv=>on, result_optional=>on) *)
- (*# module(implementation=>off, init_code=>off) *)
- (*# name(prefix=>c) *)
- DEFINITION MODULE Errno;
- CONST
- EZERO = 0; (* No Error *)
- EINVFN = 1; (* Invalid function code *)
- ENOENT = 2; (* File not found *)
- ENOPATH = 3; (* Path not found *)
- EMFILE = 4; (* Too many open files *)
- EACCES = 5; (* Access denied *)
- EBADF = 6; (* Invalid handle *)
- E2BIG = 7; (* Memory blocks destroyed *)
- ENOMEM = 8; (* Insufficient Memory *)
- EINVMEM = 9; (* Invalid memory block address *)
- EINVENV = 10; (* Invalid environment *)
- EINVFMT = 11; (* Invalid format *)
- EINVACC = 12; (* Invalid access code *)
- EINVDAT = 13; (* Invalid data *)
- ENODEV = 15; (* Invalid drive *)
- ECURDIR = 16; (* Attempt to remove CurDir *)
- ENOTSAM = 17; (* Not same device *)
- ENMFILE = 18; (* No more files *)
- (* RTL error codes *)
- EINVAL = 19; (* Invalid argument *)
- ENOTDIR = 20; (* Not directory *)
- EISDIR = 21; (* Is directory *)
- ENOEXEC = 22; (* Corrupted exec file *)
- EMLINK = 32; (* Cross-device link *)
- EDOM = 33; (* Math argument *)
- ERANGE = 34; (* Result too large *)
- EDEADLOCK = 36; (* file locking deadlock *)
- EEXIST = 80; (* File exists MSDOS 3.0 + *)
- EFAULT = -1; (* Unknown error *)
- EPERM = -1; (* UNIX - not in MSDOS *)
- ESRCH = -1; (* UNIX - not in MSDOS *)
- EINTR = -1; (* UNIX - not in MSDOS *)
- EIO = -1; (* UNIX - not in MSDOS *)
- ENXIO = -1; (* UNIX - not in MSDOS *)
- ECHILD = -1; (* UNIX - not in MSDOS *)
- EAGAIN = -1; (* UNIX - not in MSDOS *)
- ENOTBLK = -1; (* UNIX - not in MSDOS *)
- EBUSY = -1; (* UNIX - not in MSDOS *)
- ENFILE = -1; (* UNIX - not in MSDOS *)
- ENOTTY = -1; (* UNIX - not in MSDOS *)
- ETXTBSY = -1; (* UNIX - not in MSDOS *)
- EFBIG = -1; (* UNIX - not in MSDOS *)
- ENOSPC = -1; (* UNIX - not in MSDOS *)
- ESPIPE = -1; (* UNIX - not in MSDOS *)
- EROFS = -1; (* UNIX - not in MSDOS *)
- EPIPE = -1; (* UNIX - not in MSDOS *)
- EUCLEAN = -1; (* UNIX - not in MSDOS *)
- VAR
- _doserrno : INTEGER; (* global DOS error variable *)
- errno : INTEGER; (* global error variable *)
- END Errno.
|
