[SCM] Lisaac compiler branch, master, updated. lisaac-0.12-509-ge0fc9e7

[Benoit Sonntag]

The following commit has been merged in the master branch:
commit e0fc9e7c9449329814b933c35e17e2f5a83ad68e
Author: Benoit Sonntag <sonntag at icps.u-strasbg.fr>
Date:   Wed Oct 21 00:17:58 2009 +0200

    bug matthieu ok

diff --git a/src/code_life/call_slot.li b/src/code_life/call_slot.li
index 3419050..67644ee 100644
--- a/src/code_life/call_slot.li
+++ b/src/code_life/call_slot.li
@@ -573,14 +573,11 @@ Section Private
       body := switch.list.item k.code;
       (body.is_empty).if_false {	
 	msg_slot ?= body.last;
-	(msg_slot != NULL).if {	  
+	((msg_slot != NULL) && {msg_slot.profil = profil}).if {	  
 	  // DEBUG
 	  (msg_slot = Self).if {
 	    semantic_error (position,"CALL_SLOT : BUG!!!!");
-	  };
-	  (msg_slot.profil != profil).if {
-	    semantic_error (position,"CALL_SLOT : BUG2!!!!");
-	  };
+          };
 	  // FIN DEBUG
 	  msg_slot.argument_to_assignment body index (body.upper) alias FALSE;
 	  body.put (LOOP_END.create (msg_slot.position) loop result) to (body.upper);
diff --git a/src/type/type.li b/src/type/type.li
index 54c916b..8b1c469 100644
--- a/src/type/type.li
+++ b/src/type/type.li
@@ -38,7 +38,7 @@ Section Inherit
   
 Section PROFIL_LIST
   
-  - is_alias_struct:BOOLEAN := TRUE; 
+  - is_alias_struct:BOOLEAN := FALSE; //TRUE; 
   
 Section Private
   

-- 
Lisaac compiler