Add support for EILSEQ errno value.

EILSEQ is required by C95 and later.
This commit is contained in:
Stephen Heumann 2021-10-02 14:34:35 -05:00
parent 09942026a8
commit ae504c6e4f
4 changed files with 6 additions and 3 deletions

View File

@ -19,6 +19,7 @@ EMFILE gequ 8 too many files are open
EACCES gequ 9 access bits prevent the operation
EEXIST gequ 10 the file exists
ENOSPC gequ 11 the file is too large
EILSEQ gequ 12 encoding error
;
; masks for the __ctype array
;

View File

@ -2179,7 +2179,7 @@ rts creturn 4:s
****************************************************************
*
perror start
maxErr equ ENOSPC max error in sys_errlist
maxErr equ EILSEQ max error in sys_errlist
s equ 4 string address
@ -3010,6 +3010,7 @@ sys_errlist start
dc a4'EACCESS'
dc a4'EEXISTS'
dc a4'ENOSPC'
dc a4'EILSEQ'
! Note: if more errors are added, change maxErr in perror() and strerror().
@ -3025,6 +3026,7 @@ EMFILE cstr 'too many files are open'
EACCESS cstr 'access bits prevent the operation'
EEXISTS cstr 'the file exists'
ENOSPC cstr 'the file is too large'
EILSEQ cstr 'encoding error'
end
****************************************************************

View File

@ -912,7 +912,7 @@ lb2 sty set set the disp past the current disp
****************************************************************
*
strerror start
maxErr equ ENOSPC max error in sys_errlist
maxErr equ EILSEQ max error in sys_errlist
phb get the error number
plx

View File

@ -31,7 +31,7 @@ _ownerid entry user ID (C)
~USER_ID entry user ID (Pascal, libraries)
ds 2
sys_nerr entry # of error messages
dc i'12'
dc i'13'
_toolErr entry last error in a tool call (C)
~TOOLERROR entry last error in a tool call (Pascal)
ds 2