diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2011-05-25 13:35:37 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2011-05-25 13:35:37 (GMT) |
commit | 975d5d10523f82a1726f07c8836051d92f2e68fc (patch) | |
tree | 66985fe8898ea0617e9fdf977923ca63d85c4389 /tests/oo.test | |
parent | 8e276cb91a71c38841daa2c04478e115a1481d15 (diff) | |
download | tcl-975d5d10523f82a1726f07c8836051d92f2e68fc.zip tcl-975d5d10523f82a1726f07c8836051d92f2e68fc.tar.gz tcl-975d5d10523f82a1726f07c8836051d92f2e68fc.tar.bz2 |
Implementation of TIP #381: Call Chain Introspection and Control
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 60d0077..078d888 100644 --- a/tests/oo.test +++ b/tests/oo.test @@ -1524,7 +1524,7 @@ test oo-16.2 {OO: object introspection} -body { } -returnCodes 1 -result {NOTANOBJECT does not refer to an object} test oo-16.3 {OO: object introspection} -body { info object gorp oo::object -} -returnCodes 1 -result {unknown or ambiguous subcommand "gorp": must be class, definition, filters, forward, isa, methods, methodtype, mixins, namespace, variables, or vars} +} -returnCodes 1 -result {unknown or ambiguous subcommand "gorp": must be call, class, definition, filters, forward, isa, methods, methodtype, mixins, namespace, variables, or vars} test oo-16.4 {OO: object introspection} -setup { oo::class create meta { superclass oo::class } [meta create instance1] create instance2 @@ -1646,7 +1646,7 @@ test oo-17.3 {OO: class introspection} -setup { } -result {"foo" is not a class} test oo-17.4 {OO: class introspection} -body { info class gorp oo::object -} -returnCodes 1 -result {unknown or ambiguous subcommand "gorp": must be constructor, definition, destructor, filters, forward, instances, methods, methodtype, mixins, subclasses, superclasses, or variables} +} -returnCodes 1 -result {unknown or ambiguous subcommand "gorp": must be call, constructor, definition, destructor, filters, forward, instances, methods, methodtype, mixins, subclasses, superclasses, or variables} test oo-17.5 {OO: class introspection} -setup { oo::class create testClass } -body { |