Permission revocation
[hcoop/domtool2.git] / src / errormsg.sig
1 (* This file comes mostly from "Modern Compiler Implementation in ML," by Andrew Appel
2 * http://www.cs.princeton.edu/~appel/modern/ml/
3 *)
4
5 signature ERRORMSG =
6 sig
7 val reset : unit -> unit
8
9 val anyErrors : bool ref
10 val errorText : string ref
11
12 val fileName : string ref
13 val sourceStream : TextIO.instream ref
14
15 val lineNum : int ref
16 val linePos : int list ref
17
18 val error : (int * int) option -> string -> unit
19
20 val dummyLoc : int * int
21
22 exception Error
23 end