[M3devel] Target.Allow_packed_byte_aligned const or var per target?

[Jay K]

containsLazyAlignments
m3front/Module.m3:
PROCEDURE SetLazyAlignment (on: BOOLEAN) =  BEGIN    IF curModule # NIL THEN      curModule.lazyAligned := on;      IF on THEN        curModule.containsLazyAlignments := TRUE;      END;    END;  END SetLazyAlignment;

PROCEDURE Compile (t: T) =  VAR save: T;  zz: Scope.T;  yy: Revelation.Set;  BEGIN    (* ETimer.Push (M3Timers.emit); *)    Target.Allow_packed_byte_aligned := t.containsLazyAlignments;

This feels wrong.Surely, Allow_packed_byte_aligned should be constant for any given target?Surely a pragma cannot change a target's characteristics?Or, rather, I found this by changing it to a constant false for all targets.

 - Jay 		 	   		  
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://m3lists.elegosoft.com/pipermail/m3devel/attachments/20150920/1147979e/attachment-0001.html>