(port-fold(^'r(if(= .'10)(if(print(ucs->char r))32)(logxor .'r)))32 read-byte)
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page