| 96 |
|
int original; |
| 97 |
|
double f; |
| 98 |
|
int a; |
| 99 |
+ |
|
| 100 |
|
SET_DEFAULT_BINARY(); |
| 101 |
|
SET_FILE_BINARY(stdin); |
| 102 |
|
SET_FILE_BINARY(stdout); |
| 103 |
|
progname = argv[0]; |
| 104 |
+ |
esupport |= E_VARIABLE|E_FUNCTION|E_RCONST; |
| 105 |
+ |
esupport &= ~(E_OUTCHAN|E_INCHAN); |
| 106 |
|
/* scan options */ |
| 107 |
|
for (a = 1; a < argc; a++) { |
| 108 |
|
if (argv[a][0] == '-') |
| 285 |
|
static void |
| 286 |
|
checkfile(void) /* ready a file */ |
| 287 |
|
{ |
| 288 |
< |
register int i; |
| 288 |
> |
int i; |
| 289 |
|
/* process header */ |
| 290 |
|
gotview = 0; |
| 291 |
|
if (echoheader) { |
| 348 |
|
static void |
| 349 |
|
init(void) /* perform final setup */ |
| 350 |
|
{ |
| 351 |
< |
register int i; |
| 351 |
> |
int i; |
| 352 |
|
/* define constants */ |
| 353 |
|
varset("PI", ':', PI); |
| 354 |
|
varset(vnfiles, ':', (double)nfiles); |
| 380 |
|
EPNODE *coldef[3], *brtdef; |
| 381 |
|
COLOR *scanout; |
| 382 |
|
double d; |
| 383 |
< |
register int i, j; |
| 383 |
> |
int i, j; |
| 384 |
|
/* check defined variables */ |
| 385 |
|
for (j = 0; j < 3; j++) { |
| 386 |
|
if (vardefined(vcolout[j])) |
| 437 |
|
advance(void) /* read in data for next scanline */ |
| 438 |
|
{ |
| 439 |
|
int ytarget; |
| 440 |
< |
register COLOR *st; |
| 441 |
< |
register int i, j; |
| 440 |
> |
COLOR *st; |
| 441 |
> |
int i, j; |
| 442 |
|
|
| 443 |
|
for (ytarget = (ypos+.5)*ymax/yres; yscan > ytarget; yscan--) |
| 444 |
|
for (i = 0; i < nfiles; i++) { |
| 507 |
|
|
| 508 |
|
static double |
| 509 |
|
l_colin( /* return color value for picture */ |
| 510 |
< |
register char *nam |
| 510 |
> |
char *nam |
| 511 |
|
) |
| 512 |
|
{ |
| 513 |
|
int fn; |
| 514 |
< |
register int n, xoff, yoff; |
| 514 |
> |
int n, xoff, yoff; |
| 515 |
|
double d; |
| 516 |
|
|
| 517 |
|
d = argument(1); |
| 566 |
|
|
| 567 |
|
static double |
| 568 |
|
l_ray( /* return ray origin or direction */ |
| 569 |
< |
register char *nam |
| 569 |
> |
char *nam |
| 570 |
|
) |
| 571 |
|
{ |
| 572 |
|
static unsigned long ltick[MAXINP]; |
| 575 |
|
RREAL loc[2]; |
| 576 |
|
double d; |
| 577 |
|
int fn; |
| 578 |
< |
register int i; |
| 578 |
> |
int i; |
| 579 |
|
|
| 580 |
|
d = argument(1); |
| 581 |
|
if (d <= -0.5 || d >= nfiles+0.5) { |
| 618 |
|
RREAL locx[2], locy[2]; |
| 619 |
|
double d; |
| 620 |
|
int fn; |
| 621 |
< |
register int i; |
| 621 |
> |
int i; |
| 622 |
|
|
| 623 |
|
d = argument(1); |
| 624 |
|
if (d <= -0.5 || d >= nfiles+0.5) { |
| 675 |
|
extern void |
| 676 |
|
quit(int code) /* exit gracefully */ |
| 677 |
|
{ |
| 678 |
< |
register int i; |
| 678 |
> |
int i; |
| 679 |
|
/* close input files */ |
| 680 |
|
for (i = 0; i < nfiles; i++) |
| 681 |
|
if (input[i].name == Command) |