(port-fold(^(c\)(write-byte(if(< 36(+(mod\ 4)c)39)46 c))(if(= c 10)0(+\ 1)))0 read-byte)
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page