/programs/develop/SPForth/devel/~af/lib/comments.f |
---|
0,0 → 1,9 |
\ $Id: comments.f,v 1.2 2002/06/18 14:50:22 anfilat Exp $ |
\ ¥é¥ ®¤¨ ¬®£®áâà®çë© ª®¬¥â ਩ :-) (~ruvim) |
: (* ( -- ) |
BEGIN |
NextWord DUP 0= |
IF NIP REFILL 0= IF DROP TRUE THEN |
ELSE S" *)" COMPARE 0= THEN |
UNTIL |
; IMMEDIATE |
/programs/develop/SPForth/devel/~af/lib |
---|
Property changes: |
Added: tsvn:logminsize |
+5 |
\ No newline at end of property |
/programs/develop/SPForth/devel/~af/. |
---|
Property changes: |
Added: tsvn:logminsize |
+5 |
\ No newline at end of property |