diff options
| author | notin | 2007-06-21 17:51:01 +0000 |
|---|---|---|
| committer | notin | 2007-06-21 17:51:01 +0000 |
| commit | bf342ae13354b715ac55bab3de8d7aea64c6dc52 (patch) | |
| tree | bce1dde542d42888aeb4f777a4886e9fb8262275 /tools | |
| parent | 079c067667a66411dd8a949659046be4339a65d2 (diff) | |
Correction de 2 bugs mineurs: 1 ligne de debug oubliée dans coqdoc,
et une typo dans Eqdep_deq.v
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@9905 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'tools')
| -rw-r--r-- | tools/coqdoc/pretty.mll | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/tools/coqdoc/pretty.mll b/tools/coqdoc/pretty.mll index a095e9d137..b5098e6918 100644 --- a/tools/coqdoc/pretty.mll +++ b/tools/coqdoc/pretty.mll @@ -461,9 +461,8 @@ and doc_bol = parse | space* section space+ ([^'\n' '*'] | '*'+ [^'\n' ')' '*'])* ('*'+ '\n')? { let eol, lex = strip_eol (lexeme lexbuf) in let lev, s = sec_title lex in -Printf.eprintf "%s %d" s (if eol then 1 else 2); - section lev (fun () -> ignore (doc (from_string s))); - if eol then doc_bol lexbuf else doc lexbuf } + section lev (fun () -> ignore (doc (from_string s))); + if eol then doc_bol lexbuf else doc lexbuf } | space* '-'+ { let n = count_dashes (lexeme lexbuf) in if n >= 4 then rule () else item n; |