/* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
/* def.gen.h version 1.0.1: added ONCE flag */
unsigned gflag
; /* 037: trap type; 040: SEEN flag */
extern struct gen
*fgold
, *ftrap
;
#define newgen() (struct gen *) alloc(sizeof(struct gen))