Index: generic/xotcl.c
===================================================================
diff -u -re308078f0e97d3ab61462fa52333f97f32a72ca7 -r9a4096c393b0a94ea8d17f2fef3cdca0f1202fb8
--- generic/xotcl.c	(.../xotcl.c)	(revision e308078f0e97d3ab61462fa52333f97f32a72ca7)
+++ generic/xotcl.c	(.../xotcl.c)	(revision 9a4096c393b0a94ea8d17f2fef3cdca0f1202fb8)
@@ -8528,7 +8528,7 @@
 static int
 XOTclOInfoMethod(ClientData cd, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[]) {
   XOTclObject *obj = (XOTclObject*)cd;
-  Tcl_Namespace *nsp = obj->nsPtr;
+  Tcl_Namespace *nsp;
   char *cmd, *pattern;
   int modifiers = 0;
   XOTclObjectOpt *opt;
@@ -8537,6 +8537,7 @@
   if (objc < 2)
     return XOTclObjErrArgCnt(interp, obj->cmdName, "info <opt> ?args?");
 
+  nsp = obj->nsPtr;
   opt = obj->opt;
   cmd = ObjStr(objv[1]);
   pattern = (objc > 2) ? ObjStr(objv[2]) : 0;