Hi Hans, all,

This is a speed patch for the XML attribute parser:

\unprotect
\long\def\doparseXMLarguments#1% space goes ok
  {\if#1>%
     \let\dodoparseXMLarguments\empty
   \else\if#1/%
     \chardef\kindofXMLelement\emptyXMLtag
   \else
     \XMLtoks{#1}%
     \let\dodoparseXMLarguments\dodoparseXMLargumentsX
   \fi\fi%
   \dodoparseXMLarguments}

\def\dodoparseXMLargumentsX#1=#2{%
   \edef\@@XMLname{\the\XMLtoks#1}%
   \@EA\getXMLNSSSS\@@XMLname :\relax
   \XMLtoks\emptytoks
   \if#2"%
     \let\dodoparseXMLarguments\dodoparseXMLargumentsD
   \else
     \let\dodoparseXMLarguments\dodoparseXMLargumentsS
    \fi
   \dodoparseXMLarguments
}

\def\gobblecolon#1:{#1}

\def\getXMLNSSSS#1:#2\relax{%
  \def\testc{#2}%
  \ifx\empty\testc \else
    \edef\@@XMLname{\gobblecolon #2}%
    \XMLnamespacetrue
    \edef\@@XMLspac{#1}%
  \fi
}

\protect

-- 
groeten,

Taco

Reply via email to