ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/gen/genrev.c
(Generate patch)

Comparing ray/src/gen/genrev.c (file contents):
Revision 1.5 by greg, Wed Mar 7 11:14:40 1990 UTC vs.
Revision 2.2 by greg, Fri Oct 2 16:11:28 1992 UTC

# Line 15 | Line 15 | static char SCCSid[] = "$SunId$ LBL";
15   */
16  
17   #include  <stdio.h>
18 + #include  <math.h>
19  
20 < #define  ZNAME          "Z_"                    /* z function name */
21 < #define  RNAME          "R_"                    /* r function name */
20 > #define  ZNAME          "Z`SYS`"                /* z function name */
21 > #define  RNAME          "R`SYS`"                /* r function name */
22  
23   #define  PI             3.14159265358979323846
24  
# Line 35 | Line 36 | main(argc, argv)
36   int  argc;
37   char  *argv[];
38   {
39 +        extern long     eclock;
40          char  stmp[256];
41          char  *modname;
42          int  smooth = 0;
# Line 43 | Line 45 | char  *argv[];
45          int  i, nseg;
46          int  orient;
47  
48 <        varset("PI", PI);
49 <        funset("hermite", 5, l_hermite);
50 <        funset("bezier", 5, l_bezier);
51 <        funset("bspline", 5, l_bspline);
48 >        varset("PI", ':', PI);
49 >        funset("hermite", 5, ':', l_hermite);
50 >        funset("bezier", 5, ':', l_bezier);
51 >        funset("bspline", 5, ':', l_bspline);
52  
53          if (argc < 6)
54                  goto userror;
55  
56          for (i = 6; i < argc; i++)
57                  if (!strcmp(argv[i], "-e"))
58 <                        scompile(NULL, argv[++i]);
58 >                        scompile(argv[++i], NULL, 0);
59                  else if (!strcmp(argv[i], "-f"))
60                          fcompile(argv[++i]);
61                  else if (!strcmp(argv[i], "-s"))
# Line 62 | Line 64 | char  *argv[];
64                          goto userror;
65  
66          sprintf(stmp, "%s(t)=%s;", ZNAME, argv[3]);
67 <        scompile(NULL, stmp);
67 >        scompile(stmp, NULL, 0);
68          sprintf(stmp, "%s(t)=%s;", RNAME, argv[4]);
69 <        scompile(NULL, stmp);
69 >        scompile(stmp, NULL, 0);
70          nseg = atoi(argv[5]);
71          if (nseg <= 0)
72                  goto userror;
73          modname = smooth ? "Phong" : argv[1];
74  
75          printhead(argc, argv);
76 +        eclock = 0;
77  
78          lastnz = lastnr = 0.0;
79          t = 0.0;
# Line 158 | Line 161 | userror:
161   computen(nzp, nrp, z0, r0, z1, r1)              /* compute normal */
162   double  *nzp, *nrp, z0, r0, z1, r1;
163   {
161        extern double  sqrt();
164          double  dr, dz, len;
165  
166          dz = r0 - r1;                           /* right angle vector */

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines