<html><head></head><body><div class="ydp648f2fa9yahoo-style-wrap" style="font-family:Helvetica Neue, Helvetica, Arial, sans-serif;font-size:16px;"><div><div dir="ltr" data-setdir="false">Hello, I've been having a problem getting some code to compile. I've gone through the documentation, but</div><div dir="ltr" data-setdir="false">there isn't any specific info for the arm version. This is a simplified version <br></div><div dir="ltr" data-setdir="false"><br></div><div dir="ltr" data-setdir="false"><div>Program Test;<br> <br> Function HiInteger( Value: LongInt ): LongInt;<br> Begin<br> Asm<br> LdR R0, Value<br> Mov R1, R0, ASR #16<br> StR R1, @Result (* This line generates an error *)<br> End [ 'R0', 'R1' ]; <br> End;<br><br> Begin<br> End. <br><br><div>Free Pascal version 3.2.2 for arm</div><div><br></div><div dir="ltr" data-setdir="false">Thanks for any help in advance.</div><div dir="ltr" data-setdir="false">Paul.<br></div></div><div><br></div></div><div class="ydp648f2fa9signature"><div style="font-family:Helvetica, Arial, sans-serif;font-size:16px;"></div></div></div></div></body></html>