<html><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; ">Looks like alignment of LONGINT is not getting handled properly.  I'll try to look into it.<div><br><div> <span class="Apple-style-span" style="border-collapse: separate; border-spacing: 0px 0px; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; text-align: auto; -khtml-text-decorations-in-effect: none; text-indent: 0px; -apple-text-size-adjust: auto; text-transform: none; orphans: 2; white-space: normal; widows: 2; word-spacing: 0px; "><div style="word-wrap: break-word; -khtml-nbsp-mode: space; -khtml-line-break: after-white-space; "><span class="Apple-style-span" style="border-collapse: separate; border-spacing: 0px 0px; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; text-align: auto; -khtml-text-decorations-in-effect: none; text-indent: 0px; -apple-text-size-adjust: auto; text-transform: none; orphans: 2; white-space: normal; widows: 2; word-spacing: 0px; "><span class="Apple-style-span" style="border-collapse: separate; border-spacing: 0px 0px; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; text-align: auto; -khtml-text-decorations-in-effect: none; text-indent: 0px; -apple-text-size-adjust: auto; text-transform: none; orphans: 2; white-space: normal; widows: 2; word-spacing: 0px; "><span class="Apple-style-span" style="border-collapse: separate; border-spacing: 0px 0px; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; text-align: auto; -khtml-text-decorations-in-effect: none; text-indent: 0px; -apple-text-size-adjust: auto; text-transform: none; orphans: 2; white-space: normal; widows: 2; word-spacing: 0px; "><span class="Apple-style-span" style="border-collapse: separate; border-spacing: 0px 0px; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; text-align: auto; -khtml-text-decorations-in-effect: none; text-indent: 0px; -apple-text-size-adjust: auto; text-transform: none; orphans: 2; white-space: normal; widows: 2; word-spacing: 0px; "><span class="Apple-style-span" style="border-collapse: separate; border-spacing: 0px 0px; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; text-align: auto; -khtml-text-decorations-in-effect: none; text-indent: 0px; -apple-text-size-adjust: auto; text-transform: none; orphans: 2; white-space: normal; widows: 2; word-spacing: 0px; "><span class="Apple-style-span" style="border-collapse: separate; border-spacing: 0px 0px; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; text-align: auto; -khtml-text-decorations-in-effect: none; text-indent: 0px; -apple-text-size-adjust: auto; text-transform: none; orphans: 2; white-space: normal; widows: 2; word-spacing: 0px; "><span class="Apple-style-span" style="border-collapse: separate; border-spacing: 0px 0px; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; text-align: auto; -khtml-text-decorations-in-effect: none; text-indent: 0px; -apple-text-size-adjust: auto; text-transform: none; orphans: 2; white-space: normal; widows: 2; word-spacing: 0px; "><span class="Apple-style-span" style="border-collapse: separate; border-spacing: 0px 0px; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; text-align: auto; -khtml-text-decorations-in-effect: none; text-indent: 0px; -apple-text-size-adjust: auto; text-transform: none; orphans: 2; white-space: normal; widows: 2; word-spacing: 0px; "><div><font class="Apple-style-span" color="#0000FF"><font class="Apple-style-span" face="Gill Sans"><span class="Apple-style-span" style="color: rgb(0, 0, 255); font-family: Gill Sans; "><span class="Apple-style-span" style="color: rgb(0, 0, 255); font-family: Gill Sans; ">Antony Hosking</span></span></font></font><font class="Apple-style-span" face="Gill Sans"><span class="Apple-style-span" style="font-family: Gill Sans; "><span class="Apple-style-span" style="font-family: Gill Sans; "> | </span></span><span class="Apple-style-span" style="font-family: Gill Sans; "><span class="Apple-style-span" style="font-family: Gill Sans; ">Associate Professor</span></span><span class="Apple-style-span" style="font-family: Gill Sans; "><span class="Apple-style-span" style="font-family: Gill Sans; "> | Computer Science | Purdue University</span></span></font></div><div><font class="Apple-style-span" face="GillSans-Light"><span class="Apple-style-span" style="font-family: GillSans-Light; ">305 N. University Street | West Lafayette | IN 47907 | USA</span></font></div><div><font class="Apple-style-span" color="#0000FF" face="Gill Sans"><span class="Apple-style-span" style="color: rgb(0, 0, 255); font-family: Gill Sans; "><span class="Apple-style-span" style="color: rgb(0, 0, 255); font-family: Gill Sans; ">Office</span></span></font><font class="Apple-style-span" face="GillSans-Light"><span class="Apple-style-span" style="font-family: GillSans-Light; "><span class="Apple-style-span" style="font-family: GillSans-Light; "> +1 765 494 6001 | </span></span></font><font class="Apple-style-span" color="#0000FF" face="Gill Sans"><span class="Apple-style-span" style="color: rgb(0, 0, 255); font-family: Gill Sans; "><span class="Apple-style-span" style="color: rgb(0, 0, 255); font-family: Gill Sans; ">Mobile</span></span></font><font class="Apple-style-span" face="GillSans-Light"><span class="Apple-style-span" style="font-family: GillSans-Light; "><span class="Apple-style-span" style="font-family: GillSans-Light; "> +1 765 427 5484</span></span></font></div><div><font class="Apple-style-span" face="GillSans-Light"><br class="khtml-block-placeholder"></font></div></span></span></span></span></span></span></span><br class="Apple-interchange-newline"></span></div></span> </div><br><div><div>On Mar 4, 2008, at 4:48 PM, Rodney M. Bates wrote:</div><br class="Apple-interchange-newline"><blockquote type="cite"><div>I wrote the attached test program for testing compiler/debugger<br>subrange bounds communication.  It gets CG errors from the compiler:<br><br>"../src/Subranges.m3", line 34: ** INTERNAL CG ERROR *** unaligned store_indirect  type=6  s/a=32/32<br>"../src/Subranges.m3", line 35: ** INTERNAL CG ERROR *** unaligned store_indirect  type=6  s/a=32/32<br>"../src/Subranges.m3", line 43: ** INTERNAL CG ERROR *** unaligned store_indirect  type=6  s/a=32/32<br><br><br>Attempts to remove seemingly irrelevant declarations change the<br>behavior.<br><br><br>-- <br>-------------------------------------------------------------<br>Rodney M. Bates, retired assistant professor<br>Dept. of Computer Science, Wichita State University<br>Wichita, KS 67260-0083<br>316-978-3922<br><a href="mailto:rodney.bates@wichita.edu">rodney.bates@wichita.edu</a><br>MODULE Subranges EXPORTS Main <br><br>; TYPE U1 = [ 0 .. 16_7F ]<br>; TYPE S1 = [ 0 .. 16_FF ]<br>; TYPE U2 = [ 0 .. 16_7FFF ]<br>; TYPE S2 = [ 0 .. 16_FFFF ]<br>; TYPE U3 = [ 0 .. 16_7FFFFF ]<br>; TYPE S3 = [ 0 .. 16_FFFFFF ]<br>; TYPE U4 = [ 0 .. 16_7FFFFFFF ]<br>; TYPE S4 = [ 16_FFFFFFFF .. 16_FFFFFFFF ]<br><br>; TYPE LU4 = [ 0L .. 16_7FFFFFFFL ]<br>; TYPE LS4 = [ 0L .. 16_FFFFFFFFL ]<br>; TYPE LU5 = [ 0L .. 16_7FFFFFFFFFL ]<br>; TYPE LS5 = [ 0L .. 16_FFFFFFFFFFL ]<br>; TYPE LU6 = [ 0L .. 16_7FFFFFFFFFFFL ]<br>; TYPE LS6 = [ 0L .. 16_FFFFFFFFFFFFL ]<br>; TYPE LU7 = [ 0L .. 16_7FFFFFFFFFFFFFL ]<br>; TYPE LS7 = [ 0L .. 16_FFFFFFFFFFFFFFL ]<br>; TYPE LU8 = [ 0L .. 16_7FFFFFFFFFFFFFFFL ]<br>; TYPE LS8 = [ 0L .. 16_FFFFFFFFFFFFFFFFL ]<br><br>; PROCEDURE Work ( ) <br><br>  = VAR VU1 : U1 := 0 <br>  ; VAR VS1 : S1 := 0 <br>  ; VAR VU2 : U2 := 0 <br>  ; VAR VS2 : S2 := 0 <br>  ; VAR VU3 : U3 := 0 <br>  ; VAR VS3 : S3 := 0 <br>  ; VAR VU4 : U4 := 0 <br>  ; VAR VS4 : S4 := 16_FFFFFFFF <br><br>  ; VAR VLU4 : LU4 := 0L  <br>  ; VAR VLS4 : LS4 := 0L  <br>  ; VAR VLU5 : LU5 := 0L <br>  ; VAR VLS5 : LS5 := 0L <br>  ; VAR VLU6 : LU6 := 0L <br>  ; VAR VLS6 : LS6 := 0L <br>  ; VAR VLU7 : LU7 := 0L <br>  ; VAR VLS7 : LS7 := 0L <br>  ; VAR VLU8 : LU8 := 0L <br>  ; VAR VLS8 : LS8 := 0L  <br>  ; VAR X : INTEGER  <br><br>  ; BEGIN <br>      X := VU1 <br>    END Work <br><br>; BEGIN <br>    Work () <br>  END Subranges<br>. <br></div></blockquote></div><br></div></body></html>