tclsh.c at [4f4058fd40]

File kitdll/buildsrc/kitdll-0.0/tclsh.c artifact 0713d9aa46 part of check-in 4f4058fd40


#ifdef HAVE_STDIO_H
#  include <stdio.h>
#endif

#include <tcl.h>

int Tcl_AppInit(Tcl_Interp *interp) {
	return(Tcl_Init(interp));
}

int main(int argc, char **argv) {
	Tcl_Main(argc, argv, Tcl_AppInit);

	return(1);
}