2 lines
69 B
Forth
2 lines
69 B
Forth
: add'em ( a b -- a+b ) + ;
|
|
: strlen ( addr -- len ) count nip ;
|
: add'em ( a b -- a+b ) + ;
|
|
: strlen ( addr -- len ) count nip ;
|