I think Jason Morris wrote:
> 
> (deffunction MAIN::log-info (?message)
>   (bind ?logger (fetch logger))
>   (if (not (eq ?logger nil)) then
>   (call ?logger info (str-cat "jess: " ?message))))
> 

This actually should work perfectly. In combination with your other
message, though, where you mention constructing a Rete object with a
Defclassed object (or its Class object?) as an argument, I wonder if
the problem is that you're inadvertently creating multiple Rete
objects, and then storing the logger in one, while this code is
running in another.

It's fine to create multiple Rete objects, but each one is
independent, and you should only create them if you specifically
intend to use them separately (i.e., for example, you might register
the logger with every one of them.)

---------------------------------------------------------
Ernest Friedman-Hill  
Science and Engineering PSEs        Phone: (925) 294-2154
Sandia National Labs                FAX:   (925) 294-2234
PO Box 969, MS 9012                 [EMAIL PROTECTED]
Livermore, CA 94550         http://herzberg.ca.sandia.gov

--------------------------------------------------------------------
To unsubscribe, send the words 'unsubscribe jess-users [EMAIL PROTECTED]'
in the BODY of a message to [EMAIL PROTECTED], NOT to the list
(use your own address!) List problems? Notify [EMAIL PROTECTED]
--------------------------------------------------------------------

Reply via email to