Planet
navi homePPSaboutscreenshotsdownloaddevelopmentforum

source: code/branches/ggz/src/cpptcl/changes_orxonox.diff @ 5093

Last change on this file since 5093 was 2710, checked in by rgrieder, 16 years ago

Merged buildsystem3 containing buildsystem2 containing Adi's buildsystem branch back to the trunk.
Please update the media directory if you were not using buildsystem3 before.

  • Property svn:eol-style set to native
File size: 1.6 KB
  • cpptcl.cc

     
    320320
    321321          post_process_policies(interp, pol, objv, false);
    322322     }
    323      catch (exception const &e)
     323     catch (std::exception const &e)
    324324     {
    325325          Tcl_SetResult(interp, const_cast<char*>(e.what()), TCL_VOLATILE);
    326326          return TCL_ERROR;
     
    363363
    364364          post_process_policies(interp, pol, objv, true);
    365365     }
    366      catch (exception const &e)
     366     catch (std::exception const &e)
    367367     {
    368368          Tcl_SetResult(interp, const_cast<char*>(e.what()), TCL_VOLATILE);
    369369          return TCL_ERROR;
     
    430430               Tcl_GetString(Tcl_GetObjResult(interp)),
    431431               object_handler, static_cast<ClientData>(chb), 0);
    432432     }
    433      catch (exception const &e)
     433     catch (std::exception const &e)
    434434     {
    435435          Tcl_SetResult(interp, const_cast<char*>(e.what()), TCL_VOLATILE);
    436436          return TCL_ERROR;
     
    858858     owner_ = true;
    859859}
    860860
     861interpreter::interpreter(string const &libpath)
     862{
     863     interp_ =  Tcl_CreateInterp();
     864     owner_ = true;
     865
     866     try
     867     {
     868        this->eval("set tcl_library \"" + libpath + "\"");
     869        Tcl_Init(this->interp_);
     870     } catch (...) {}
     871}
     872
    861873interpreter::interpreter(Tcl_Interp *interp, bool owner)
    862874{
    863875     interp_ =  interp;
  • cpptcl.h

     
    467467{
    468468public:
    469469     interpreter();
     470     interpreter(std::string const &libpath);
    470471     interpreter(Tcl_Interp *, bool owner = true);
    471472     ~interpreter();
    472473     
Note: See TracBrowser for help on using the repository browser.