🚀 go-pugleaf

Pour imprimer une ou deux docs, j'ai fait �a... C'est basique, C'est
incomplet, �a pourrait �tre compl�tement en TeX (latex n'est l� que parce
que les environnement y sont d�j� fait...)

En gros, C'est un fichier latex qui bidouille un peu pour lire du HTML
directement. Pour que les TAGs <TOTO> et </TOTO> fassent quelque chose, il
faut d�finir les commandes 
\TOTO
et
\/TOTO

Il ignore superbement tout ce qui ressemble � une option, mais il devrait
�tre possible d'en faire qq chose.

Dans l'etat actuel, ca devrait pouvoir servir pour imprimer des docs.


--------------------------COUPER SELON LE POINTILLE -8<---------------------

%%%%
%%%% S. Rosmorduc 1995
%%%% 

\documentstyle{article}
\begin{document}

\def\lt{$<$}
\def\gt{$>$}

\catcode`\<=\active
\chardef\letter=11
\catcode`\/=\letter


\newif\ifspace
\spacefalse

\def<{\catcode` =\letter\begincrochet}
\def\begincrochet#1>{\spacefalse\findspace#1\end\ifspace\traitespace #1>\catcode` =10\else\catcode` =10\def\commande{\csname #1\endcsname}\fi\commande}

\def\findspace#1{\ifx#1\end\let\next=\relax\else\if#1\space\spacetrue\let\next=\gobblespaces\else\let\next=\findspace\fi\fi\next}
\def\traitespaceI#1#2{\def\commande{\csname #1\endcsname}\message{^^J#2 lu}\message{^^JTAG #1^^J}}
\def\gobblespaces#1\end{}

\def\lire#1{\input #1}

\catcode`\&=\active
\def&#1;{\csname #1\endcsname}

\def\Hi{\par\bgroup\noindent\bf}
\def\/Hi{\egroup\hfil\break\vskip1ex}

%%%% LES DEUX LIGNES SUIVANTES NE FONTIONNENT PAS
%\def\Hi{\section\}
%\def\/Hi{\endsectiontitre}

%% PRE -> quotation + \tt (pas de caracteres speciaux)
\def\PRE{\par\begin{quotation}\tt\obeylines}
\def\/PRE{\end{quotation}}
\def\pre{\par\begin{quotation}\tt\obeylines}
\def\/pre{\end{quotation}}

\def\POEM{\begin{verse}\obeylines}
\def\/POEM{\end{verse}}

%%% LES PARAGRAPHES

\let\p=\par
\let\P=\par

\catcode` =\letter
\def\traitespace#1 #2>{\traitespaceI{#1}{#2}}



%%% A PEU PRES TOUT DEVIENT UNE LETTRE
\catcode` =10
\catcode`\^^M=10

\catcode`1=\letter
\catcode`2=\letter
\catcode`3=\letter
\catcode`4=\letter
\catcode`5=\letter
\catcode`6=\letter
\catcode`7=\letter
\catcode`8=\letter
\catcode`9=\letter
\catcode`0=\letter

\let\H1=\Hi
\let\/H1=\/Hi
\let\H2=\Hi
\let\/H2=\/Hi
\let\H3=\Hi
\let\/H3=\/Hi
\let\TITLE=\Hi
\let\/TITLE=\/Hi

\let\h1=\Hi
\let\/h1=\/Hi
\let\h2=\Hi
\let\/h2=\/Hi
\let\h3=\Hi
\let\/h3=\/Hi
\let\title=\Hi
\let\/title=\/Hi

%% LES CARACTERES SPECIAUX. IL EN MANQUE !!!!
\catcode`\(=\letter
\catcode`\)=\letter
\catcode`\.=\letter
\catcode`\$=\letter
\catcode`\^=\letter
\catcode`\_=\letter
\catcode`\#=\letter
\catcode`\\=\letter

<!-- noter la facon dont les commandes tex peuvent etre appelees -->
%<tracingall>

<sloppy>

%<tracingall>

<!-- et la je lis tranquillement mon fichier html -->

<lire>{gentle.html}

<end>{document}

--

Serge Rosmorduc,

       	          rosmord@lifac1.ens-cachan.fr
lifac
ENS de Cachan
61, avenue du Pr\'esident Wilson
94235 Cachan Cedex
tel (16 1) 47 40 24 93
fax (16 1) 47 40 24 64
http://weblifac.ens-cachan.fr/Portraits/S.ROSMORDUC