Index: tests/info-variable.test =================================================================== diff -u -r45e24b34c85bf0fc3e14db5250550100bd07ff31 -rdc9120981daa00d27f8639ea98a71efc2078e0e8 --- tests/info-variable.test (.../info-variable.test) (revision 45e24b34c85bf0fc3e14db5250550100bd07ff31) +++ tests/info-variable.test (.../info-variable.test) (revision dc9120981daa00d27f8639ea98a71efc2078e0e8) @@ -34,15 +34,14 @@ "-age:integer -name -volatile:alias,slot=::nx::Object::slot::volatile,slotassign,noarg --noinit:alias,method=::nsf::methods::object::noinit,noarg -object-mixin:mixinreg,alias,method=::nx::Object::slot::__object::mixin,0..n -class:class,alias,method=::nsf::methods::object::class -object-filter:filterreg,alias,method=::nx::Object::slot::__object::filter,0..n __initblock:cmd,optional,noleadingdash" ? {Person info configure parameters age} "-age:integer" ? {Person info configure parameters {*a[gs]*}} "-age:integer -class:class,alias,method=::nsf::methods::object::class" - ? {Person info configure syntax} "/::Person/ ?-age /integer/? ?-name /value/? ?-volatile? ?-noinit? ?-object-mixin /mixinreg .../? ?-class /class/? ?-object-filter /filterreg .../? ?/__initblock/?" + ? {Person info configure syntax} "/::Person/ ?-age /integer/? ?-name /value/? ?-volatile? ?-object-mixin /mixinreg .../? ?-class /class/? ?-object-filter /filterreg .../? ?/__initblock/?" ? {Person info method parameters foo} {-force:switch age:integer {name ""}} ? {Person info method parameters foo force} "-force:switch" @@ -52,7 +51,7 @@ ? {Person info parameter syntax -force:switch} "?-force?" ? {Person info parameter name "a b"} "a" - ? {lmap p [Person info configure parameters] {nsf::parameter::get default $p}} "0 0 0 0 0 0 0 0" + ? {lmap p [Person info configure parameters] {nsf::parameter::get default $p}} "0 0 0 0 0 0 0" ? {lmap p [Person info method parameters foo] {nsf::parameter::get default $p}} "1 0 1" nx::Class create Bar { @@ -72,11 +71,11 @@ } ? {lmap p [Foo info configure parameters] {nsf::parameter::get name $p}} \ - "i a b p volatile noinit object-mixin class object-filter __initblock" + "i a b p volatile object-mixin class object-filter __initblock" ? {lmap p [Foo info configure parameters] {nsf::parameter::get default $p}} \ - "0 0 1 1 0 0 0 0 0 0" + "0 0 1 1 0 0 0 0 0" ? {lmap p [Foo info configure parameters] {nsf::parameter::get type $p}} \ - "{} integer integer {} {} {} mixinreg class filterreg {}" + "{} integer integer {} {} mixinreg class filterreg {}" ? {join [lsort [::Foo info slots]] \n} \ "::Foo::slot::____Foo.p @@ -108,7 +107,6 @@ ::Foo::slot::q ::nx::Object::slot::__initblock ::nx::Object::slot::class -::nx::Object::slot::noinit ::nx::Object::slot::object-filter ::nx::Object::slot::object-mixin ::nx::Object::slot::volatile"