Lines Matching refs:tclLibPath
38 char tclLibPath[MAX_PATH_LEN], tkLibPath[MAX_PATH_LEN];
43 tclLibPath, MAX_PATH_LEN, 0);
45 if (tclLibPath[0] != '\0') {
46 Tcl_SetVar(interp, "tcl_library", tclLibPath, TCL_GLOBAL_ONLY);
47 Tcl_SetVar(interp, "tclDefaultLibrary", tclLibPath, TCL_GLOBAL_ONLY);
48 Tcl_SetVar(interp, "tcl_pkgPath", tclLibPath, TCL_GLOBAL_ONLY);
51 if (tclLibPath[0] != '\0') {
52 Tcl_SetVar(interp, "tcl_library", tclLibPath, TCL_GLOBAL_ONLY);
53 Tcl_SetVar(interp, "tclDefaultLibrary", tclLibPath, TCL_GLOBAL_ONLY);
54 Tcl_SetVar(interp, "tcl_pkgPath", tclLibPath, TCL_GLOBAL_ONLY);
65 if (tclLibPath[0] != '\0') {
66 pathPtr = Tcl_NewStringObj(tclLibPath, -1);