| 416 |
|
progname, fname, typ); |
| 417 |
|
exit(1); |
| 418 |
|
} |
| 419 |
< |
if (ismodifier(fn)) |
| 420 |
< |
printf("\n%s %s ", nam, typ); |
| 421 |
< |
else |
| 422 |
< |
printf("\n%s %s ", newmod != NULL ? newmod : nam, |
| 423 |
< |
invert ? ofun[tinvers[fn]].funame : typ); |
| 419 |
> |
putchar('\n'); |
| 420 |
> |
if (ismodifier(fn)) { |
| 421 |
> |
fputword(nam, stdout); |
| 422 |
> |
printf(" %s ", typ); |
| 423 |
> |
} else { |
| 424 |
> |
fputword(newmod != NULL ? newmod : nam, stdout); |
| 425 |
> |
printf(" %s ", invert ? ofun[tinvers[fn]].funame : typ); |
| 426 |
> |
} |
| 427 |
|
/* object name */ |
| 428 |
|
fgetword(nam, sizeof(nam), fin); |
| 429 |
|
if (idprefix == NULL || ismodifier(fn)) |
| 430 |
< |
printf("%s\n", nam); |
| 431 |
< |
else |
| 432 |
< |
printf("%s.%s\n", idprefix, nam); |
| 430 |
> |
fputword(nam, stdout); |
| 431 |
> |
else { |
| 432 |
> |
char nnam[MAXSTR]; |
| 433 |
> |
sprintf(nnam, "%s.%s", idprefix, nam); |
| 434 |
> |
fputword(nnam, stdout); |
| 435 |
> |
} |
| 436 |
> |
putchar('\n'); |
| 437 |
|
/* transform arguments */ |
| 438 |
|
if ((*ofun[fn].funp)(fin) < 0) { |
| 439 |
|
fprintf(stderr, "%s: (%s): bad %s \"%s\"\n", |
