-- @shouldFailWith ErrorParsingModule module Main where x :: Char x = '\x10000'