path: root/testsuite/tests/ghc-regress/lib/should_run/char002.hs

-- !!! tests for large character values in literals
import Data.Char
main = do
  print (ord '\xffff')
  print (ord '\o7777')
  print (ord '\65535')
  print (map ord "\xffff\o7777\65535")