diff options
Diffstat (limited to 'src/tac2stdlib.ml')
| -rw-r--r-- | src/tac2stdlib.ml | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/src/tac2stdlib.ml b/src/tac2stdlib.ml index 3cfd0b5626..e3b0d6bf6b 100644 --- a/src/tac2stdlib.ml +++ b/src/tac2stdlib.ml @@ -11,8 +11,6 @@ open Locus open Misctypes open Genredexpr open Tac2expr -open Tac2core -open Tac2tactics open Proofview.Notations module Value = Tac2ffi @@ -169,12 +167,6 @@ let pname s = { mltac_plugin = "ltac2"; mltac_tactic = s } let lift tac = tac <*> return v_unit -let wrap f = - return () >>= fun () -> return (f ()) - -let wrap_unit f = - return () >>= fun () -> f (); return v_unit - let define_prim0 name tac = let tac = function | [_] -> lift tac |