gforth/errors.fs - diff

Return to errors.fs CVS log

Up to [gforth] / gforth

version 1.12, 2002/04/01 15:34:34	version 1.14, 2003/02/28 10:59:11
Line 90 decimal	Line 90 decimal
\ Gforth's errors:	\ Gforth's errors:

-2048 s" Cannot tick compile-only word (try COMP' ... DROP)" rot errstring	-2048 s" Cannot tick compile-only word (try COMP' ... DROP)" rot errstring
	-2049 s" Write to broken pipe" rot errstring

variable next-exception -2049 next-exception !	variable next-exception -2050 next-exception !

: exception ( addr u -- n ) \ exception- gforth	: exception ( addr u -- n ) \ exception- gforth
\G @var{n} is a previously unused @code{throw} value in the range	\G @var{n} is a previously unused @code{throw} value in the range
Line 102 variable next-exception -2049 next-excep	Line 103 variable next-exception -2049 next-excep
next-exception @	next-exception @
-1 next-exception +! ;	-1 next-exception +! ;

	-2049 constant broken-pipe-error ( -- n ) \ gforth
	\G the error number for a broken pipe