Fix typos

slava 2006-05-24 08:31:50 +00:00
parent c90c1d66da
commit f7210644a3
2 changed files with 18 additions and 18 deletions

View File

@ -15,7 +15,7 @@ SYMBOL: error-hook
[ drop terpri debug-help ] error-hook set-global
: bye ( -- ) quit-flag on ;
help
: (read-multiline) ( quot depth -- quot ? )
>r readln dup [
(parse) depth r> dup >r <= [

View File

@ -1,22 +1,22 @@
typedef enum
{
ERROR_EXPIRED
ERROR_IO
ERROR_UNDEFINED_WORD
ERROR_TYPE
ERROR_SIGNAL
ERROR_NEGATIVE_ARRAY_SIZE
ERROR_C_STRING
ERROR_FFI
ERROR_HEAP_SCAN
ERROR_UNDEFINED_SYMBOL
ERROR_USER_INTERRUPT
ERROR_DS_UNDERFLOW
ERROR_DS_OVERFLOW
ERROR_RS_UNDERFLOW
ERROR_RS_OVERFLOW
ERROR_CS_UNDERFLOW
ERROR_CS_OVERFLOW
ERROR_EXPIRED,
ERROR_IO,
ERROR_UNDEFINED_WORD,
ERROR_TYPE,
ERROR_SIGNAL,
ERROR_NEGATIVE_ARRAY_SIZE,
ERROR_C_STRING,
ERROR_FFI,
ERROR_HEAP_SCAN,
ERROR_UNDEFINED_SYMBOL,
ERROR_USER_INTERRUPT,
ERROR_DS_UNDERFLOW,
ERROR_DS_OVERFLOW,
ERROR_RS_UNDERFLOW,
ERROR_RS_OVERFLOW,
ERROR_CS_UNDERFLOW,
ERROR_CS_OVERFLOW,
ERROR_OBJECTIVE_C
} F_ERRORTYPE;