module Lib
    ( Token
    , Op
    , splitOn
    , lex
    ) where

import Prelude hiding (lex)

data Token = TokOp Op
           | TokInt Int

instance Show Token where
    show (TokOp op) = show op
    show (TokInt num) = show num

data Op = Plus | Minus | Div | Mult deriving (Show, Eq)