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

Comparing ray/src/util/do_file.tcl (file contents):
Revision 2.20 by greg, Tue May 26 12:39:25 2015 UTC vs.
Revision 2.22 by greg, Sat Aug 26 16:07:22 2017 UTC

# Line 83 | Line 83 | proc setradvar stmt {          # assign a rad variable
83                  mat* { eval lappend radvar(materials) $vval }
84                  ill* { eval lappend radvar(illum) $vval }
85                  mki* { eval lappend radvar(mkillum) $vval }
86 <                mkp* { eval lappend randvar(mkpmap) $vval }
86 >                mkp* { eval lappend radvar(mkpmap) $vval }
87                  ren* { eval lappend radvar(render) $vval }
88                  oco* { eval lappend radvar(oconv) $vval }
89                  rvu { eval lappend radvar(rvu) $vval }
# Line 124 | Line 124 | proc putradvar {fi vn} {       # print out a rad variable
124                  foreach v $radvar(view) {
125                          puts $fi "view= $v"
126                  }
127 –                return
128 –        }
129 –        if {[lsearch -exact {ZONE QUALITY OCTREE PICTURE AMBFILE OPTFILE
130 –                        EXPOSURE RESOLUTION UP INDIRECT DETAIL PENUMBRAS
131 –                        EYESEP RAWFILE ZFILE VARIABILITY REPORT} $vn] >= 0} {
132 –                puts $fi "$vn= $radvar($vn)"
127                  return
128          }
129          puts -nonewline $fi "$vn="

Diff Legend

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