blob: 61ed1cb82bda249d09c62270d6e30dd72ca34897 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
signature SYMTAB = sig
type 'token t
val init: unit -> 'token t
type 'token auxInfo = 'token option * 'token option
val insert: 'token t -> string -> ('token auxInfo -> 'token auxInfo)
-> int
val getId: 'token t -> string -> int
val getStr: 'token t -> int -> string
val isPpcDir: 'token t -> int -> 'token option
val isKw: 'token t -> int -> 'token option
val print: 'token t -> unit
end
|
