Return to smartdots.fs CVS log | Up to [gforth] / gforth |
version 1.2, 2012/03/09 12:59:54 | version 1.3, 2012/03/09 18:56:42 |
---|---|
Line 27 | Line 27 |
IFERROR 2drop drop false nothrow ELSE true THEN ENDTRY ; | IFERROR 2drop drop false nothrow ELSE true THEN ENDTRY ; |
: .string. ( addr u -- ) | : .string. ( addr u -- ) |
'"' emit type '"' emit space ; | .\" s\" " type '"' emit space ; |
: .addr. ( addr -- ) hex. ; | : .addr. ( addr -- ) hex. ; |
Variable smart.s-skip | Variable smart.s-skip |