>>>>> "Mo" == Mo DeJong <[EMAIL PROTECTED]> writes:

    Mo> On Thu, 26 Oct 2000, Daniel Wickstrom wrote:

    Mo> It could be related to the event queue, I just don't see it on
    Mo> my box.  A printed stack trace would really help:

    Mo> replace:

    Mo> catch {$notifier doOneEvent 0} msg

    Mo> with:

    Mo> java::try {$notifier doOneEvent 0} catch {Exception e} {$e
    Mo> printStackTrace}

    Mo> If not, could you investigate it a bit more? Perhaps get a
    Mo> stack trace and print it to see where things are going wrong.
    >>  I'll see what I can do.  I want to write some tests that will
    >> exercise the enw notifer anyway.

Here is the stacktrace:


% source tclblend/javaTimer.test


==== javaTimer-3.1 JavaTimerProc
==== Contents of test case:

    set t [java::new tests.TimerHandlerTest $notifier 100]
    set result [java::field $t value]
    java::field $t err true
    lappend result [java::try {$notifier doOneEvent 0} catch {Exception e} {$e 
printStackTrace}] $msg  [java::field $t value]

==== Result was:
0 1 {unknown java object "java0x1"} 0
---- Result should have been:
0 1 {java.lang.NullPointerException: TimerHandlerTest} 1
---- javaTimer-3.1 FAILED
% source tclblend/javaTimer.test
java.lang.NullPointerException: TimerHandlerTest
        at tcl.lang.TclPkgInvoker.invokeMethod(TclPkgInvoker.java:81)
        at tcl.lang.JavaInvoke.call(JavaInvoke.java:254)
        at tcl.lang.JavaInvoke.callMethod(JavaInvoke.java:114)
        at tcl.lang.ReflectObject.cmdProc(ReflectObject.java:906)
        at tcl.lang.Interp.callCommand(Interp.java:983)
        at tcl.lang.Interp.eval(Interp.java:791)
        at tcl.lang.JavaTryCmd.cmdProc(JavaTryCmd.java:74)
        at tcl.lang.Interp.callCommand(Interp.java:983)


==== javaTimer-3.1 JavaTimerProc
==== Contents of test case:

    set t [java::new tests.TimerHandlerTest $notifier 100]
    set result [java::field $t value]
    java::field $t err true
    lappend result [java::try {$notifier doOneEvent 0} catch {Exception e} {$e 
printStackTrace}] $msg  [java::field $t value]

==== Result was:
0 {} {unknown java object "java0x1"} 1
---- Result should have been:
0 1 {java.lang.NullPointerException: TimerHandlerTest} 1
---- javaTimer-3.1 FAILED
% 

----------------------------------------------------------------
The TclJava mailing list is sponsored by Scriptics Corporation.
To subscribe:    send mail to [EMAIL PROTECTED]  
                 with the word SUBSCRIBE as the subject.
To unsubscribe:  send mail to [EMAIL PROTECTED] 
                 with the word UNSUBSCRIBE as the subject.
To send to the list, send email to '[EMAIL PROTECTED]'. 
An archive is available at http://www.mail-archive.com/tcljava@scriptics.com

Reply via email to