diff options
Diffstat (limited to 'src/versions/native/structures.ml')
-rw-r--r-- | src/versions/native/structures.ml | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/versions/native/structures.ml b/src/versions/native/structures.ml index 51e14d6..a35d04b 100644 --- a/src/versions/native/structures.ml +++ b/src/versions/native/structures.ml @@ -89,3 +89,8 @@ let mk_smt_tactic tac gl = let sigma = Tacmach.project gl in let t = Tacmach.pf_concl gl in tac env sigma t gl + +let ppconstr_lsimpleconstr = Ppconstr.lsimple +let constrextern_extern_constr = + let env = Global.env () in + Constrextern.extern_constr false env |