Fixed array bound error. Amazing that it worked on a SUN-3

This commit is contained in:
ceriel 1991-09-17 10:39:20 +00:00
parent 1d6a5c84b6
commit d3b2458f24

View file

@ -402,7 +402,8 @@ outtokens() {
for(i=0;i<maxtokensize;i++)
fprintf(ctable,"%d,",typeconv(tp->tk_att[i].ta_type));
fprintf(ctable,"},%d},\t/* ",tp->tk_format);
outfmt(l_strings[tp->tk_format]);
if (tp->tk_format >= 0) outfmt(l_strings[tp->tk_format]);
else fprintf(ctable, "(no format)");
fprintf(ctable," */\n");
}
fprintf(ctable,"{0}};\n\n");