Index: library/lib/xotcl1.xotcl
===================================================================
diff -u -r1961a3b409a34f36625d8b51a94533d49867f1f3 -rf6be3f63eadda89d7f419a090d86669c6be84c3b
--- library/lib/xotcl1.xotcl	(.../xotcl1.xotcl)	(revision 1961a3b409a34f36625d8b51a94533d49867f1f3)
+++ library/lib/xotcl1.xotcl	(.../xotcl1.xotcl)	(revision f6be3f63eadda89d7f419a090d86669c6be84c3b)
@@ -264,7 +264,7 @@
     } {
       set methodtype all
       if {$nocmds} {set methodtype scripted}
-      if {$noprocs} {if {$nocmds} {return ""}; set methodtype compiled}
+      if {$noprocs} {if {$nocmds} {return ""}; set methodtype system}
       set cmd [list ::xotcl::cmd::ObjectInfo::methods $o -methodtype $methodtype]
       if {$incontext} {lappend cmd -incontext}
       if {[::info exists pattern]} {lappend cmd $pattern}