15 lines
323 B
Text
15 lines
323 B
Text
import system.io
|
|
open io
|
|
#check 'a'
|
|
|
|
#eval 'a'
|
|
#eval '\n'
|
|
#eval '\\'
|
|
variable [io.interface]
|
|
#eval put_str ("aaa".str '\\')
|
|
#eval put_str $ repr '\n'
|
|
#eval put_str $ string.singleton '\n'
|
|
#eval put_str ("aaa".str '\'')
|
|
|
|
#check ['\x7f', '\x00', '\x11', '\xff']
|
|
-- ^^ all characters should be pretty-printed using \x escapes
|