Index: generic/mk_predefined.xotcl
===================================================================
diff -u -r6ef3475add453ab5c2d62ca807a545bf4bc0686a -r2d07f2bafa5332c5e30f4969b4233d2345eab832
--- generic/mk_predefined.xotcl	(.../mk_predefined.xotcl)	(revision 6ef3475add453ab5c2d62ca807a545bf4bc0686a)
+++ generic/mk_predefined.xotcl	(.../mk_predefined.xotcl)	(revision 2d07f2bafa5332c5e30f4969b4233d2345eab832)
@@ -11,11 +11,10 @@
 regsub -all {"} $content {\"} content             ;#"
 regsub -all "\[ \]+\n" $content \n content        ;# remove trailing space
 regsub -all "\n\[ \t\]+" $content \n content      ;# remove leading space
+while {[regsub -all "\n#\[^\n\]*\n" $content \n content]>0} {
+    ;# remove comment lines
+}
 regsub -all "\n#\[^\n\]*\n" $content \n content   ;# remove comment lines
-regsub -all "\n#\[^\n\]*\n" $content \n content   ;# remove comment lines
-regsub -all "\n#\[^\n\]*\n" $content \n content   ;# remove comment lines
-regsub -all "\n#\[^\n\]*\n" $content \n content   ;# remove comment lines
-regsub -all "\n#\[^\n\]*\n" $content \n content   ;# remove comment lines
 regsub -all "\[\n\]+" $content \n content         ;# remove empty lines
 regsub -all "\n}" $content "}" content            ;# newlines btwn braces
 regsub -all "\n" $content "\\n\"\n\"" content
Index: generic/predefined.h
===================================================================
diff -u -r6ef3475add453ab5c2d62ca807a545bf4bc0686a -r2d07f2bafa5332c5e30f4969b4233d2345eab832
--- generic/predefined.h	(.../predefined.h)	(revision 6ef3475add453ab5c2d62ca807a545bf4bc0686a)
+++ generic/predefined.h	(.../predefined.h)	(revision 2d07f2bafa5332c5e30f4969b4233d2345eab832)
@@ -80,9 +80,7 @@
 ":protected method init args {}\n"
 ":protected method defaultmethod {} {::nx::core::current object}\n"
 ":protected method objectparameter {} {;}}\n"
-"# left to right and should be used in ascending order.\n"
 "::nx::core::forward Object forward ::nx::core::forward %self -per-object\n"
-"# integer or the word end. The positional arguments are evaluated from\n"
 "::nx::core::forward Class  forward ::nx::core::forward %self\n"
 "Class protected object method __unknown {name} {}\n"
 "Object public method alias {-nonleaf:switch -objscope:switch methodName cmd} {\n"