2 * (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
3 * See the copyright notice in the ACK home directory, in the file "Copyright".
5 /* $Id: stack.str,v 1.4 1994/06/27 08:02:33 ceriel Exp $ */
6 /* IDENTIFIER STACK DEFINITIONS */
8 /* The identifier stack is implemented as a stack of sets.
9 The stack is implemented by a doubly linked list,
10 the sets by singly linked lists.
14 /* struct stack_level *next; */
15 struct stack_level *sl_next; /* upward link */
16 struct stack_level *sl_previous; /* downward link */
17 struct stack_entry *sl_entry; /* sideward link */
18 arith sl_local_offset; /* @ for first coming object */
19 arith sl_max_block; /* maximum size of sub-block */
23 /* ALLOCDEF "stack_level" 5 */
26 struct stack_entry *next;
30 /* ALLOCDEF "stack_entry" 50 */
32 extern struct stack_level *local_level;
33 extern struct stack_level *stack_level_of();