diff options
Diffstat (limited to 'library/lib.ml')
-rw-r--r-- | library/lib.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/library/lib.ml b/library/lib.ml index 81db547ef..f4f52db53 100644 --- a/library/lib.ml +++ b/library/lib.ml @@ -420,6 +420,7 @@ let extract_hyps (secs,ohyps) = in aux (secs,ohyps) let instance_from_variable_context sign = + let rec inst_rec = function | (id,b,None,_) :: sign -> id :: inst_rec sign | _ :: sign -> inst_rec sign |