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

Comparing src/util/genBSDF.pl (file contents):
Revision 2.95 by greg, Fri Apr 4 18:06:48 2025 UTC vs.
Revision 2.96 by greg, Thu Jun 19 22:03:37 2025 UTC

# Line 257 | Line 257 | if ( $tensortree ) {
257          do_matrix_bsdf();
258   }
259   # Output XML
260 < # print STDERR "Running: $wrapper\n";
260 > print STDERR "Running: $wrapper\n";
261   system "$wrapper -C \"Created by: genBSDF @savedARGV\"";
262   die "Could not wrap BSDF data\n" if ( $? );
263   # Clean up temporary files and exit
264 + exit;
265   exec $rmtmp;
266  
267   #============== End of main program segment ==============#
# Line 291 | Line 292 | sub active_phase {
292   sub run_check {
293          if ( !active_phase() ) { return; }
294          my $cmd = shift;
295 <        # print STDERR "Running: $cmd\n";
295 >        print STDERR "Running: $cmd\n";
296          system $cmd;
297          die "Failure running: $cmd\n" if ( $? );
298   }
# Line 357 | Line 358 | sub do_ttree_dir {
358                  }
359          }
360          if ( $dop ) {
361 <                # print STDERR "Running: $cmd\n";
361 >                print STDERR "Running: $cmd\n";
362                  system $cmd;
363                  die "Failure running rfluxmtx" if ( $? );
364          }
# Line 442 | Line 443 | sub ttree_comp {
443                          open(DATOUT, "> $dest");
444                          print DATOUT "{\n";
445                          close DATOUT;
446 <                        # print STDERR "Running: $cmd\n";
446 >                        print STDERR "Running: $cmd\n";
447                          system "$cmd >> $dest";
448                          die "Failure running rcalc" if ( $? );
449                          open(DATOUT, ">> $dest");
# Line 479 | Line 480 | sub do_matrix_dir {
480          my $sender = ($bsender,$fsender)[$forw];
481          my $cmd = "$rfluxmtx$r -ff $sender $receivers -i $octree";
482          if ( $dop ) {
483 <                # print STDERR "Running: $cmd\n";
483 >                print STDERR "Running: $cmd\n";
484                  system $cmd;
485                  die "Failure running rfluxmtx" if ( $? );
486          }

Diff Legend

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