Re: Using LateX packages

[Holger Peters <mailanholgerpeters@web.de>]

Hi,

thanks, that's a good start for me.

-- Holger

h h extern wrote:

> Holger Peters wrote:
>
>> Hi,
>>
>> I want to use a LaTeX Package (clrscode), or at least I want to port 
>> it to Context.
>>
>> http://www.cs.dartmouth.edu/~thc/clrscode/
>
>
> hm, not complex but mostly calls to latex font switches ans such
>
>> Is there some way to use LaTex Packages (I guess not).
>
>
> so you need to rewrite it
>
>> Is there documentation about writing ConTeXt modules? (I didn't find 
>> any).
>
>
> - try to use high level constructs (or ask me to provide them -)
> - only use low level macroe documented in syst-*.tex and supp-*.tex 
> (the ones mentioned in \macros, not the \dododo things)
> - think fresh, forget about how other packages do it, think about what 
> *you* want / need
> - user modules are prefixed with t- (m- x- p- and s- are reserved for 
> core modules and styles)
>
> Now, about your code beautifier. Since you end up with additional 
> markup anyway, why not go XML. You can then embed that in you tex 
> document as usual (and have the full power of context available) but 
> also use the code in webpages.
>
> To give you an idea:
>
> \starttext
>
> \long\def\startcode#1\stopcode
>  {\begingroup
>   \startXMLmapping[code]%
>   \enableXML\scantokens{#1}%
>   \stopXMLmapping
>   \endgroup}
>
> \newcount\codedepth
> \newdimen\codeindent \codeindent=1em
>
> \def\incrementcodedepth
>   {\advance\codedepth\plusone
>    \ifnum\codedepth>\plusone \advance\leftskip\codeindent \fi
>    \relax}
>
> \def\decrementcodedepth
>   {\ifnum\codedepth>\plusone \advance\leftskip-\codeindent \fi
>    \advance\codedepth\minusone
>    \relax}
>
> \defineregister[function][functions]
> \setupregister[function][expansion=yes]
>
> \startXMLmapping[code]
>
>   \defineXMLsingular [if]   {\endgraf{\bf if}\incrementcodedepth}
>   \defineXMLsingular [then] {{\bf then}\endgraf\incrementcodedepth}
>   \defineXMLsingular [else] {\endgraf\decrementcodedepth{\bf 
> else}\endgraf\incrementcodedepth}
>   \defineXMLsingular [end]  {\endgraf{\bf 
> end}\decrementcodedepth\endgraf}
>
>   \defineXMLsingular [int]  {{\bf int}\space\ignorespaces}
>   \defineXMLsingular [bool] {{\bf bool}\space\ignorespaces}
>
>   \defineXMLsingular [var]  [id='x'] {{\tf \XMLop{id}}}
>
>   \defineXMLenvironment [function] [id=unknown]
>     {\endgraf\function{\XMLop{id}}{\bf 
> function}\space{\sl\XMLop{id}}\space}
>     {\endgraf\incrementcodedepth}
>
>   \defineXMLenvironment [return]
>     {{\bf return}\space}
>     {\endgraf}
>
>   \defineXMLenvironment [c]
>     {\bgroup\setups{code:comment}\type{//* }\ignorespaces}
>     {\removeunwantedspaces\type{ *//}\egroup\endgraf}
>
> \stopXMLmapping
>
> \startsetups [code:comment]
>
>   \defineXMLsingular [var]  [id='x'] {{\bs \XMLop{id}}}
>
> \stopsetups
>
> \startcode
> <function id='ExampleFunction'>(<bool/> i; <int/> j)</function>
>     <if/> (i&lt;10) <then/>
>        <c>Let's add some comment here. Well, <var id='a'/> means 
> nothing to me.</c>
>        <var id='a'/> := 3
>     <else/>
>        <c>This is a funny language, a kind of mixture.</c>
>        <var id='a'/> := 1
>     <end/>
>     <return>a</return>
> <end/>
> \stopcode
>
> \blank[3*big]\placeregister[function][criterium=all]
>
> \stoptext
>
> If there is interest in such a module, i can write the auxiliary 
> macros needed for it and others can define the languages.
>
> Hans
>
> -----------------------------------------------------------------
>                                           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
> ntg-context@ntg.nl
> http://www.ntg.nl/mailman/listinfo/ntg-context
>