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

Comparing ray/src/rt/data.c (file contents):
Revision 2.30 by greg, Wed Aug 7 05:10:09 2013 UTC vs.
Revision 2.32 by greg, Tue Mar 22 03:56:17 2016 UTC

# Line 38 | Line 38 | static DATARRAY         *dtab[TABSIZ];         /* data array list */
38   static gethfunc headaspect;
39  
40  
41 < extern DATARRAY *
41 > DATARRAY *
42   getdata(                                /* get data array dname */
43          char  *dname
44   )
# Line 46 | Line 46 | getdata(                               /* get data array dname */
46          char  *dfname;
47          FILE  *fp;
48          int  asize=0;
49 <        register int  i, j;
50 <        register DATARRAY  *dp;
49 >        int  i, j;
50 >        DATARRAY  *dp;
51                                                  /* look for array in list */
52          for (dp = dtab[hash(dname)]; dp != NULL; dp = dp->next)
53                  if (!strcmp(dname, dp->name))
# Line 74 | Line 74 | getdata(                               /* get data array dname */
74  
75          if ((dfname = getpath(dname, getrlibpath(), R_OK)) == NULL) {
76                  sprintf(errmsg, "cannot find data file \"%s\"", dname);
77 <                error(USER, errmsg);
77 >                error(SYSTEM, errmsg);
78          }
79          if ((fp = fopen(dfname, "r")) == NULL) {
80                  sprintf(errmsg, "cannot open data file \"%s\"", dfname);
# Line 159 | Line 159 | headaspect(                    /* check string for aspect ratio */
159   }
160  
161  
162 < extern DATARRAY *
162 > DATARRAY *
163   getpict(                                /* get picture pname */
164          char  *pname
165   )
# Line 172 | Line 172 | getpict(                               /* get picture pname */
172          RESOLU  inpres;
173          RREAL  loc[2];
174          int  y;
175 <        register int  x, i;
176 <        register DATARRAY  *pp;
175 >        int  x, i;
176 >        DATARRAY  *pp;
177                                                  /* look for array in list */
178          for (pp = dtab[hash(pname)]; pp != NULL; pp = pp->next)
179                  if (!strcmp(pname, pp->name))
# Line 181 | Line 181 | getpict(                               /* get picture pname */
181  
182          if ((pfname = getpath(pname, getrlibpath(), R_OK)) == NULL) {
183                  sprintf(errmsg, "cannot find picture file \"%s\"", pname);
184 <                error(USER, errmsg);
184 >                error(SYSTEM, errmsg);
185          }
186          if ((pp = (DATARRAY *)malloc(3*sizeof(DATARRAY))) == NULL)
187                  goto memerr;
# Line 258 | Line 258 | readerr:
258   }
259  
260  
261 < extern void
261 > void
262   freedata(                       /* release data array reference */
263          DATARRAY  *dta
264   )
265   {
266          DATARRAY  head;
267          int  hval, nents;
268 <        register DATARRAY  *dpl, *dp;
269 <        register int  i;
268 >        DATARRAY  *dpl, *dp;
269 >        int  i;
270  
271          if (dta == NULL) {                      /* free all if NULL */
272                  hval = 0; nents = TABSIZ;
# Line 295 | Line 295 | freedata(                      /* release data array reference */
295   }
296  
297  
298 < extern double
298 > double
299   datavalue(              /* interpolate data value at a point */
300 <        register DATARRAY  *dp,
300 >        DATARRAY  *dp,
301          double  *pt
302   )
303   {
304          DATARRAY  sd;
305          int  asize;
306          int  lower, upper;
307 <        register int  i;
307 >        int  i;
308          double  x, y0, y1;
309                                          /* set up dimensions for recursion */
310          if (dp->nd > 1) {

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines