|
structure UserDeclarations =
struct
structure TokTable = TokenTable(Tokens)
type svalue = Tokens.svalue
type ('a, 'b) token = ('a, 'b) Tokens.token
type pos = int
type lexresult = (svalue, pos) token
type arg = {
comLevel : int ref,
commonOperations : ParserUtil.PositionMap.operations,
docComments : (string * int * int) list ref,
error : (string * int * int -> unit),
stringBuf : string list ref,
stringStart : pos ref,
stringType : bool ref
}
val addString
val addChar
val makeString
val eof
val atoi
val xtoi
val inc
val dec
end
Type detail |
---|
type svalue = Tokens.svalue
type ('a, 'b) token = ('a, 'b) Tokens.token
type pos = int
type lexresult = (svalue, pos) token
type arg = {
comLevel : int ref,
commonOperations : ParserUtil.PositionMap.operations,
docComments : (string * int * int) list ref,
error : (string * int * int -> unit),
stringBuf : string list ref,
stringStart : pos ref,
stringType : bool ref
}
Value detail |
---|
val addString
val addChar
val makeString
val eof
val atoi
val xtoi
val inc
val dec
|