blob: b2dcbae592b7f2bcac80c7553e6a7df16eddebe7 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
signature PPC = sig
structure T: TOKENIZER
type t
type tkPos
datatype tkClass =
Ctk of T.token |
Cid |
Cconst |
Cunop |
Cbinop |
Cop
val clerror: tkPos -> tkClass list -> 'a
val create: { fname: string, incDirs: string list, debugMode: bool } -> t
val getToken: t -> T.token * tkPos * t
val debugPrint: string -> string list -> unit
val PtkPos: (tkPos, 'a, 'b, 'c) a1printer
end
|
