From: cas Date: Fri, 15 Jun 2001 17:55:35 +0000 (+0000) Subject: No comments X-Git-Url: http://git.dev.opencascade.org/gitweb/?a=commitdiff_plain;h=077b58dfb4f1cfe7f874a558cbd7282b7002ca99;p=occt-wok.git No comments --- diff --git a/src/WOKLibs/mscmd.cxx b/src/WOKLibs/mscmd.cxx index 53e45f4..526ab16 100755 --- a/src/WOKLibs/mscmd.cxx +++ b/src/WOKLibs/mscmd.cxx @@ -54,15 +54,8 @@ int Ms_Init(WOKTclTools_PInterp interp) } } -#if defined( WNT ) - WOKTclTools_Package tcl(CurrentInterp, "Tcl", "7.6"); -#elif defined( LIN ) - WOKTclTools_Package tcl(CurrentInterp, "Tcl", "8.0"); -#elif defined( AIX ) - WOKTclTools_Package tcl(CurrentInterp, "Tcl", "8.1"); -#else - WOKTclTools_Package tcl(CurrentInterp, "Tcl", "7.5"); -#endif + WOKTclTools_Package tcl(CurrentInterp, "Tcl", TCL_VERSION ); + tcl.Require(); // MetaSchema Commands diff --git a/src/WOKLibs/wokcmd.cxx b/src/WOKLibs/wokcmd.cxx index 054dc6b..e2f1413 100755 --- a/src/WOKLibs/wokcmd.cxx +++ b/src/WOKLibs/wokcmd.cxx @@ -79,15 +79,7 @@ int Wok_Init(WOKTclTools_PInterp interp) -#if defined( WNT ) - WOKTclTools_Package tcl(CurrentInterp, "Tcl", "7.6"); -#elif defined( LIN ) - WOKTclTools_Package tcl(CurrentInterp, "Tcl", "8.0"); -#elif defined( AIX ) - WOKTclTools_Package tcl(CurrentInterp, "Tcl", "8.1"); -#else - WOKTclTools_Package tcl(CurrentInterp, "Tcl", "7.5"); -#endif + WOKTclTools_Package tcl(CurrentInterp, "Tcl", TCL_VERSION ); tcl.Require();