equal
deleted
inserted
replaced
24 val end_theory: Position.T -> state -> theory |
24 val end_theory: Position.T -> state -> theory |
25 val pretty_context: state -> Pretty.T list |
25 val pretty_context: state -> Pretty.T list |
26 val pretty_state: state -> Pretty.T list |
26 val pretty_state: state -> Pretty.T list |
27 val print_state: state -> unit |
27 val print_state: state -> unit |
28 val pretty_abstract: state -> Pretty.T |
28 val pretty_abstract: state -> Pretty.T |
29 val timing: bool Unsynchronized.ref |
|
30 val profiling: int Unsynchronized.ref |
29 val profiling: int Unsynchronized.ref |
31 type transition |
30 type transition |
32 val empty: transition |
31 val empty: transition |
33 val name_of: transition -> string |
32 val name_of: transition -> string |
34 val pos_of: transition -> Position.T |
33 val pos_of: transition -> Position.T |
209 |
208 |
210 |
209 |
211 |
210 |
212 (** toplevel transitions **) |
211 (** toplevel transitions **) |
213 |
212 |
214 val timing = Unsynchronized.ref false; |
|
215 val profiling = Unsynchronized.ref 0; |
213 val profiling = Unsynchronized.ref 0; |
216 |
214 |
217 |
215 |
218 (* node transactions -- maintaining stable checkpoints *) |
216 (* node transactions -- maintaining stable checkpoints *) |
219 |
217 |