File kitsh/buildsrc/kitsh-0.0/main.c artifact cac11ec6a8 part of check-in 9374941c5a
#ifndef KITSH_NEED_WINMAIN #include <tcl.h> int TclKit_AppInit(Tcl_Interp *interp); int main(int argc, char **argv) { Tcl_Interp *x; x = Tcl_CreateInterp(); Tcl_Main(argc, argv, TclKit_AppInit); /* If Tcl_Main() returns, something went wrong */ return(1); } #endif