diff options
| author | aspiwack | 2012-07-10 12:40:24 +0000 |
|---|---|---|
| committer | aspiwack | 2012-07-10 12:40:24 +0000 |
| commit | 608bb24403e07e42855311d483e918c7acf3cafb (patch) | |
| tree | 53c57ed0d82a5332ece2b7551116c46497a91975 /proofs/proofview.ml | |
| parent | 7cf5f94e772df8632b88088f1cf0ae2287e8f64f (diff) | |
Small change in the printing of proofs for use by coqide.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15577 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'proofs/proofview.ml')
| -rw-r--r-- | proofs/proofview.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/proofs/proofview.ml b/proofs/proofview.ml index d9c62600d4..00e311cc90 100644 --- a/proofs/proofview.ml +++ b/proofs/proofview.ml @@ -97,7 +97,7 @@ let list_goto = order) *) type focus_context = Goal.goal list * Goal.goal list -let focus_context (l,r) = List.length l + List.length r +let focus_context f = f (* This (internal) function extracts a sublist between two indices, and returns this sublist together with its context: |