<html>
<head>
<style><!--
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 12pt;
font-family:Calibri
}
--></style></head>
<body class='hmmessage'><div dir='ltr'><div>containsLazyAlignments</div><div><br></div><div>m3front/Module.m3:</div><div><br></div><div>PROCEDURE SetLazyAlignment (on: BOOLEAN) =</div><div> BEGIN</div><div> IF curModule # NIL THEN</div><div> curModule.lazyAligned := on;</div><div> IF on THEN</div><div> curModule.containsLazyAlignments := TRUE;</div><div> END;</div><div> END;</div><div> END SetLazyAlignment;</div><div><br></div><div><br></div><div>PROCEDURE Compile (t: T) =</div><div> VAR save: T; zz: Scope.T; yy: Revelation.Set;</div><div> BEGIN</div><div> (* ETimer.Push (M3Timers.emit); *)</div><div> Target.Allow_packed_byte_aligned := t.containsLazyAlignments;</div><div><br></div><div><br></div><div>This feels wrong.</div><div>Surely, Allow_packed_byte_aligned should be constant for any given target?</div><div>Surely a pragma cannot change a target's characteristics?</div><div>Or, rather, I found this by changing it to a constant false for all targets.</div><div><br></div><div><br></div><div> - Jay</div> </div></body>
</html>