Error in Haskell 98 Report 'lex' function