Index: tests/object-system.test =================================================================== diff -u -N -r5c37eb1cd2b674337c60deeef1ecef4b663fa5ce -re884c2b0d63fa1b5a691e866ccff8d4094a2a8e4 --- tests/object-system.test (.../object-system.test) (revision 5c37eb1cd2b674337c60deeef1ecef4b663fa5ce) +++ tests/object-system.test (.../object-system.test) (revision e884c2b0d63fa1b5a691e866ccff8d4094a2a8e4) @@ -11,8 +11,8 @@ set r [uplevel $cmd] if {$msg eq ""} {set msg $cmd} if {$r ne $expected} { - puts stderr "ERROR $msg returned '$r' ne '$expected'" - error "FAILED $msg returned '$r' ne '$expected'" + #puts stderr "ERROR $msg returned '$r' ne '$expected'" + error "FAILED $msg returned\n'$r' ne\n'$expected'" } else { puts stderr "OK $msg" } @@ -215,7 +215,7 @@ ? {X info parameter definition x} {{-x 1}} ? {X info parameter definition y} {{-y 2}} ? {X info properties} {{x 1} {y 2}} -? {X info properties -closure *a*} {volatile:alias,noarg,noaccessor class:class,alias,method=::nsf::methods::object::class,noaccessor} +? {X info properties -closure *a*} {volatile:alias,noarg class:class,alias,method=::nsf::methods::object::class} # actually, we want c1 to test below the recreation of c1 in another # object system