Re: [Groff] groff data structures

[Chuck Robey]

Tadziu Hoffmann wrote:
>> I need to have [snip] a stack data structure.
> 
> Here's a very rudimentary implementation using strings -- items
> on the stack cannot contain spaces, and no error checking is
> performed, but you get the idea.  If necessary, the macros
> can be generalized to accept the name of the stack string as
> argument (instead of it being hard-coded), so that multiple
> stacks can be handled simultaneously using the same macros.

Excellent!  I need to hunt around and see if it's already somewhere in the code
(maybe someone else has already been smart, and I don;'t want to duplicate) but
if not, I'll add something like this to m.tmac.  That'll *sure* clean up my 
code!

> 
> .\"
> .\" ----------------------------------------------------------------
> .de push
> .ds stack \\$1 \\*[stack]
> ..
> .de pop
> .pop1 \\$1 \\*[stack]
> ..
> .de pop1
> .ds \\$1 \\$2
> .shift 2
> .ds stack \\$*
> ..
> .\" ----------------------------------------------------------------
> .sp 2c
> .push foo
> pushed `foo', stack now contains `\*[stack]'
> .br
> .push xxx
> pushed `xxx', stack now contains `\*[stack]'
> .br
> .push hello
> pushed `hello', stack now contains `\*[stack]'
> .br
> .pop result
> popped `\*[result]', stack now contains `\*[stack]'
> .br
> .push world
> pushed `world', stack now contains `\*[stack]'
> .br
> .pop result
> popped `\*[result]', stack now contains `\*[stack]'
> .br
> .pop result
> popped `\*[result]', stack now contains `\*[stack]'
> .br
> .pop result
> popped `\*[result]', stack now contains `\*[stack]'
> .br
> 
> 
> 
>