ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/Development/ray/src/util/do_file.tcl
(Generate patch)

Comparing ray/src/util/do_file.tcl (file contents):
Revision 2.18 by greg, Wed Feb 16 05:40:12 2005 UTC vs.
Revision 2.19 by greg, Sun Jun 3 20:32:49 2012 UTC

# Line 5 | Line 5
5  
6   proc preen {} {                 # clean up radvar
7          global radvar rifname
8 <        foreach n {objects scene materials illum mkillum render oconv pfilt
8 >        foreach n {objects scene materials illum mkillum render oconv rvu rpict pfilt
9                          RAWFILE ZFILE AMBFILE OPTFILE EXPOSURE ZONE REPORT} {
10                  if {! [info exists radvar($n)]} {
11                          set radvar($n) {}
# Line 85 | Line 85 | proc setradvar stmt {          # assign a rad variable
85                  mki* { eval lappend radvar(mkillum) $vval }
86                  ren* { eval lappend radvar(render) $vval }
87                  oco* { eval lappend radvar(oconv) $vval }
88 +                rvu { eval lappend radvar(rvu) $vval }
89 +                rpi* { eval lappend radvar(rpict) $vval }
90                  pf* { eval lappend radvar(pfilt) $vval }
91                  vi* { lappend radvar(view) $vval }
92                  ZO* { set radvar(ZONE) $vval }

Diff Legend

– Removed lines
+ Added lines
< Changed lines (old)
> Changed lines (new)