[Haskell-beginners] SQL Lexer