Remenber Previous Input by 51b

s" a"0 open-file 0= [if] slurp-fid type [then]
stdin slurp-fid s" a"4 create-file + write-file

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page