diff --git test/ccommand.test test/ccommand.test
index 06e35eb..e0f9242 100644
--- test/ccommand.test
+++ test/ccommand.test
@@ -34,7 +34,7 @@ test critcl-ccommand-1.0 {ccommand, wrong\#args} -setup {
 } -body {
     critcl::ccommand
 } -cleanup {
-} -returnCodes error -result {wrong # args: should be "critcl::ccommand name anames ..."}
+} -returnCodes error -result {wrong # args: should be "critcl::ccommand name anames ?arg ...?"}
 
 # -------------------------------------------------------------------------
 ## Go through the various knobs we can use to configure the definition and output
diff --git test/cproc.test test/cproc.test
index 13a6d6f..454554a 100644
--- test/cproc.test
+++ test/cproc.test
@@ -36,7 +36,7 @@ test critcl-cproc-1.0 {cproc, wrong\#args} -setup {
 } -body {
     critcl::cproc
 } -cleanup {
-} -returnCodes error -result {wrong # args: should be "critcl::cproc name adefs rtype ?body? ..."}
+} -returnCodes error -result {wrong # args: should be "critcl::cproc name adefs rtype ?body? ?arg ...?"}
 
 # -------------------------------------------------------------------------
 ## Go through the various knobs we can use to configure the definition and output
diff --git test/cproc/2.0 test/cproc/2.0
index 919c469..98258df 100644
--- test/cproc/2.0
+++ test/cproc/2.0
@@ -18,6 +18,6 @@ tcl__aproc0(ClientData cd, Tcl_Interp *interp, int oc, Tcl_Obj *CONST ov[])
   /* Call - - -- --- ----- -------- */
   c__aproc0();
 
-#line 4785 "critcl.tcl"
+#line 4786 "critcl.tcl"
 	return TCL_OK;
 }
diff --git test/cproc/2.1 test/cproc/2.1
index 7b286a4..840fcf7 100644
--- test/cproc/2.1
+++ test/cproc/2.1
@@ -18,6 +18,6 @@ tcl__the_aproc0(ClientData cd, Tcl_Interp *interp, int oc, Tcl_Obj *CONST ov[])
   /* Call - - -- --- ----- -------- */
   c__the_aproc0();
 
-#line 4785 "critcl.tcl"
+#line 4786 "critcl.tcl"
 	return TCL_OK;
 }
diff --git test/cproc/2.2 test/cproc/2.2
index 25a8818..d32df4d 100644
--- test/cproc/2.2
+++ test/cproc/2.2
@@ -18,6 +18,6 @@ tcl__aproc_beta0(ClientData cd, Tcl_Interp *interp, int oc, Tcl_Obj *CONST ov[])
   /* Call - - -- --- ----- -------- */
   c__aproc_beta0();
 
-#line 4785 "critcl.tcl"
+#line 4786 "critcl.tcl"
 	return TCL_OK;
 }
diff --git test/cproc/2.3 test/cproc/2.3
index fa65bc4..fde9cdb 100644
--- test/cproc/2.3
+++ test/cproc/2.3
@@ -17,6 +17,6 @@ snafu(ClientData cd, Tcl_Interp *interp, int oc, Tcl_Obj *CONST ov[])
   /* Call - - -- --- ----- -------- */
   c_snafu();
 
-#line 4785 "critcl.tcl"
+#line 4786 "critcl.tcl"
 	return TCL_OK;
 }
diff --git test/cproc/2.4 test/cproc/2.4
index 719843b..21ffd59 100644
--- test/cproc/2.4
+++ test/cproc/2.4
@@ -18,6 +18,6 @@ tcl__aproc0(ClientData cd, Tcl_Interp *interp, int oc, Tcl_Obj *CONST ov[])
   /* Call - - -- --- ----- -------- */
   c__aproc0(cd);
 
-#line 4785 "critcl.tcl"
+#line 4786 "critcl.tcl"
 	return TCL_OK;
 }
diff --git test/cproc/2.5 test/cproc/2.5
index f342f2c..4dfb5ba 100644
--- test/cproc/2.5
+++ test/cproc/2.5
@@ -18,6 +18,6 @@ tcl__aproc0(ClientData cd, Tcl_Interp *interp, int oc, Tcl_Obj *CONST ov[])
   /* Call - - -- --- ----- -------- */
   c__aproc0();
 
-#line 4785 "critcl.tcl"
+#line 4786 "critcl.tcl"
 	return TCL_OK;
 }
diff --git test/cproc/2.6 test/cproc/2.6
index abf4d4f..e3fe32f 100644
--- test/cproc/2.6
+++ test/cproc/2.6
@@ -18,12 +18,12 @@ tcl__aproc0(ClientData cd, Tcl_Interp *interp, int oc, Tcl_Obj *CONST ov[])
 
   /* (int anargument) - - -- --- ----- -------- */
 	{
-#line 4699 "critcl.tcl"
+#line 4700 "critcl.tcl"
 	if (Tcl_GetIntFromObj(interp, ov[1], &_anargument) != TCL_OK) return TCL_ERROR; }
 
   /* Call - - -- --- ----- -------- */
   c__aproc0(_anargument);
 
-#line 4785 "critcl.tcl"
+#line 4786 "critcl.tcl"
 	return TCL_OK;
 }
diff --git test/cproc/2.7 test/cproc/2.7
index f8c438d..c7e6878 100644
--- test/cproc/2.7
+++ test/cproc/2.7
@@ -21,7 +21,7 @@ tcl__aproc0(ClientData cd, Tcl_Interp *interp, int oc, Tcl_Obj *CONST ov[])
     idx_ = 1;
   if (oc > 1) {
 	{
-#line 4699 "critcl.tcl"
+#line 4700 "critcl.tcl"
 	if (Tcl_GetIntFromObj(interp, ov[idx_], &_anargument) != TCL_OK) return TCL_ERROR; }
     idx_++;
   } else {
@@ -31,6 +31,6 @@ tcl__aproc0(ClientData cd, Tcl_Interp *interp, int oc, Tcl_Obj *CONST ov[])
   /* Call - - -- --- ----- -------- */
   c__aproc0(_anargument);
 
-#line 4785 "critcl.tcl"
+#line 4786 "critcl.tcl"
 	return TCL_OK;
 }
diff --git test/cproc/2.9 test/cproc/2.9
index f11ca08..001a5c8 100644
--- test/cproc/2.9
+++ test/cproc/2.9
@@ -18,7 +18,7 @@ tcl__aproc0(ClientData cd, Tcl_Interp *interp, int oc, Tcl_Obj *CONST ov[])
   /* Call - - -- --- ----- -------- */
   rv = c__aproc0();
 
-#line 4793 "critcl.tcl"
+#line 4794 "critcl.tcl"
 	Tcl_SetObjResult(interp, Tcl_NewIntObj(rv));
 	return TCL_OK;
 }