[ViewVC] Diff of: radiance/ray/src/util/do

Comparing ray/src/util/do_file.tcl (file contents):
Revision 2.19 by greg, Sun Jun 3 20:32:49 2012 UTC vs.
Revision 2.20 by greg, Tue May 26 12:39:25 2015 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 rvu rpict pfilt
9	<	RAWFILE ZFILE AMBFILE OPTFILE EXPOSURE ZONE REPORT} {
8	>	foreach n {objects scene materials illum mkillum mkpmap render oconv rvu rpict pfilt
9	>	RAWFILE ZFILE AMBFILE PGMAP PCMAP OPTFILE EXPOSURE ZONE REPORT} {
10		if {! [info exists radvar($n)]} {
11		set radvar($n) {}
12		}
#	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 }
87		ren* { eval lappend radvar(render) $vval }
88		oco* { eval lappend radvar(oconv) $vval }
89		rvu { eval lappend radvar(rvu) $vval }
#	Line 106 \| Line 107 \| proc setradvar stmt { # assign a rad variable
107		REP* { set radvar(REPORT) $vval }
108		RAW* { set radvar(RAWFILE) $vval }
109		ZF* {set radvar(ZFILE) $vval }
110	+	PGM* {set radvar(PGMAP) $vval }
111	+	PCM* {set radvar(PCMAP) $vval }
112		}
113
114		}

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