Changeset 29494

Show
Ignore:
Timestamp:
28.11.2014 20:37:45 (5 years ago)
Author:
sjs49
Message:

Minor changes

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • other-projects/nightly-tasks/diffcol/trunk/task.pl

    r29493 r29494  
    6363my $test_os = $isWin ? "windows" : ($isMac ? "darwin" : "linux"); 
    6464my $model_os = "linux"; # default 
     65 
     66my $debugging = 0; 
    6567 
    6668# TASK_HOME should be the toplevel diffcol folder 
     
    194196                shift @collections; # remove model_os value from array 
    195197                #print STDERR "Model_os specified: $model_os\n"; 
     198            } elsif ($subaction =~ m/\-\-debug/i) {              
     199                $debugging = 1; 
     200                print STDERR "DEBUG MODE\n"; 
    196201            } else { 
    197202                print STDERR "**** Bad subaction/value: ".$ARGV[$i]."\n";  
     
    857862    # help diffcol to know on what os the model cols were generated 
    858863    # and what os this test machine is (on which the test cols will be generated) 
    859     $cmd = "diffcol.pl -testos $test_os -modelos $model_os -output xml -verbosity 10 $collection"; # need to run with ./diffcol.pl if bash script 
     864    my $debug_state = $debugging ? "-debug" : ""; 
     865    $cmd = "diffcol.pl -testos $test_os -modelos $model_os -output xml -verbosity 10 $debug_state $collection"; # need to run with ./diffcol.pl if bash script 
     866     
    860867    &run_diff_script($cmd, $xml_fh, $diffcol_dir); 
    861868