]> OCCT Git - occt-wok.git/commitdiff
No comments
authorcas <cas@opencascade.com>
Fri, 15 Jun 2001 17:55:35 +0000 (17:55 +0000)
committercas <cas@opencascade.com>
Fri, 15 Jun 2001 17:55:35 +0000 (17:55 +0000)
src/WOKLibs/mscmd.cxx
src/WOKLibs/wokcmd.cxx

index 53e45f400ebe397fb659c6ef53ae22e21eeb359d..526ab16deb9e7fa1a79ed8620c48f6523b04fcfa 100755 (executable)
@@ -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
index 054dc6bb50d504eeaf1890520e375324448b3165..e2f14133b485368b399af7969cf5ee3d474aa55a 100755 (executable)
@@ -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();