1 |
< |
/* Copyright (c) 1990 Regents of the University of California */ |
1 |
> |
/* Copyright (c) 1991 Regents of the University of California */ |
2 |
|
|
3 |
|
#ifndef lint |
4 |
|
static char SCCSid[] = "$SunId$ LBL"; |
247 |
|
int (*f)(); /* direct component coefficient function */ |
248 |
|
char *p; /* data for f */ |
249 |
|
{ |
250 |
+ |
extern int (*trace)(); |
251 |
|
extern double pow(); |
252 |
|
register int sn; |
253 |
|
int nshadcheck, ncnts; |
317 |
|
source[cntord[sn].sno].sflags & SFOLLOW )) { |
318 |
|
/* follow entire path */ |
319 |
|
raycont(&sr); |
320 |
+ |
if (trace != NULL) |
321 |
+ |
(*trace)(&sr); /* trace execution */ |
322 |
|
if (bright(sr.rcol) <= FTINY) |
323 |
|
continue; /* missed! */ |
324 |
|
copycolor(srccnt[cntord[sn].sno].val, sr.rcol); |