diff options
| author | dgp <dgp@users.sourceforge.net> | 2019-04-17 16:32:53 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2019-04-17 16:32:53 (GMT) |
| commit | d227a324cdc79a735085101a912633df0541c4b9 (patch) | |
| tree | 5cf370c042fd1d7b851f82eefbb69bb12cfeda73 /tests/oo.test | |
| parent | 12486f233fe3dee8ac48f4ec6c7c2bb1ea798c88 (diff) | |
| download | tcl-d227a324cdc79a735085101a912633df0541c4b9.zip tcl-d227a324cdc79a735085101a912633df0541c4b9.tar.gz tcl-d227a324cdc79a735085101a912633df0541c4b9.tar.bz2 | |
Duplicate test names.
Diffstat (limited to 'tests/oo.test')
| -rw-r--r-- | tests/oo.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/oo.test b/tests/oo.test index b0c5570..c8f4b21 100644 --- a/tests/oo.test +++ b/tests/oo.test @@ -2549,7 +2549,7 @@ test oo-16.17 {OO: object introspection: creationid #500} -body { test oo-16.18 {OO: object introspection: creationid #500} -body { info object creationid } -returnCodes error -result {wrong # args: should be "info object creationid objName"} -test oo-16.18 {OO: object introspection: creationid #500} -body { +test oo-16.18.1 {OO: object introspection: creationid #500} -body { info object creationid oo::object gorp } -returnCodes error -result {wrong # args: should be "info object creationid objName"} test oo-16.19 {OO: object introspection: creationid #500} -setup { @@ -4095,7 +4095,7 @@ test oo-32.6 {TIP 516: slots - class test} -setup [SampleSlotSetup { } -cleanup [SampleSlotCleanup { rename sampleSlot {} }] -result {0 {} {g h i a b c} {1 Resolve g 1 Resolve h 1 Resolve i 1 Get 1 Set {g h i a b c}}} -test oo-32.6 {TIP 516: slots - class test} -setup [SampleSlotSetup { +test oo-32.7 {TIP 516: slots - class test} -setup [SampleSlotSetup { SampleSlot create sampleSlot }] -body { list [info level] [sampleSlot -remove c a] \ |