From df8ed3d1228d8df8317357ef80a7845b8d5e2edb Mon Sep 17 00:00:00 2001 From: notin Date: Mon, 25 Sep 2006 11:55:39 +0000 Subject: Corrections mineures git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@9176 85f007b7-540e-0410-9357-904b9bb8a0f7 --- test-suite/output/Tactics.out | 1 + toplevel/coqtop.ml | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/test-suite/output/Tactics.out b/test-suite/output/Tactics.out index 8e8b8059f9..365fa9bb40 100644 --- a/test-suite/output/Tactics.out +++ b/test-suite/output/Tactics.out @@ -1,4 +1,5 @@ intro H; split; [ a H | e H ]. + intros; match goal with | |- context [if ?X then _ else _] => case X end; trivial. diff --git a/toplevel/coqtop.ml b/toplevel/coqtop.ml index 70c85ca4cf..dada1ed9d3 100644 --- a/toplevel/coqtop.ml +++ b/toplevel/coqtop.ml @@ -21,7 +21,7 @@ open Coqinit let get_version_date () = try - let ch = open_in (Coq_config.coqtop^"/revision") in + let ch = open_in (Coq_config.coqlib^"/revision") in let ver = input_line ch in let rev = input_line ch in (ver,rev) -- cgit v1.2.3