摘要： #include <stdio.h>#include <tcl.h>main (int argc, char *argv[]) { Tcl_Interp *myinterp; int status; printf ("Your Tcl Program will run ... \n"); myinterp = Tcl_CreateInterp(); status = Tcl_EvalFile(myinterp,argv[1]); printf ("Your Tcl Program has completed\n");} 阅读全文