diff options
Diffstat (limited to 'ide')
| -rw-r--r-- | ide/coq.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ide/coq.ml b/ide/coq.ml index ac28997d52..71bc09cc2c 100644 --- a/ide/coq.ml +++ b/ide/coq.ml @@ -214,7 +214,7 @@ let print_toplevel_error exc = let (loc,exc) = match exc with | Stdpp.Exc_located (loc, ie) -> (Some loc),ie - | Error_in_file (s, (fname, loc), ie) -> None, ie + | Error_in_file (s, (_,fname, loc), ie) -> None, ie | _ -> dloc,exc in match exc with |