<div dir="ltr"><div class="gmail_extra">I just got fpc from svn trunk (<a href="http://svn.freepascal.org/svn/fpc/trunk/">http://svn.freepascal.org/svn/fpc/trunk/</a>) and tested. Before I submit to Mantis, can you tell me if I made a mistake here?</div><div class="gmail_extra"><br></div><div class="gmail_extra"><div class="gmail_extra">program hello;</div><div class="gmail_extra"><br></div><div class="gmail_extra">{$mode delphi}</div><div class="gmail_extra"><br></div><div class="gmail_extra">procedure Test;</div><div class="gmail_extra">var</div><div class="gmail_extra">  Data: array of Integer = [0, 15, 24];</div><div class="gmail_extra">  I: Integer;</div><div class="gmail_extra">begin</div><div class="gmail_extra">  WriteLn('Testing new array features');</div><div class="gmail_extra">  for I in Data do</div><div class="gmail_extra">    WriteLn(Data[I]);</div><div class="gmail_extra">end;</div><div class="gmail_extra"><br></div><div class="gmail_extra">begin</div><div class="gmail_extra">  Test;<span style="white-space:pre"> </span></div><div class="gmail_extra">end.</div><div class="gmail_extra"><br></div><div class="gmail_extra">Outputs:</div><div class="gmail_extra"><br></div><div class="gmail_extra">Testing new array features</div><div class="gmail_extra">0</div><div class="gmail_extra">0</div><div class="gmail_extra">-2235258</div></div></div>