9fc2614f |
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 |
202d474e |
19 | val warning : (int * int) option -> string -> unit |
9fc2614f |
20 | |
21 | val dummyLoc : int * int |
22 | |
23 | exception Error |
24 | end |