ehangc by KirarinSnow

[([){exch put}/b{length 1 sub}(]){dup}/c{(%stdin)(r)file 99 string readline{]]]0 get exch]]]b get 0[b[= c}if}>>begin c

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

download

return to the top page