--- ray/src/gen/genrev.c 1990/07/20 14:35:58 1.7 +++ ray/src/gen/genrev.c 1993/11/18 09:33:01 2.3 @@ -15,9 +15,10 @@ static char SCCSid[] = "$SunId$ LBL"; */ #include +#include -#define ZNAME "Z_" /* z function name */ -#define RNAME "R_" /* r function name */ +#define ZNAME "Z`SYS`" /* z function name */ +#define RNAME "R`SYS`" /* r function name */ #define PI 3.14159265358979323846 @@ -44,10 +45,10 @@ char *argv[]; int i, nseg; int orient; - varset("PI", PI); - funset("hermite", 5, l_hermite); - funset("bezier", 5, l_bezier); - funset("bspline", 5, l_bspline); + varset("PI", ':', PI); + funset("hermite", 5, ':', l_hermite); + funset("bezier", 5, ':', l_bezier); + funset("bspline", 5, ':', l_bspline); if (argc < 6) goto userror; @@ -160,7 +161,6 @@ userror: computen(nzp, nrp, z0, r0, z1, r1) /* compute normal */ double *nzp, *nrp, z0, r0, z1, r1; { - extern double sqrt(); double dr, dz, len; dz = r0 - r1; /* right angle vector */ @@ -186,6 +186,7 @@ char *msg; quit(code) +int code; { exit(code); }