pUnknown :: Lexer Token
pUnknown = TokenUnknown . UnknownChar <$> anySingle
pUnknown :: Lexer Token
pUnknown = TokenUnknown . UnknownChar <$> anySingle
pUnknown = TokenUnknown . UnknownChar <$> anySingle