X-Git-Url: http://wien.tomnetworks.com/gitweb/?p=uebersetzerbau-ss10.git;a=blobdiff_plain;f=codeb%2Fsymtable.c;h=89db8c0e316fe04d3acdb0ad5fdab473f26cbdfc;hp=47762405fad1f69f1da306b6ec9a37da155452f7;hb=7e2296760212c13df37d53f941e8abd980a069c2;hpb=8fda85129bc4f0aaf59823492421c00d4bb5b3c9 diff --git a/codeb/symtable.c b/codeb/symtable.c index 4776240..89db8c0 100644 --- a/codeb/symtable.c +++ b/codeb/symtable.c @@ -35,10 +35,13 @@ struct symbol *tab_add_symbol(struct symbol *tab, char *ident, short type, short fprintf(stderr, "tab_add_symbol: tab(%08X), ident(%s), type(%i), check(%i), param_index(%i), soffset(%i)\n", tab, ident, type, check, param_index, soffset); #endif +#if 0 + /* kann statt return -3, -4 verursachen... (z.b. codea_ag_snafu_01.3) */ if(param_index >= 6) { fprintf(stderr, "eine methode hat zu viele parameter (max. 6 inkl. this erlaubt)\n"); exit(4); } +#endif if(tab_lookup(tab, ident, type) != SYMNULL || (type == S_VAR && tab_lookup(tab, ident, S_PARM) != SYMNULL)) { if(check) {