# | Line 225 | Line 225 | if ( $tensortree ) { | |
---|---|---|
225 | my $old_fh = select(STDOUT); | |
226 | $| = 1; | |
227 | select($old_fh); | |
228 | + | print "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n"; |
229 | print "<!-- Created by: genBSDF @savedARGV -->\n"; | |
230 | # print STDERR "Running: $wrapper\n"; | |
231 | system $wrapper; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |