--- stack/stack.h 2002/03/10 08:51:31 1.7 +++ stack/stack.h 2002/03/10 10:06:36 1.9 @@ -35,7 +35,13 @@ list } type:4; /* Type of stack element */ - int gc_garb:1; + union { + struct { + unsigned int mark:1; + unsigned int protect:1; + } flag; + unsigned int no_gc:2; + } gc; union { void *ptr; /* Pointer to the content */ @@ -69,7 +75,6 @@ defined symbols */ typedef struct { stackitem *gc_ref; - stackitem *gc_protect; int gc_limit, gc_count; stackitem *head; /* Head of the stack */ @@ -140,8 +145,8 @@ extern void readline(environment*); extern void sx_72656164(environment*); extern void foreach(environment*); -void protect(environment*, value*); -void unprotect(environment*); +void protect(value*); +void unprotect(value*); extern void copying(environment*); extern void warranty(environment*); extern void sx_2a(environment*);