Changeset 3cc480d in tol for toltcl/generic/tolsh.c
- Timestamp:
- Nov 12, 2015, 10:50:39 AM (11 years ago)
- Branches:
- 1941-docker-image-to-test, devel, master
- Children:
- 297e754
- Parents:
- 43da12e
- File:
-
- 1 edited
-
toltcl/generic/tolsh.c (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
toltcl/generic/tolsh.c
r43da12e r3cc480d 30 30 } 31 31 SetupArgv( interp ); 32 Tcl_PkgRequire( interp, "TolshApp", TOLTCL_VERSION, 1); 32 Tcl_VarEval( interp, "lappend", " auto_path", " [file join", 33 " [file dir [file dir ", Tcl_GetNameOfExecutable(), 34 " ] ] lib ]", NULL ); 35 if ( !Tcl_PkgRequire( interp, "TolshApp", TOLTCL_VERSION, 1) ) 36 { 37 printf( "%s\n", Tcl_GetStringResult( interp ) ); 38 Tcl_Exit( -1 ); 39 } 33 40 return TCL_OK; 34 41 }
Note: See TracChangeset
for help on using the changeset viewer.
