22 lines
369 B
Text
22 lines
369 B
Text
import system.io
|
||
open io
|
||
#check 'a'
|
||
#check '\\'
|
||
#check 'α'
|
||
|
||
#eval 'a'
|
||
#eval '\n'
|
||
#eval '\\'
|
||
|
||
#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']
|
||
-- ^^ all characters should be pretty-printed using \x escapes
|
||
|
||
#eval 'α'
|
||
#eval 'β'
|
||
#eval '\u03B1'
|
||
#eval '\u03B2'
|