-- Lexer

lexer :: Token.TokenParser ()
lexer = Token.makeTokenParser style
  where style = javaStyle {
          Token.opStart = oneOf "+-*/=",
          Token.reservedNames = ["int"]
        }
lexer :: Token.TokenParser ()
lexer = Token.makeTokenParser style
  where style = javaStyle {
          Token.opStart = oneOf "+-*/=",
          Token.reservedNames = ["int"]
        }
lexer = Token.makeTokenParser style
  where style = javaStyle {
          Token.opStart = oneOf "+-*/=",
          Token.reservedNames = ["int"]
        }