temporary: for the moment we need both MQI handle and DBI handle

[helm.git] / helm / gTopLevel / proofEngine.ml

diff --git a/helm/gTopLevel/proofEngine.ml b/helm/gTopLevel/proofEngine.ml
index ab8d4327a2b5dde24ba74120519177e1d3b6a5db..b8573da891993b97f98412eecb418cd39862e4ed 100644 (file)
--- a/helm/gTopLevel/proofEngine.ml
+++ b/helm/gTopLevel/proofEngine.ml
@@ -227,7 +227,7 @@ let fold_simpl term =
 let elim_type term = apply_tactic (EliminationTactics.elim_type_tac ~term)
 let ring () = apply_tactic Ring.ring_tac
 let fourier () = apply_tactic FourierR.fourier_tac
-let auto mqi_handle () = apply_tactic (VariousTactics.auto_tac mqi_handle)
+let auto dbh () = apply_tactic (VariousTactics.auto_tac ~dbh)
 
 let rewrite_simpl term = apply_tactic (EqualityTactics.rewrite_simpl_tac ~term)
 let rewrite_back_simpl term = apply_tactic (EqualityTactics.rewrite_back_simpl_tac ~term)