\starttext \type<<...>> \stoptext
It doesn't seem to see the end delimiter, nikolai
patch for core-ver
\starttext
\unprotect
\def\dodotypeC<#1% normal/slanted <<... <<...>> ...>>
{\initializetype
\verbatimcolor
\if#1<%
[EMAIL PROTECTED]
\else
[EMAIL PROTECTED]
\fi}\bgroup
\catcode`\<=\@@active
\catcode`\>=\@@active
\gdef\setupalternativetypegrouping
{\catcode`\<=\@@active
\catcode`\>=\@@active
\def\doless
{\ifx<\next
\def\next
{\bgroup\switchslantedtype
\let\next=}%
\else
\let\next\lesscharacter
\fi
\next}%
\def\domore
{\ifx>\next
\def\next
{\egroup
\let\next=}%
\else
\let\next\morecharacter
\fi
\next}%
\def<{\futurelet\next\doless}%
\def>{\futurelet\next\domore}}
\egroup\protect
\startTEXpage
normal: \par \type{xx<<..xx..<<xx <<xx>> >>..>>xx} \par \type<<....>> \par \type<<..<<xx>>..>> \par
normal: \par \type{xx<..xx..<xx <slanted> >..>xx} \par \type{<....>} \par \type{<..<xx>..>}
\setuptype[option=slanted]
slanted: \par \type{xx<<..sl..<<xx <<sl>> xx>>..sl..>>xx} \par \type<<..xx..>> \par \type<<..<<sl>>..>> \par
slanted: \par \type{xx<<..sl..<xx <sl> xx>..sl..>>xx} \par \type<<..xx..>> \par \type<<..<sl>..>> \par
\setuptype[option=none]
none: \par \type{xx<<..xx..<<xx <<xx>> >>..>>xx} \par \type<<....>> \par \type<<..<<xx>>..>> \par
\stopTEXpage
\stoptext
----------------------------------------------------------------- Hans Hagen | PRAGMA ADE Ridderstraat 27 | 8061 GH Hasselt | The Netherlands tel: 038 477 53 69 | fax: 038 477 53 74 | www.pragma-ade.com | www.pragma-pod.nl -----------------------------------------------------------------
_______________________________________________ ntg-context mailing list [EMAIL PROTECTED] http://www.ntg.nl/mailman/listinfo/ntg-context
