diff options
Diffstat (limited to 'proofs/proof.ml')
-rw-r--r-- | proofs/proof.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/proofs/proof.ml b/proofs/proof.ml index 15ce94011..24fdc41da 100644 --- a/proofs/proof.ml +++ b/proofs/proof.ml @@ -215,7 +215,7 @@ let _unfocus pr = a need for it? *) let focus cond inf i pr = try _focus cond (Obj.repr inf) i i pr - with Proofview.IndexOutOfRange -> raise (NoSuchGoals (i,i)) + with CList.IndexOutOfRange -> raise (NoSuchGoals (i,i)) let rec unfocus kind pr () = let cond = cond_of_focus pr in |