From c3e2e5a4b7bbfbc86b58d66e09a91728ff02e633 Mon Sep 17 00:00:00 2001
From: herbelin
Date: Fri, 31 Dec 2004 16:49:00 +0000
Subject: Suppression de la dépendance en Tacmach pour pouvoir être appelé de
 top_printers sans tirer Tacred et les fichiers C de la machine virtuelle

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@6537 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 proofs/tactic_debug.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'proofs/tactic_debug.ml')

diff --git a/proofs/tactic_debug.ml b/proofs/tactic_debug.ml
index 5daa10fc7a..4bf81f7ae2 100644
--- a/proofs/tactic_debug.ml
+++ b/proofs/tactic_debug.ml
@@ -33,7 +33,7 @@ let explain_logic_error = ref (fun e -> mt())
 
 (* Prints the goal *)
 let db_pr_goal g =
-  msgnl (str "Goal:" ++ fnl () ++ Proof_trees.db_pr_goal (Tacmach.sig_it g))
+  msgnl (str "Goal:" ++ fnl () ++ Proof_trees.db_pr_goal (Refiner.sig_it g))
 
 (* Prints the commands *)
 let help () =
-- 
cgit v1.2.3