Index: library/nx/nx.tcl =================================================================== diff -u -r18d4d9c1a99310c3fb9b2f2bed03e9d59fb30d30 -r0d35d1ccd86f2b72296ff01d0d83747ca1c0de65 --- library/nx/nx.tcl (.../nx.tcl) (revision 18d4d9c1a99310c3fb9b2f2bed03e9d59fb30d30) +++ library/nx/nx.tcl (.../nx.tcl) (revision 0d35d1ccd86f2b72296ff01d0d83747ca1c0de65) @@ -1235,25 +1235,6 @@ proc createBootstrapAttributeSlots {} {} ################################################################## - # create user-level converter/checker based on ::nsf primitves - ################################################################## - - Slot method type=baseclass {name value} { - # note, that we cannot use "nsf::is baseclass ..." here, since nsf::is call this converter - if {![::nsf::isobject $value] || ![::nsf::dispatch $value ::nsf::methods::object::info::is baseclass]} { - error "expected baseclass but got \"$value\" for parameter $name" - } - return $value - } - - Slot method type=metaclass {name value} { - if {![::nsf::isobject $value] || ![::nsf::dispatch $value ::nsf::methods::object::info::is metaclass]} { - error "expected metaclass but got \"$value\" for parameter $name" - } - return $value - } - - ################################################################## # Create a mixin class to overload method "new" such it does not # allocate new objects in ::nx::*, but in the specified object # (without syntactic overhead).