Mercurial > urweb
comparison src/elab_ops.sig @ 1034:a779402841f6
Hooks for measuring how much interesting proving is going on in elaboration
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Tue, 17 Nov 2009 12:44:14 -0500 |
parents | 588b9d16b00a |
children | c7b9a33c26c8 |
comparison
equal
deleted
inserted
replaced
1033:b734ff578ac7 | 1034:a779402841f6 |
---|---|
37 val subConInCon : int * Elab.con -> Elab.con -> Elab.con | 37 val subConInCon : int * Elab.con -> Elab.con -> Elab.con |
38 val subStrInSgn : int * int -> Elab.sgn -> Elab.sgn | 38 val subStrInSgn : int * int -> Elab.sgn -> Elab.sgn |
39 | 39 |
40 val hnormCon : ElabEnv.env -> Elab.con -> Elab.con | 40 val hnormCon : ElabEnv.env -> Elab.con -> Elab.con |
41 | 41 |
42 val identity : int ref | |
43 val distribute : int ref | |
44 val fuse : int ref | |
45 val reset : unit -> unit | |
46 | |
42 end | 47 end |