Changeset 4274 for trunk/examples/complements/complements.lgt

Timestamp:

05/24/08 08:20:56 (6 months ago)

Author:

pmoura

Message:

Improved the "complements" example, moving the category initialization goal to the beggining of the example source file.

Files:

• trunk/examples/complements/complements.lgt (modified) (2 diffs)

trunk/examples/complements/complements.lgt

@@ +1 @@
+
+:- initialization(define_events(before, employee, _, _, employee)).
+
 
 :- object(employee).
@@ -11 +14 @@
 
 
-
 :- category(logging,
     implements(monitoring),
     complements(employee)).
-
-    % add a simple logging functionality by defining a "before" event and 
-    % the corresponding event handler (implies that the category must be 
-    % loaded *after* the object due to the define_events/5 goal):
-
-    :- initialization(define_events(before, employee, _, _, employee)).
 
     before(_, Message, Sender) :-