After
Jess> (deftemplate Signal (declare (from-class at.laune.jess.Signal)))
TRUE
Jess> (ppdeftemplate Signal)
"(deftemplate MAIN::Signal
\"$JAVA-OBJECT$ at.laune.jess.Signal\"
(declare (from-class at.laune.jess.Signal)))"
Jess> (bind ?f1 (assert (Signal)))
<Fact-1>
Jess> (facts)
f-0 (MAIN::initial-fact)
f-1 (MAIN::Signal (aspect <Java-Object:jess.aj>) (class
<Java-Object:jess.aj>) (ident <Java-Object:jess.aj>) (OBJECT nil))
For a total of 2 facts in module MAIN.
Jess>
we see that the fact includes a slot "class", inherited from Object .
Why is this not suppressed?
kr
Wolfgang
--------------------------------------------------------------------
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]
--------------------------------------------------------------------
