version 1.1, 1997/05/21 20:40:14
|
version 1.2, 1997/08/31 19:32:30
|
Line 67
|
Line 67
|
|
|
\ additional words only needed if there is file support |
\ additional words only needed if there is file support |
|
|
|
Warnings off |
|
|
: ( ( compilation 'ccc<close-paren>' -- ; run-time -- ) \ core,file paren |
: ( ( compilation 'ccc<close-paren>' -- ; run-time -- ) \ core,file paren |
loadfile @ 0= IF postpone ( EXIT THEN |
loadfile @ 0= IF postpone ( EXIT THEN |
BEGIN |
BEGIN |
Line 84
|
Line 86
|
THEN |
THEN |
REPEAT ; immediate |
REPEAT ; immediate |
|
|
|
Warnings on |