diff options
Diffstat (limited to 'printing/printer.ml')
| -rw-r--r-- | printing/printer.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/printing/printer.ml b/printing/printer.ml index 7d9d27e81..69fec870a 100644 --- a/printing/printer.ml +++ b/printing/printer.ml @@ -288,7 +288,7 @@ let pr_concl n sigma g = (* display evar type: a context and a type *) let pr_evgl_sign gl = let ps = pr_named_context_of (evar_unfiltered_env gl) in - let _,l = List.filter2 (fun b c -> not b) (evar_filter gl,evar_context gl) in + let _, l = List.filter2 (fun b c -> not b) (evar_filter gl) (evar_context gl) in let ids = List.rev (List.map pi1 l) in let warn = if ids = [] then mt () else |