Index: generic/predefined.h =================================================================== diff -u -r4eafc074cdca60b0089c2a950954c83d519b91d3 -r8cd07ec2847e5ccff9f486950459d72a4d497e8b --- generic/predefined.h (.../predefined.h) (revision 4eafc074cdca60b0089c2a950954c83d519b91d3) +++ generic/predefined.h (.../predefined.h) (revision 8cd07ec2847e5ccff9f486950459d72a4d497e8b) @@ -91,7 +91,8 @@ "if {![$i exists $att]} {::xotcl::setinstvar $i $att $default}}\n" "unset default}}}\n" "createBootstrapAttributeSlots ::xotcl::Class {\n" -"{__default_superclass ::xotcl::Object}}\n" +"{__default_superclass ::xotcl::Object}\n" +"{__default_metaclass ::xotcl::Class}}\n" "createBootstrapAttributeSlots ::xotcl::Slot {\n" "{name \"[namespace tail [::xotcl::self]]\"}\n" "{domain \"[lindex [regexp -inline {^(.*)::slot::[^:]+$} [::xotcl::self]] 1]\"}\n" @@ -202,7 +203,6 @@ "::xotcl::Attribute instproc mk_type_checker {} {\n" "set __initcmd \"\"\n" "if {[::xotcl::my exists type]} {\n" -"puts stderr \"mktypechecker, type=$type\"\n" "::xotcl::my instvar type name\n" "if {[::xotcl::Object isclass $type]} {\n" "set predicate [subst -nocommands {\n"