static struct symbol **sym_hash;
static int allow_new_symbols;
static int cf_lino;
+static int default_counter;
static int cf_hash(byte *c);
static struct symbol *cf_find_sym(byte *c, unsigned int h0);
return s;
}
+struct symbol *
+cf_default_name(char *prefix)
+{
+ char buf[32];
+ struct symbol *s;
+
+ do
+ {
+ sprintf(buf, "%s%d", prefix, default_counter++);
+ s = cf_find_sym(buf, cf_hash(buf));
+ if (!s) cf_error("Unable to generate default name");
+ }
+ while (s->class != SYM_VOID);
+ return s;
+}
+
void
cf_lex_init(int flag)
{
if (allow_new_symbols = flag)
sym_hash = mp_allocz(cfg_mem, SYM_HASH_SIZE * sizeof(struct keyword *));
cf_lino = 1;
+ default_counter = 1;
}
void
};
#define SYM_VOID 0
+#define SYM_PROTO 1
void cf_lex_init_tables(void);
int cf_lex(void);
void cf_lex_init(int flag);
void cf_error(char *msg) NORET;
void cf_allocate(void);
+struct symbol *cf_default_name(char *prefix);
/* Parser */