Changeset 4273

Timestamp:

05/24/08 04:17:06 (6 months ago)

Author:

pmoura

Message:

Fixed a Logtalk compiler bug when compiling an alias/3 predicate directive within a category that extends other categories.

Location:

trunk

Files:

• compiler/logtalk.pl (modified) (2 diffs)
• RELEASE_NOTES.txt (modified) (1 diff)

trunk/compiler/logtalk.pl

@@ -5472 +5472 @@
     (   '$lgt_pp_extended_protocol_'(Entity, _, _, _)
     ;   '$lgt_pp_implemented_protocol_'(Entity, _, _, _)
+    ;   '$lgt_pp_extended_category_'(Entity, _, _, _, _)
     ;   '$lgt_pp_imported_category_'(Entity, _, _, _, _)
     ;   '$lgt_pp_extended_object_'(Entity, _, _, _, _, _, _, _, _, _)
@@ -6939 +6940 @@
     ;   Pred = Alias,
         '$lgt_pp_object_'(_, _, Dcl, _, _, IDcl, _, _, _, _, _),
-        (   ('$lgt_pp_instantiated_class_'(_, _, _, _, _, _, _, _, _, _); '$lgt_pp_specialized_class_'(_, _, _, _, _, _, _, _, _, _)) ->
-            TPred = '$lgt_call_ctg_pred'(IDcl, Pred, Sender, This, Self)
-        ;   TPred = '$lgt_call_ctg_pred'(Dcl, Pred, Sender, This, Self)
+        (   \+ '$lgt_pp_instantiated_class_'(_, _, _, _, _, _, _, _, _, _),
+            \+ '$lgt_pp_specialized_class_'(_, _, _, _, _, _, _, _, _, _) ->
+            TPred = '$lgt_call_ctg_pred'(Dcl, Pred, Sender, This, Self)
+        ;   TPred = '$lgt_call_ctg_pred'(IDcl, Pred, Sender, This, Self)
         )
     ).

trunk/RELEASE_NOTES.txt

@@ -11 +11 @@
 
 
-2.31.6 - May ??, 2008
+2.31.6 - May 26, 2008
 
     Fixed a Logtalk runtime bug when using the :/1 control construct to 
     call a predicate defined in a category extended by a category that 
     is imported by the object making the call.
+
+    Fixed a Logtalk compiler bug when compiling an alias/3 predicate 
+    directive within a category that extends other categories.
 
     Fixed a Logtalk compiler bug when compiling a class that imports a