Changeset 4527 for trunk/compiler

Timestamp:

10/21/08 09:15:08 (3 months ago)

Author:

pmoura

Message:

Allow a complementing category to define an alias for a predicate of the complemented object.

Files:

• trunk/compiler/logtalk.pl (modified) (1 diff)

trunk/compiler/logtalk.pl

@@ -2120 +2120 @@
     '$lgt_current_object_'(Superclass, _, _, _, _, _, _, _, _, Rnm, _),
     '$lgt_alias_pred'(Superclass, Rnm, Alias, Pred, superclass).
+
+'$lgt_alias_pred'(Obj, _, Alias, Pred, _) :-
+    '$lgt_complemented_object_'(Obj, Ctg, _, _, Rnm),
+    '$lgt_alias_pred'(Ctg, Rnm, Alias, Pred, _).