[gambit-list] termite exception problem

Jeremie Lasalle Ratelle pouexmachinax at gmail.com
Fri Apr 3 16:30:35 EDT 2009


;; test.scm

(include "~~lib/gambit#.scm")
(include "~~lib/termite/termite#.scm")
(load "~~lib/termite/termite")

(node-init node1)

(with-exception-catcher
  (lambda (exception) (raise exception))
  (lambda ()
    (spawn-link (lambda ()
                       (spawn-link
                          (lambda () g))
                       (recv
                          (_ #f))))
    (?)))

$ gsi -:dar test.scm

*** ERROR IN "test2.scm"@7.1 -- This object was raised:
#<termite-exception #2 origin: #<thread #3> reason: failure object:
#<unbound-global-exception #4>>

> (display-exception #4)
Unbound variable: handle-exception-message

I looked at the expansion and I guess the problem is that
handle-exception-message is not "exported" by the termite namespace
but maybe I'm missing something...
Any ideas?



More information about the Gambit-list mailing list