Skip to content
Snippets Groups Projects
Commit a83f0c17 authored by xleroy's avatar xleroy
Browse files

Plus besoin de rectifier les URL invalides

git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@707 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
parent 4c8a550f
No related branches found
No related tags found
No related merge requests found
...@@ -3,12 +3,14 @@ rule process inproof oc = parse ...@@ -3,12 +3,14 @@ rule process inproof oc = parse
{ process true oc lexbuf } { process true oc lexbuf }
| "<span class=\"keyword\">" ("Qed" | "Defined") "</span>" ' '* '.' | "<span class=\"keyword\">" ("Qed" | "Defined") "</span>" ' '* '.'
{ process false oc lexbuf } { process false oc lexbuf }
(*
| "<a class=\"idref\" href=\"" | "<a class=\"idref\" href=\""
[^ '"'] + '#' '"' [^ '\n' '>']* '"' '"' '>' [^ '"'] + '#' '"' [^ '\n' '>']* '"' '"' '>'
([^ '<' '\n']+ as ident) ([^ '<' '\n']+ as ident)
"</a>" "</a>"
{ if not inproof then output_string oc ident; { if not inproof then output_string oc ident;
process inproof oc lexbuf } process inproof oc lexbuf }
*)
| _ | _
{ if not inproof then output_char oc (Lexing.lexeme_char lexbuf 0); { if not inproof then output_char oc (Lexing.lexeme_char lexbuf 0);
process inproof oc lexbuf } process inproof oc lexbuf }
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment