tcljava-user

[tcljava-user] Stack trace from scrpits

[Michael T. A. <mt...@so...>]

When a tcl script fails with an error, errorInfo is printed by the
native Tcl shell (and Tcl blend) but not by Jacl.

This script shows the difference if you first run it with tclsh and then
with jaclsh (replace tclsh with jaclsh)

test.tcl:
=====
#!/bin/sh
# Restart using a Tcl shell \
exec tclsh "$0" "$@"

catch {error hello1}
puts errorCode=$errorCode
puts errorInfo=$errorInfo
puts "not handled exception:"
error hello2

---------------------------------------------------------------
I think this patch solves the problem:

$ diff Shell.java Shell.java.org
111,117c111
<   try {
<       System.err.println(interp.getVar("errorInfo", null,
TCL.GLOBAL_ONLY).toString());
<   }
<   catch (TclException ex) {
<       // I guess this will never happen
<       System.err.println(interp.getResult().toString());
<   }
---
>   System.err.println(interp.getResult().toString());

Regards,
Michael Tulinius Andersen
Softility.dk

Re: [tcljava-user] Stack trace from scrpits

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

On Fri, 1 Dec 2000, Michael Tulinius Andersen wrote:

> I think this patch solves the problem:
> 
> $ diff Shell.java Shell.java.org
> 111,117c111
> <   try {
> <       System.err.println(interp.getVar("errorInfo", null,
> TCL.GLOBAL_ONLY).toString());
> <   }
> <   catch (TclException ex) {
> <       // I guess this will never happen
> <       System.err.println(interp.getResult().toString());
> <   }
> ---
> >   System.err.println(interp.getResult().toString());
> 
> Regards,
> Michael Tulinius Andersen
> Softility.dk


Just a couple of quick comments. If you are going to
post a patch, it needs to be on "context diff" format.
Just add the -c option to your diff command line.
It makes patches far easier to deal with.

Also, if you are going to be doing some hacking
on Jacl, you should grab the CVS version and
join the tcljava-dev mailing list. There is
going to be overlap between the lists, but
I would like to keep most of the
discussion of patches and enhancements off
of the normal user list. That makes it
easier to go back and search the archive
later and it means less traffic on the
user list.

cheers
Mo DeJong
Red Hat Inc