| # | Line 36 | Line 36 | XF *bx; | |
|---|---|---|
| 36 | extern double l_arg(); | |
| 37 | extern long eclock; | |
| 38 | static char *initfile = "rayinit.cal"; | |
| 39 | + | static long lastrno = -1; |
| 40 | + | /* check to see if already set */ |
| 41 | + | if (m == fobj && r->rno == lastrno) |
| 42 | + | return; |
| 43 | /* initialize if first call */ | |
| 44 | if (initfile != NULL) { | |
| 45 | loadfunc(initfile); | |
| # | Line 61 | Line 65 | XF *bx; | |
| 65 | copystruct(&funcxf, &r->rox->b); | |
| 66 | else | |
| 67 | copystruct(&funcxf, bx); | |
| 68 | + | lastrno = r->rno; |
| 69 | eclock++; /* notify expression evaluator */ | |
| 70 | } | |
| 71 | ||
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |