<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//DE"><HTML><HEAD><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=us-ascii"><TITLE></TITLE></HEAD><BODY><div style="font-family:arial,helvetica,sans-serif;font-size:10pt;"><p style="margin:0px;padding:0px;">Hi Florian,<br /><br />i add in Tx86Instructiones.AddReferenzeSizes a memory-size-checking for assembler sse- and avx-opcodes with<br />warnings if memory-reference is to small.<br /><br />e.g. <br /><br />type<br /> TXMMDWord = record<br /> int0: dword;<br /> int1: dword;<br /> int2: dword;<br /> //int3: dword;<br /> end;<br /><br /> TXMMDWord1 = record<br /> int0: dword;<br /> int1: dword;<br /> int2: dword;<br /> int3: dword;<br /> end;<br /><br /><br />var<br /> a: byte;<br /> b: TXMMDWord;<br /> c: TXMMDWord1; <br /><br /><br />begin<br /> asm<br /> movdqa xmm0, a <br /> movdqa xmm0, b<br /> movdqa xmm0, c + $20<br /> end;<br />end;<br /><br /><br />a = opsize = S_B<br />b = opsize = S_NO<br />c = opsize = S_NO<br /><br />a)<br />// in this time: fpc = ok <br />// new: fpc warning "... size is 8 bits, expected 128 bits"<br /><br />b)<br />// in this time: fpc = ok <br />// new: fpc warning "... size is 96 bits, expected 128 bits"<br /><br /><br />c)<br /><br />// in this time: fpc = ok <br />// new: fpc warning "... size is 128 bits, expected 128 bits + offset 32 byte"<br /><br /><br /> <br /><br /><br />Torsten<br /><br /><br /><br />> -----Ursprüngliche Nachricht-----<br />> Von: Florian Klämpfl <br />> Gesendet: Mo. 02.04.2012 09:07<br />> An: FPC developers list <br />> Betreff: Re: [fpc-devel] fpc - assembler reader: sizeof record or array<br />><br />> Am 02.04.2012 06:50, schrieb Torsten:<br />>> Hi,<br />>><br />>> i need the size of a global variable<br />> (type record).<br />>><br />>> local var:<br />> "operands[i].opr.localsym.getsize"<br />>> global var: ???<br />>><br />>> I can add a new field "globalsym" in<br />> the "TReference"-record ?<br />>><br />>> What you say?<br />><br />> Why do you need the size? At this point everything should be<br />> translated<br />> into S_* constants?<br />> _______________________________________________<br />> fpc-devel maillist - fpc-devel@lists.freepascal.org<br />> target="_blank">http://lists.freepascal.org/mailman/listinfo/fpc-devel<br />><br />><br />> -----Ursprüngliche Nachricht Ende-----<br /><br /><br /><br /><br />---<br />Nutzen Sie freenet Mail optimal angepasst für Ihr iPhone, Android oder Nokia Handy auch von unterwegs.<br />Alle Infos und Download unter http://mail.freenet.de/mobile-email/index.html</p></div><br><br>---<br><div style="font-family:arial;font-size:10pt;">Nutzen Sie freenet Mail optimal angepasst für Ihr iPhone, Android oder Nokia Handy auch von unterwegs.<br>Alle Infos und Download unter <a style="font-family:arial;font-size:10pt;" href="http://mail.freenet.de/mobile-email/index.html" target="_blank">freenetMail Apps</a></div>
</BODY></HTML>