tcljava-dev

[tcljava-dev] Re: PATCH: Jacl

[Tom P. <tpo...@ny...>]

> > > > Here are some patches to Jacl
> > > 
> > > > 3. jaclsh: sets 'jacl.tcllibpath' property so that init.tcl can add the 
> > > >    installed lib path to auto_path.
> 
> Just an FYI here, but I rejected this 'jacl.tcllibpath' patch because
> the TCLLIBPATH property already provides this functionality.
> 
> Snip from current init.tcl:
 
> if {[info exists env(TCLLIBPATH)]} {
>     lappend auto_path $env(TCLLIBPATH)
> }


This does not work in the CVS version.  I built the CVS version clean (none of
my patches):


[tpoindex@ct tcljava.clean]$ jaclsh
% parray env
env(CLASSPATH)                     = /usr/local/java/jre/lib/rt.jar:/usr/local/lib/tcljava1.3.0/tcljava.jar:/usr/local/lib/tcljava1.3.0/jacl.jar::
env(HOME)                          = /home/tpoindex
env(USER)                          = tpoindex
env(file.encoding)                 = ISO-8859-1
env(file.encoding.pkg)             = sun.io
env(file.separator)                = /
env(java.awt.fonts)                = 
env(java.awt.graphicsenv)          = sun.awt.X11GraphicsEnvironment
env(java.awt.printerjob)           = sun.awt.motif.PSPrinterJob
env(java.class.path)               = /usr/local/java/jre/lib/rt.jar:/usr/local/lib/tcljava1.3.0/tcljava.jar:/usr/local/lib/tcljava1.3.0/jacl.jar::
env(java.class.version)            = 47.0
env(java.ext.dirs)                 = /usr/local/jdk1.3.1_05/jre/lib/ext
env(java.home)                     = /usr/local/jdk1.3.1_05/jre
env(java.io.tmpdir)                = /tmp
env(java.library.path)             = /usr/local/jdk1.3.1_05/jre/lib/i386:/usr/local/jdk1.3.1_05/jre/lib/i386/native_threads/:/usr/local/jdk1.3.1_05/jre/lib/i386/client:/usr/local/jdk1.3.1_05/jre/../lib/i386:/usr/local/lib
env(java.runtime.name)             = Java(TM) 2 Runtime Environment, Standard Edition
env(java.runtime.version)          = 1.3.1_05-b02
env(java.specification.name)       = Java Platform API Specification
env(java.specification.vendor)     = Sun Microsystems Inc.
env(java.specification.version)    = 1.3
env(java.vendor)                   = Sun Microsystems Inc.
env(java.vendor.url)               = http://java.sun.com/
env(java.vendor.url.bug)           = http://java.sun.com/cgi-bin/bugreport.cgi
env(java.version)                  = 1.3.1_05
env(java.vm.info)                  = mixed mode
env(java.vm.name)                  = Java HotSpot(TM) Client VM
env(java.vm.specification.name)    = Java Virtual Machine Specification
env(java.vm.specification.vendor)  = Sun Microsystems Inc.
env(java.vm.specification.version) = 1.0
env(java.vm.vendor)                = Sun Microsystems Inc.
env(java.vm.version)               = 1.3.1_05-b02
env(line.separator)                = 

env(os.arch)                       = i386
env(os.name)                       = Linux
env(os.version)                    = 2.4.18-18.8.0
env(path.separator)                = :
env(sun.boot.class.path)           = /usr/local/jdk1.3.1_05/jre/lib/rt.jar:/usr/local/jdk1.3.1_05/jre/lib/i18n.jar:/usr/local/jdk1.3.1_05/jre/lib/sunrsasign.jar:/usr/local/jdk1.3.1_05/jre/classes
env(sun.boot.library.path)         = /usr/local/jdk1.3.1_05/jre/lib/i386
env(sun.cpu.endian)                = little
env(sun.cpu.isalist)               = 
env(sun.io.unicode.encoding)       = UnicodeLittle
env(user.dir)                      = /home/tpoindex/src/java/tcljava.clean
env(user.home)                     = /home/tpoindex
env(user.language)                 = en
env(user.name)                     = tpoindex
env(user.region)                   = US
env(user.timezone)                 = 


%  set auto_path
resource:/tcl/lang/library
% 



There is no env(TCLLIBPATH) defined.  Java doesn't even pass most environment
variables (that's an entirely different NIH problem):

[tpoindex@ct tcljava.clean]$ TCLLIBPATH=/usr/local/lib jaclsh
% puts $env(TCLLIBPATH)
can't read "env(TCLLIBPATH)": no such element in array
% 




-- 
Tom Poindexter
tpo...@ny...
http://www.nyx.net/~tpoindex/

Re: [tcljava-dev] Re: PATCH: Jacl

[Mo D. <md...@un...>]

On Mon, 14 Apr 2003 22:15:03 -0600
Tom Poindexter <tpo...@ny...> wrote:

> > > > > Here are some patches to Jacl
> > > > 
> > > > > 3. jaclsh: sets 'jacl.tcllibpath' property so that init.tcl can add the 
> > > > >    installed lib path to auto_path.
> > 
> > Just an FYI here, but I rejected this 'jacl.tcllibpath' patch because
> > the TCLLIBPATH property already provides this functionality.
> > 
> > Snip from current init.tcl:
>  
> > if {[info exists env(TCLLIBPATH)]} {
> >     lappend auto_path $env(TCLLIBPATH)
> > }
> 
> 
> This does not work in the CVS version.  I built the CVS version clean (none of
> my patches):

You need to pass it as a property, just like the jacl.tcllibpath property in your patch.

java -DTCLLIBPATH=/bar tcl.lang.Shell
% set env(TCLLIBPATH)
/bar
% set auto_path
resource:/tcl/lang/library /bar

cheers
Mo