| # | 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 |