diff options
| -rw-r--r-- | tools/coqdoc/index.mll | 3 | ||||
| -rw-r--r-- | tools/coqdoc/output.ml | 1 |
2 files changed, 1 insertions, 3 deletions
diff --git a/tools/coqdoc/index.mll b/tools/coqdoc/index.mll index e4d464236a..9daec6b554 100644 --- a/tools/coqdoc/index.mll +++ b/tools/coqdoc/index.mll @@ -407,8 +407,7 @@ and module_refs = parse { module_refs lexbuf } | ident { let id = lexeme lexbuf in - (Printf.eprintf "DEBUG: id = %s\n" id; - try + (try add_mod !current_library (lexeme_start lexbuf) (Hashtbl.find modules id) id with Not_found -> () diff --git a/tools/coqdoc/output.ml b/tools/coqdoc/output.ml index a75b7196d6..a5378e9df1 100644 --- a/tools/coqdoc/output.ml +++ b/tools/coqdoc/output.ml @@ -443,7 +443,6 @@ module Html = struct printf "</span>" end else begin - Printf.eprintf "DEBUG: looking for (%s, %d)\n" !current_module loc; try (match Index.find !current_module loc with | Def (fullid,_) -> |