09488af869
git-svn-id: svn://kolibrios.org@4867 a494cfbc-eb01-0410-851d-a64ba20cac60
13 lines
333 B
Forth
13 lines
333 B
Forth
|
|
WANT_BUFF COUNT SFIND [IF] DROP \EOF [THEN]
|
|
|
|
[WANT] WDS ~mak\wds.f
|
|
[WANT] SKIP : SKIP PSKIP ;
|
|
[WANT] PSKIP : PSKIP SKIP ;
|
|
[WANT] CASE ~mak\case.f
|
|
[WANT] [IF] ~mak/CompIF.f
|
|
[WANT] MS : MS 0 DO 100099 0 DO LOOP LOOP ;
|
|
[WANT] #define : #define HEADER ['] _CONSTANT-CODE COMPILE, 0 PARSE EVALUATE , ;
|
|
|
|
|
|
-321 THROW |