81B17 |
ERRBEEP
|
( → )
Beeps.
|
819EB |
ERROR@
|
( → # )
Returns current error number.
|
819F0 |
ERRORSTO
|
( # → )
Stores new error number.
|
8424A |
ERROROUT
|
( # → )
Stores new error number and calls ERRJMP.
|
819F5 |
ERRORCLR
|
( → )
Stores zero as new error number.
|
81A18 |
ERRJMP
|
( → )
Invokes error handling sub-system.
|
81A04 |
GETEXITMSG
|
( → $ )
Gets EXITMSG (user defined error message).
|
81A09 |
EXITMSGSTO
|
( $ → )
Stores $ as EXITMSG.
|
8212F |
DO#EXIT
|
( # → )
Stores new error number, does <REF>AtUserStack
and then <REF>ERRJMP.
|
82139 |
DO$EXIT
|
( $ → )
Stores string as EXITMSG, #70000 as error
number, does <REF>AtUserStack and then
<REF>ERRJMP .
|
81F9A |
ABORT
|
( → )
Does <REF>ERRORCLR and <REF>ERRJMP .
|
81A0E |
ERRSET
|
( → )
Sets new error trap.
|
81A13 |
ERRTRAP
|
( → )
Error trap marker. If no error happens, still
removes all temporary environments created
since ERRSET.
|
831E7 |
JstGetTHEMESG
|
( # → $ )
Fetches message from message table. To get
a message from a library, use the formula:
libnum*#100+msgnum.
--
<REF>TEXT:Libraries
aka: JstGETTHEMSG
|
831DD |
GETTHEMESG
|
( # → $ )
If #70000 then does <REF>GETEXITMSG, else does
<REF>JstGetTHEMESG .
--
<REF>TEXT:Libraries
|
829EF |
?GetMsg
|
( # → $msg )
( ob → ob )
If the argument is a bint, does JstGETTHEMSG
to fetch a message. Other arguments are
returned unchanged.
--
<REF>TEXT:Libraries
|