3 "{ Package: 'stx:goodies/regression' }"

     1 "{ Package: 'stx:goodies/regression' }"

     4 

     2 

     5 "{ NameSpace: RegressionTests }"

     3 "{ NameSpace: RegressionTests }"

     6 

     4 

     7 TestCase subclass:#NumberTest

     5 TestCase subclass:#NumberTest

    28 

    26 

    29 b:something

    27 b:something

    30     b := something.

    28     b := something.

    31 ! !

    29 ! !

    32 

    30 

    34 

    32 

    35 tearDown

    33 tearDown

    36     Class withoutUpdatingChangesDo:[

    34     Class withoutUpdatingChangesDo:[

    37         self class removeSelector:#testEQ

    35         self class removeSelector:#testEQ

    38     ].

    36     ].