Changeset 2054 for trunk/tester


Ignore:
Timestamp:
Jan 19, 2011 6:54:30 PM (9 years ago)
Author:
braffert
Message:

Regression tester: adding tabs to view heirarchy of inputs and outputs for each test

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/tester/testview.tcl

    r2053 r2054  
    3737    protected method showDescription {text}
    3838    protected method showStatus {text}
    39     protected method updateResults {args}
    40     protected method updateInputs {args}
    41     protected method updateOutputs {args}
     39    protected method updateResults {}
     40    protected method updateInputs {}
     41    protected method updateOutputs {}
    4242
    4343}
     
    123123# ----------------------------------------------------------------------
    124124# When the -test configuration option is modified, update the display
    125 # accordingly.  The data passed in should be a Test object, or the
    126 # empty string to clear the display.
     125# accordingly.  The data passed in should be a Test object, or an empty
     126# string to clear the display.
    127127# ----------------------------------------------------------------------
    128128itcl::configbody Rappture::Tester::TestView::test {
    129129    set test $itk_option(-test)
    130     # Data array is empty for branch nodes.
    131     if {$test != ""} {
     130    # If an empty string is passed in then clear everything
     131    if {$test == ""} {
     132        reset
     133    } else {
    132134        if {![$test isa Test]} {
    133135            error "-test option must be a Test object.  $test was given."
     
    150152        }
    151153        showDescription $descr
    152     } else {
    153        # Clear everything if branch node selected
    154        reset
    155154    }
    156155}
     
    219218}
    220219
    221 itcl::body Rappture::Tester::TestView::updateInputs {args} {
     220itcl::body Rappture::Tester::TestView::updateInputs {} {
    222221    $itk_component(inputs) delete 0
    223222    set test $itk_option(-test)
     
    231230}
    232231
    233 itcl::body Rappture::Tester::TestView::updateOutputs {args} {
     232itcl::body Rappture::Tester::TestView::updateOutputs {} {
    234233    $itk_component(outputs) delete 0
    235234    set test $itk_option(-test)
Note: See TracChangeset for help on using the changeset viewer.