mirror of https://github.com/A2osX/A2osX.git
46 lines
1.2 KiB
Plaintext
46 lines
1.2 KiB
Plaintext
PR#3
|
||
PREFIX /A2OSX.SRC
|
||
NEW
|
||
INC 1
|
||
AUTO 6
|
||
.LIST OFF
|
||
*--------------------------------------
|
||
ERR.Codes .DA #MLI.ERR.IO
|
||
.DA #MLI.ERR.NODEV
|
||
.DA #MLI.ERR.WRTPROT
|
||
.DA #MLI.ERR.DSKSWIT
|
||
.DA #MLI.ERR.INVPATH
|
||
.DA #MLI.ERR.PNOTFND
|
||
.DA #MLI.ERR.VNOTFND
|
||
.DA #MLI.ERR.FNOTFND
|
||
.DA #MLI.ERR.DUPFILE
|
||
.DA #MLI.ERR.OVERRUN
|
||
.DA #MLI.ERR.VOLFULL
|
||
.DA #MLI.ERR.EOF
|
||
*--------------------------------------
|
||
.DA #SYSMGR.ERRSYN
|
||
.DA #SYSMGR.ERRFNF
|
||
*--------------------------------------
|
||
ERR.Count .EQ *-ERR.Codes
|
||
*--------------------------------------
|
||
ERR.Messages >PSTR "I/O Error"
|
||
>PSTR "No Device"
|
||
>PSTR "Disk Write-Protected"
|
||
>PSTR "Disk Switched"
|
||
>PSTR "Invalid Path"
|
||
>PSTR "Path Not Found"
|
||
>PSTR "Volume Not Found"
|
||
>PSTR "File Not Found"
|
||
>PSTR "Duplicate Filename"
|
||
>PSTR "Buffer Overrun"
|
||
>PSTR "Volume Is Full"
|
||
>PSTR "End Of File"
|
||
*--------------------------------------
|
||
>PSTR "Syntax Error"
|
||
>PSTR "Command Not Found"
|
||
*--------------------------------------
|
||
>PSTR "Unknown Error"
|
||
*--------------------------------------
|
||
MAN
|
||
SAVE X.ERRORS.S
|