Ascii decode by Lost_dog

main=interact$f.read
f 0=[]
f x=f(div x 256)++[toEnum$read$show$mod x 128]

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

download

return to the top page