inchworm-1.1.1.2: examples/mlish/Token.hs

module Token where
import Text.Lexer.Inchworm.Char


data Located a
        = Located FilePath (Range Location) a
        deriving Show

data Token
        = KNewLine
        | KComment      String
        | KPunc         String
        | KKeyWord      String
        | KVar          String
        | KCon          String
        | KOp           String
        | KLit          Lit
        deriving Show


data Lit
        = LInteger      Integer
        | LChar         Char
        | LString       String
        deriving Show