diff options
| author |  barras <barras@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2004-09-17 20:28:19 +0000 |
|---|---|---|
| committer | barras <barras@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2004-09-17 20:28:19 +0000 |
| commit | ed29c6bbe9a45e7d3996c230a6cc2bf7b11848f1 (patch) | |
| tree | f898c771227a1e111be1bac0431d42d04b0166f6 /contrib/first-order | |
| parent | 59c2fa12e257ae6087e0580e0d7abca3552421b8 (diff) | |
restructuration des printers: proofs passe avant parsing
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@6113 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/first-order')
| -rw-r--r-- | contrib/first-order/ground.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/first-order/ground.ml b/contrib/first-order/ground.ml index 690fc48c5..bd155fd51 100644 --- a/contrib/first-order/ground.ml +++ b/contrib/first-order/ground.ml @@ -61,7 +61,7 @@ let ground_tac solver startseq gl= update_flags (); let rec toptac skipped seq gl= if Tacinterp.get_debug()=Tactic_debug.DebugOn 0 - then Pp.msgnl (Proof_trees.pr_goal (sig_it gl)); + then Pp.msgnl (Printer.pr_goal (sig_it gl)); tclORELSE (axiom_tac seq.gl seq) begin try |