55 lines
2.5 KiB
Standard ML
55 lines
2.5 KiB
Standard ML
signature OfmcFpParser_TOKENS =
|
|
sig
|
|
type ('a,'b) token
|
|
type svalue
|
|
val TXOR: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TWITNESS: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TTYPES: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TSTEP: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TSTATE: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TSEMICOLON: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TSECTION: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TSECSTATE: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TSECRET: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TSCRYPT: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TRULES: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TREQUEST: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TBACKEND: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TPROTOCOL: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TOPAREN: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TOBRACKET: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TMETAIMPLIES: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TKNOWLEDGE: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TINV: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TINITIAL: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TIKNOWS: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TFPState: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TFIXEDPOINT: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TFACT: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TEXP: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TQUOTE: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TCRYPT: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TCPAREN: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TCOMMA: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TBAR: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TNEQ: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TEQ: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TWHITESPACE: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TCOLON: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TCBRACKET: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TCAT: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TMINUS: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TARROW: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TATTACK: (string) * 'a * 'a -> (svalue,'a) token
|
|
val TABSTRACTION: (string) * 'a * 'a -> (svalue,'a) token
|
|
val SIMPLE_NAME: (string) * 'a * 'a -> (svalue,'a) token
|
|
val EOF: 'a * 'a -> (svalue,'a) token
|
|
end
|
|
signature OfmcFpParser_LRVALS=
|
|
sig
|
|
structure Tokens : OfmcFpParser_TOKENS
|
|
structure ParserData:PARSER_DATA
|
|
sharing type ParserData.Token.token = Tokens.token
|
|
sharing type ParserData.svalue = Tokens.svalue
|
|
end
|