gforth/errore.fs - diff

Return to errore.fs CVS log

Up to [gforth] / gforth

version 1.1, 1994/02/11 16:30:46	version 1.2, 1994/07/08 15:00:37
Line 15 AVARIABLE ErrLink \ Linked	Line 15 AVARIABLE ErrLink \ Linked
decimal	decimal

-1 ERR" Aborted"	-1 ERR" Aborted"
	ErrLink @ unlock reloff lock \ make sure that the terminating 0 is not relocated
-3 ERR" Stack overflow" -4 ERR" Stack underflow"	-3 ERR" Stack overflow" -4 ERR" Stack underflow"
-5 ERR" Return stack overflow" -6 ERR" Return stack undeflow"	-5 ERR" Return stack overflow" -6 ERR" Return stack undeflow"
-7 ERR" Do-loops nested too deeply" -8 ERR" Dictionary overflow"	-7 ERR" Do-loops nested too deeply" -8 ERR" Dictionary overflow"
Line 46 decimal	Line 47 decimal
-55 ERR" Floating-point unidentified fault"	-55 ERR" Floating-point unidentified fault"
-56 ERR" QUIT" -57 ERR" Error in sending or receiving a character"	-56 ERR" QUIT" -57 ERR" Error in sending or receiving a character"
-58 ERR" [IF], [ELSE], [THEN] error"	-58 ERR" [IF], [ELSE], [THEN] error"
	\ signals: ( We list them all, execpt those already present, just in case )
	-256 ERR" Hangup signal"
	-257 ERR" Quit signal"
	-258 ERR" Illegal Instruction"
	-259 ERR" Trace Trap"
	-260 ERR" IOT instruction"
	-261 ERR" EMT instruction" \ abort() call?
	-262 ERR" Kill signal" \ cannot be caught but so what
	-263 ERR" Bad arg to system call"
	-264 ERR" Broken pipe"
	-265 ERR" Alarm signal"
	-266 ERR" Terminate signal"
	-267 ERR" User signal 1"
	-268 ERR" User signal 2"

: .error ( n -- )	: .error ( n -- )
cr ." Error: "	cr ." Error: "