diff options
author | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2004-07-18 11:47:01 +0000 |
---|---|---|
committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2004-07-18 11:47:01 +0000 |
commit | 8e01fae88684a49be9556cf9f11289e001975502 (patch) | |
tree | 900db059df5de6c46bb545ee78a8dba0ca53d63e /ide/coqide.ml | |
parent | 7f1a49c8d55136a95f8cf9fecf0c946629845fa8 (diff) |
Abstraction vis a vis du type loc pour ocaml 3.08
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@5951 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'ide/coqide.ml')
-rw-r--r-- | ide/coqide.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ide/coqide.ml b/ide/coqide.ml index 5922f1edb..bfbee58ca 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 |