Changeset 3360 for code/branches/resource/src/cpptcl/cpptcl.cc
- Timestamp:
- Jul 28, 2009, 5:04:38 PM (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
code/branches/resource/src/cpptcl/cpptcl.cc
r3068 r3360 859 859 } 860 860 861 interpreter::interpreter(string const &libpath)862 {863 interp_ = Tcl_CreateInterp();864 owner_ = true;865 866 try867 {868 this->eval("set tcl_library \"" + libpath + "\"");869 Tcl_Init(this->interp_);870 } catch (...) {}871 }872 873 861 interpreter::interpreter(Tcl_Interp *interp, bool owner) 874 862 {
Note: See TracChangeset
for help on using the changeset viewer.