C style constants by zubenalt

-module m.
-export [m/0].
m()->try io:write(apply(erlang,list_to_integer,fun("0x"++N)->[N,16];("0"++N)when N/=[]->[N,8];(N)->[N,10]end(io:get_line('')--[10]))),io:nl(),m()catch _:_->m end.

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

download

return to the top page