let rec(@)s i=try(s@i+1)+Char.code s.[i]with _->0and(!)?(b=read_line())a=a@0==b@0&()=print_endline(b);!a;;!(read_line())
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page