[MACTCL] Setting environment vars from tcl

[James B. <jk...@mr...>]

There seems to be a bug in keeping the program environment and env() array
synchronised. I've tried this with the macos8-4-branch and the tclsh shipped
with the mac. This is under MacOS X.

% set env(a) b;puts $env(a)
b
% parray env
env(DYLD_LIBRARY_PATH) = /Users/pubseq/share/lib/macosx-binaries
env(ENV_SET)           = 
env(GROUP)             = staff
[cut for brevity]
env(_)                 = /usr/bin/tclsh
% puts $env(a)
can't read "env(a)": no such variable

array names has the same problem:

% set env(a) b
b
% puts $env(a)
b
% array names env
MANPATH HOME STADENROOT PWD LOGNAME ENV_SET DYLD_LIBRARY_PATH GROUP HOST
VENDOR TERM SHELL HOSTTYPE GTAGDB SHLVL REMOTEHOST STADLIB MACHTYPE OSTYPE
MACHINE STADENROOT_2001 PATH _ STADTABL USER
% puts $env(a)
can't read "env(a)": no such variable
% 

I thought I'd submitted this to sourceforge somewhere, but now I can't see
it. Anyway, just incase it didn't make it in there I thought I'd ask here if
anyone has seen this bug? I may have a look into this myself as that bit of
code is nice and Unix like so it shouldn't be too daunting :-)

James

-- 
James Bonfield (jk...@mr...)   Fax: (+44) 01223 213556
Medical Research Council - Laboratory of Molecular Biology,
Hills Road, Cambridge, CB2 2QH, England.
Also see Staden Package WWW site at http://www.mrc-lmb.cam.ac.uk/pubseq/