18 lines
101 B
Plaintext
18 lines
101 B
Plaintext
ns: cb
|
|
|
|
: read \ x -- x x'
|
|
|
|
;
|
|
|
|
: write \ x x' -- x
|
|
|
|
;
|
|
|
|
: overwrite \ x x' -- x
|
|
|
|
;
|
|
|
|
: new \ n -- x
|
|
|
|
;
|