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

Comparing ray/src/util/do_scene3.6.tcl (file contents):
Revision 2.4 by greg, Fri Oct 28 20:14:38 1994 UTC vs.
Revision 2.6 by greg, Tue Dec 6 15:54:43 1994 UTC

# Line 6 | Line 6
6   set myglob(materials) *.mat
7   set myglob(illum) *.rad
8   set myglob(scene) *.rad
9 < set myglob(objects) *.rad
9 > set myglob(objects) *
10  
11   proc newfent f {                # add file to our list
12          global rifname radvar mybox myvar
# Line 56 | Line 56 | proc oct_delete {} {           # delete octree file
56   proc getdepend {} {             # get object dependencies
57          global radvar curmess mybox
58          set curmess "Please wait..."
59 <        update idletasks
59 >        update
60          foreach newf [eval exec raddepend $radvar(illum) $radvar(scene)] {
61                  if {[lsearch -exact $radvar(objects) $newf] < 0} {
62                          lappend radvar(objects) $newf

Diff Legend

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