3254 |
/* Piggyback on this loop to initialize precision[N]. */ |
/* Piggyback on this loop to initialize precision[N]. */ |
3255 |
precision[n] = -1; |
precision[n] = -1; |
3256 |
} |
} |
3257 |
|
precision[nargs] = -1; |
3258 |
|
|
3259 |
CHECK_STRING (args[0]); |
CHECK_STRING (args[0]); |
3260 |
/* We may have to change "%S" to "%s". */ |
/* We may have to change "%S" to "%s". */ |
3278 |
|
|
3279 |
/* Allocate the info and discarded tables. */ |
/* Allocate the info and discarded tables. */ |
3280 |
{ |
{ |
3281 |
int nbytes = nargs * sizeof *info; |
int nbytes = (nargs+1) * sizeof *info; |
3282 |
int i; |
int i; |
3283 |
info = (struct info *) alloca (nbytes); |
info = (struct info *) alloca (nbytes); |
3284 |
bzero (info, nbytes); |
bzero (info, nbytes); |
3285 |
for (i = 0; i < nargs; i++) |
for (i = 0; i <= nargs; i++) |
3286 |
info[i].start = -1; |
info[i].start = -1; |
3287 |
discarded = (char *) alloca (SBYTES (args[0])); |
discarded = (char *) alloca (SBYTES (args[0])); |
3288 |
bzero (discarded, SBYTES (args[0])); |
bzero (discarded, SBYTES (args[0])); |