<html><head></head><body><div style="font-family: Verdana;font-size: 12.0px;"><div>I have:
<div> </div>
<div style="font-family:monospace;max-height:none;height:197px">
<ol>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"><span style="color:rgb(0,128,0);font-style:italic">{$push}</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"><span style="color:rgb(0,128,0);font-style:italic">{$packrecords 4}</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> MIDIPacket <span style="color:rgb(0,0,102)">=</span> <span style="color:rgb(0,0,102);font-weight:bold">record</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> timeStamp <span style="color:rgb(0,0,102)">:</span> MIDITimeStamp<span style="color:rgb(0,0,102)">;</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> length <span style="color:rgb(0,0,102)">:</span> UInt16<span style="color:rgb(0,0,102)">;</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> data <span style="color:rgb(0,0,102)">:</span> <span style="color:rgb(0,0,102);font-weight:bold">packed</span> <span style="color:rgb(0,0,102);font-weight:bold">array</span> <span style="color:rgb(0,153,0)">[</span><span style="color:rgb(204,102,204)">0</span><span style="color:rgb(0,0,102)">..</span><span style="color:rgb(204,102,204)">255</span><span style="color:rgb(0,153,0)">]</span> <span style="color:rgb(0,0,0);font-weight:bold">of</span> <span style="color:rgb(0,0,102);font-weight:bold">Byte</span><span style="color:rgb(0,0,102)">;</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> <span style="color:rgb(0,0,0);font-weight:bold">end</span><span style="color:rgb(0,0,102)">;</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> MIDIPacketPtr <span style="color:rgb(0,0,102)">=</span> <span style="color:rgb(0,0,102)">^</span>MIDIPacket<span style="color:rgb(0,0,102)">;</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"><span style="color:rgb(0,128,0);font-style:italic">{$pop}</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> </div>
</li>
</ol>
</div>
this structure is 268 bytes long, this is correct<br/>
<br/>
<br/>
now i have:
<div> </div>
<div style="font-family:monospace;max-height:none;height:166px">
<ol>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"><span style="color:rgb(0,128,0);font-style:italic">{$push}</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"><span style="color:rgb(0,128,0);font-style:italic">{$packrecords 4}</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> MIDIPacketList <span style="color:rgb(0,0,102)">=</span> <span style="color:rgb(0,0,102);font-weight:bold">record</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> numPackets<span style="color:rgb(0,0,102)">:</span> UInt32<span style="color:rgb(0,0,102)">;</span> </div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> packet<span style="color:rgb(0,0,102)">:</span> <span style="color:rgb(0,0,102);font-weight:bold">array</span> <span style="color:rgb(0,153,0)">[</span><span style="color:rgb(204,102,204)">0</span><span style="color:rgb(0,0,102)">..</span><span style="color:rgb(204,102,204)">0</span><span style="color:rgb(0,153,0)">]</span> <span style="color:rgb(0,0,0);font-weight:bold">of</span> MIDIPacket<span style="color:rgb(0,0,102)">;</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> <span style="color:rgb(0,0,0);font-weight:bold">end</span><span style="color:rgb(0,0,102)">;</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"><span style="color:rgb(0,128,0);font-style:italic">{$pop}</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> </div>
</li>
</ol>
</div>
this structure is now 280 byte long!<br/>
<br/>
in the old FPC Trunk 3.3.1 [about half a year ago]<br/>
this structure was 272 bytes long, and this is the correct size!
<div>so I can work with a ABI...</div>
<div> </div>
<div> </div>
<div> </div>
<div>NOW!!!! :</div>
<div> </div>
<div>If you remove your push/pop then it works.<br/>
<div style="font-family:monospace;max-height:none;height:306px">
<ol>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"><span style="color:rgb(0,0,0);font-weight:bold">type</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> MIDITimeStamp <span style="color:rgb(0,0,102)">=</span> qword<span style="color:rgb(0,0,102)">;</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> </div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> <span style="color:rgb(128,128,128);font-style:italic">//{$push}</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> <span style="color:rgb(0,128,0);font-style:italic">{$packrecords 4}</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> MIDIPacket <span style="color:rgb(0,0,102)">=</span> <span style="color:rgb(0,0,102);font-weight:bold">record</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> timeStamp <span style="color:rgb(0,0,102)">:</span> MIDITimeStamp<span style="color:rgb(0,0,102)">;</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> length <span style="color:rgb(0,0,102)">:</span> UInt16<span style="color:rgb(0,0,102)">;</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> data <span style="color:rgb(0,0,102)">:</span> <span style="color:rgb(0,0,102);font-weight:bold">packed</span> <span style="color:rgb(0,0,102);font-weight:bold">array</span> <span style="color:rgb(0,153,0)">[</span><span style="color:rgb(204,102,204)">0</span><span style="color:rgb(0,0,102)">..</span><span style="color:rgb(204,102,204)">255</span><span style="color:rgb(0,153,0)">]</span> <span style="color:rgb(0,0,0);font-weight:bold">of</span> <span style="color:rgb(0,0,102);font-weight:bold">Byte</span><span style="color:rgb(0,0,102)">;</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> <span style="color:rgb(0,0,0);font-weight:bold">end</span><span style="color:rgb(0,0,102)">;</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> MIDIPacketPtr <span style="color:rgb(0,0,102)">=</span> <span style="color:rgb(0,0,102)">^</span>MIDIPacket<span style="color:rgb(0,0,102)">;</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> <span style="color:rgb(128,128,128);font-style:italic">//{$pop} </span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> </div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> </div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> <span style="color:rgb(128,128,128);font-style:italic">//{$push}</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> <span style="color:rgb(0,128,0);font-style:italic">{$packrecords 4}</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> MIDIPacketList <span style="color:rgb(0,0,102)">=</span> <span style="color:rgb(0,0,102);font-weight:bold">record</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> numPackets<span style="color:rgb(0,0,102)">:</span> UInt32<span style="color:rgb(0,0,102)">;</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> packet<span style="color:rgb(0,0,102)">:</span> <span style="color:rgb(0,0,102);font-weight:bold">array</span> <span style="color:rgb(0,153,0)">[</span><span style="color:rgb(204,102,204)">0</span><span style="color:rgb(0,0,102)">..</span><span style="color:rgb(204,102,204)">0</span><span style="color:rgb(0,153,0)">]</span> <span style="color:rgb(0,0,0);font-weight:bold">of</span> MIDIPacket<span style="color:rgb(0,0,102)">;</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> <span style="color:rgb(0,0,0);font-weight:bold">end</span><span style="color:rgb(0,0,102)">;</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> <span style="color:rgb(128,128,128);font-style:italic">//{$pop}</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)"> </li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> </div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"><span style="color:rgb(0,0,0);font-weight:bold">begin</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> <span style="color:rgb(0,0,102)">writeln</span><span style="color:rgb(0,153,0)">(</span><span style="color:rgb(255,0,0)">'sizeof midi = '</span><span style="color:rgb(0,0,102)">,</span> sizeof<span style="color:rgb(0,153,0)">(</span>MIDIPacket<span style="color:rgb(0,153,0)">)</span><span style="color:rgb(0,153,0)">)</span><span style="color:rgb(0,0,102)">;</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> <span style="color:rgb(0,0,102)">writeln</span><span style="color:rgb(0,153,0)">(</span><span style="color:rgb(255,0,0)">'sizeof list = '</span><span style="color:rgb(0,0,102)">,</span> sizeof<span style="color:rgb(0,153,0)">(</span>MIDIPacketList<span style="color:rgb(0,153,0)">)</span><span style="color:rgb(0,153,0)">)</span><span style="color:rgb(0,0,102)">;</span></div>
</li>
</ol>
</div>
<div> </div>
<div style="font-family:monospace;max-height:none;height:72px">
<ol>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> </div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> </div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> </div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top">sizeof midi <span style="color:rgb(0,0,102)">=</span> <span style="color:rgb(204,102,204)">268</span></div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> </div>
</li>
<li style="white-space:nowrap;padding:0px 5px;background-color:rgb(255,255,255);line-height:16px;border-left:1px solid rgb(153,153,153)">
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top">sizeof list <span style="color:rgb(0,0,102)">=</span> <span style="color:rgb(204,102,204)">272</span></div>
</li>
</ol>
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> </div>
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"><span style="color:rgb(204,102,204)">THIS can't be!</span></div>
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> </div>
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"><span style="color:rgb(204,102,204)">I thinkt it is an Error in the Compiler</span></div>
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> </div>
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> </div>
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"> </div>
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"><span style="color:rgb(204,102,204)">Regards,</span></div>
<div style="font:1em/1.2em monospace;margin:0px;padding:0px;background:none;vertical-align:top"><span style="color:rgb(204,102,204)"> Kirill</span></div>
</div>
</div>
</div></div></body></html>