PR#5497: source code copy-paste problem with backquote character
git-svn-id: http://caml.inria.fr/svn/ocamldoc/trunk@12145 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02master
parent
0aa5027923
commit
53ae65e944
|
@ -16,17 +16,16 @@
|
|||
\def\@eunderline{\egroup\underline{\box0}}
|
||||
|
||||
{\catcode`'=\active
|
||||
\catcode``=\active
|
||||
\global\def\caml{
|
||||
\bgroup
|
||||
\flushleft
|
||||
\parindent 0pt
|
||||
\parskip 0pt
|
||||
\let\do\@makeother\dospecials
|
||||
\catcode`'=\active
|
||||
\chardef'=13
|
||||
\catcode`\^^M=\active
|
||||
\catcode`\\=0
|
||||
\catcode`\ \active
|
||||
\catcode13=\active % 13 = ^M = CR
|
||||
\catcode92=0 % 92 = \
|
||||
\catcode32=\active % 32 = SPC
|
||||
\frenchspacing
|
||||
\@vobeyspaces
|
||||
\let\@oldpar\par
|
||||
|
@ -36,6 +35,10 @@
|
|||
\let\<\@bunderline
|
||||
\let\>\@eunderline
|
||||
\let\\\@camlbackslash
|
||||
\catcode39=\active % 39 = '
|
||||
\chardef'=13
|
||||
\catcode96=\active % 96 = `
|
||||
\chardef`=18
|
||||
}
|
||||
}
|
||||
|
||||
|
|
|
@ -50,6 +50,7 @@ int main(argc, argv)
|
|||
transl['#'] = "\\#";
|
||||
transl['%'] = "\\%";
|
||||
transl['\''] = "{\\char13}";
|
||||
transl['`'] = "{\\char18}";
|
||||
inverbatim = 0;
|
||||
incaml = 0;
|
||||
inquote = 0;
|
||||
|
|
Loading…
Reference in New Issue