Return to makedoc.fs CVS log | Up to [gforth] / gforth / doc |
version 1.13, 2007/12/31 18:40:25 | version 1.14, 2010/04/10 12:37:07 |
---|---|
Line 84 s" \ automatically generated by makedoc. | Line 84 s" \ automatically generated by makedoc. |
endif | endif |
endif | endif |
[char] \ parse 2drop | [char] \ parse 2drop |
>in @ | >in @ |
bl word dup c@ | parse-name dup |
IF | IF |
dup count 1- chars + c@ [char] - = | 2dup 1- chars + c@ [char] - = |
IF | IF |
s" --" >file | s" --" >file |
count >file drop | >file drop |
ELSE | ELSE |
drop >in ! | 2drop >in ! |
THEN | THEN |
ELSE | ELSE |
drop >in ! | 2drop >in ! |
THEN | THEN |
latest name>string >file | latest name>string >file |
s" " >file | s" " >file |