diff options
Diffstat (limited to 'ide')
| -rw-r--r-- | ide/coq.mli | 2 | ||||
| -rw-r--r-- | ide/coqide.ml | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/ide/coq.mli b/ide/coq.mli index 6c4608c5cb..5e2c44de47 100644 --- a/ide/coq.mli +++ b/ide/coq.mli @@ -36,7 +36,7 @@ val get_current_goals_nb : unit -> int val print_no_goal : unit -> string -val process_exn : exn -> string*((int*int) option) +val process_exn : exn -> string*(Util.loc option) type reset_info = NoReset | Reset of Names.identifier * bool ref diff --git a/ide/coqide.ml b/ide/coqide.ml index 5922f1edb5..bfbee58cad 100644 --- a/ide/coqide.ml +++ b/ide/coqide.ml @@ -974,7 +974,7 @@ object(self) self#set_message s; message_view#misc#draw None; if localize then - (match loc with + (match Util.option_app Util.unloc loc with | None -> () | Some (start,stop) -> let convert_pos = byte_offset_to_char_offset phrase in |