From 1f9ff03902b7761e7212ad9c20287c2c911e0e96 Mon Sep 17 00:00:00 2001 From: cas Date: Thu, 22 Jun 2000 09:05:44 +0000 Subject: [PATCH] No comments --- src/WOKSH/wokprocess.cxx | 4 ++++ src/WOKSH/woksh.cxx | 10 ++++++---- 2 files changed, 10 insertions(+), 4 deletions(-) diff --git a/src/WOKSH/wokprocess.cxx b/src/WOKSH/wokprocess.cxx index 38750fa..c066ce0 100755 --- a/src/WOKSH/wokprocess.cxx +++ b/src/WOKSH/wokprocess.cxx @@ -90,7 +90,11 @@ int main(int argc, char **argv) } } +#if defined( AIX ) + WOKTclTools_Package tcl(CurrentInterp, "Tcl", "8.1"); +#else WOKTclTools_Package tcl(CurrentInterp, "Tcl", "7.5"); +#endif tcl.Require(); diff --git a/src/WOKSH/woksh.cxx b/src/WOKSH/woksh.cxx index 289bea3..fb5807b 100755 --- a/src/WOKSH/woksh.cxx +++ b/src/WOKSH/woksh.cxx @@ -104,11 +104,13 @@ int Wok_Init(WOKTclTools_PInterp interp) } } -#ifndef LIN - WOKTclTools_Package tcl(CurrentInterp, "Tcl", "7.5"); -#else +# if defined( LIN ) WOKTclTools_Package tcl ( CurrentInterp, "Tcl", "8.0" ); -#endif // LIN +#elif defined( AIX ) + WOKTclTools_Package tcl ( CurrentInterp, "Tcl", "8.1" ); +#else + WOKTclTools_Package tcl ( CurrentInterp, "Tcl", "7.5" ); +#endif tcl.Require(); -- 2.39.5