diff options
author | Steve Bennett <steveb@workware.net.au> | 2010-10-11 14:51:44 +1000 |
---|---|---|
committer | Steve Bennett <steveb@workware.net.au> | 2010-10-30 20:07:27 +1000 |
commit | 42f3fb7b7f46c9af1e20573fa3fb5699e80244bf (patch) | |
tree | 7c4cf02fd3a4bae52a154d1ec4199c7304af4e93 /jim.c | |
parent | 9e21b4458c58607993935c7a05d114103606bea2 (diff) | |
download | jimtcl-42f3fb7b7f46c9af1e20573fa3fb5699e80244bf.zip jimtcl-42f3fb7b7f46c9af1e20573fa3fb5699e80244bf.tar.gz jimtcl-42f3fb7b7f46c9af1e20573fa3fb5699e80244bf.tar.bz2 |
Determine platform_tcl() settings with configure
Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'jim.c')
-rw-r--r-- | jim.c | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -4668,6 +4668,9 @@ Jim_Interp *Jim_CreateInterp(void) Jim_SetVariableStrWithStr(i, JIM_LIBPATH, ". /lib/jim"); Jim_SetVariableStrWithStr(i, JIM_INTERACTIVE, "0"); + Jim_SetVariableStrWithStr(i, "tcl_platform(os)", TCL_PLATFORM_OS); + Jim_SetVariableStrWithStr(i, "tcl_platform(platform)", TCL_PLATFORM_PLATFORM); + return i; } |