RosettaCodeData/Task/Comments/Forth/comments-3.fth

3 lines
69 B
Forth
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
: add'em ( a b -- a+b ) + ;
: strlen ( addr -- len ) count nip ;