9 lines
250 B
Tcl
9 lines
250 B
Tcl
#include <tcl.h>
|
|
Tcl_Interp *interp;
|
|
|
|
int main(int argc, char **argv) {
|
|
Tcl_FindExecutable(argv[0]); /* Initializes library */
|
|
interp = Tcl_CreateInterp(); /* Make an interpreter */
|
|
|
|
/* Rest of contents of main() from task header... */
|
|
}
|