/*
- * $Id: tclmain.c,v 1.1 1996/08/06 14:04:22 adam Exp $
+ * $Id: tclmain.c,v 1.2 1998/10/15 12:31:04 adam Exp $
*/
#include "tclrobot.h"
return TCL_ERROR;
}
- if (TclRobot_Init(interp) == TCL_ERROR) {
+ if (Tclrobot_Init(interp) == TCL_ERROR) {
return TCL_ERROR;
}
- Tcl_StaticPackage(interp, "TclRobot", TclRobot_Init,
+ Tcl_StaticPackage(interp, "TclRobot", Tclrobot_Init,
(Tcl_PackageInitProc *) NULL);
/*