Index: xotcl/generic/xotclDecls.h
===================================================================
diff -u -r37995b61f3522a362600738a765a4b38549e0a25 -rbb3c756fb47517596b9dbcb4e580aa1212827b41
--- xotcl/generic/xotclDecls.h	(.../xotclDecls.h)	(revision 37995b61f3522a362600738a765a4b38549e0a25)
+++ xotcl/generic/xotclDecls.h	(.../xotclDecls.h)	(revision bb3c756fb47517596b9dbcb4e580aa1212827b41)
@@ -110,7 +110,8 @@
 				Tcl_Obj * cmdname, char * arglist));
 /* 27 */
 EXTERN int		XOTclErrBadVal _ANSI_ARGS_((Tcl_Interp * in, 
-				char * expected, char * value));
+			        char *context,
+				char *expected, char * value));
 /* 28 */
 EXTERN int		XOTclObjErrType _ANSI_ARGS_((Tcl_Interp * in, 
 				Tcl_Obj * nm, char* wt));
@@ -170,7 +171,7 @@
     int (*xOTclVarErrMsg) _ANSI_ARGS_(TCL_VARARGS(Tcl_Interp *,in)); /* 24 */
     int (*xOTclErrInProc) _ANSI_ARGS_((Tcl_Interp * in, Tcl_Obj* objName, Tcl_Obj* clName, char* procName)); /* 25 */
     int (*xOTclObjErrArgCnt) _ANSI_ARGS_((Tcl_Interp * in, Tcl_Obj * cmdname, char * arglist)); /* 26 */
-    int (*xOTclErrBadVal) _ANSI_ARGS_((Tcl_Interp * in, char * expected, char * value)); /* 27 */
+  int (*xOTclErrBadVal) _ANSI_ARGS_((Tcl_Interp * in, char *context, char *expected, char * value)); /* 27 */
     int (*xOTclObjErrType) _ANSI_ARGS_((Tcl_Interp * in, Tcl_Obj * nm, char* wt)); /* 28 */
     void (*xOTclStackDump) _ANSI_ARGS_((Tcl_Interp* in)); /* 29 */
     void (*xOTclCallStackDump) _ANSI_ARGS_((Tcl_Interp* in)); /* 30 */