Index: src/tclx/src/tclxproc.c
--- src/tclx/src/tclxproc.c.orig
+++ src/tclx/src/tclxproc.c
@@ -91,6 +91,7 @@ Tcl_ExeclCmd (clientData, interp, argc, argv)
         return TCL_ERROR;
     }
 
+    /*NOTREACHED*/
 }
 
 /*
