<div>Strangely,my 240 compiler do compile your sample code.</div>
<div> </div>
<div>My enviroment:windows xp + fpc v2.4.0 + x86.<br><br></div>
<div class="gmail_quote">On Tue, Jan 19, 2010 at 8:08 PM, Carsten Bager <span dir="ltr"><<a href="mailto:carsten@beas.dk">carsten@beas.dk</a>></span> wrote:<br>
<blockquote style="BORDER-LEFT: #ccc 1px solid; MARGIN: 0px 0px 0px 0.8ex; PADDING-LEFT: 1ex" class="gmail_quote"><br>I have a problem with the new 240 compiler.<br>I get errors when calling functions in the sysutils unit.<br>
I have tested the 251 compiler, and it was exactly the same.<br>I am normally using the 224 compiler, and it works fine.<br><br>Anybody have a hint.<br><br>Carsten<br><br><br>Example:<br><br>program hw1;<br>uses<br> sysutils;<br>
<br>Type<br>  Datetime_typ=Packed record<br>     year,month,day,hour,min,sec,sec100,dayOfWeek:word;<br>  end;<br>var dt:dateTime_typ;<br>Begin<br> WriteLn('Test');<br> decodeTime(Time,dt.hour,dt.min,dt.sec,dt.sec100);<br>
End.<br><br>------------------------------------------------------<br>This program gives  the following output.<br>------------------------------------------------------<br><br>/ # ./hw1<br>Test<br>An unhandled exception occurred at $BEAD2EE4 :<br>
EAccessViolation : Access violation<br> $BEAD2EE4<br><br>Heap dump by heaptrc unit<br>10 memory blocks allocated : 853/888<br>8 memory blocks freed     : 817/848<br>2 unfreed memory blocks : 36<br>True heap size : 393216<br>
True free heap : 393024<br>Should be : 393048<br>Call trace for block $400501E0 size 24<br> $0000E1EC<br> $0000EEFC<br> $000080CC<br>Call trace for block $40050180 size 12<br> $0001BB04<br> $0000EEFC<br> $000080CC<br>/ #<br>
<br>--------------------------------<br>Compile info<br>--------------------------------<br>+---------------------------------+<br>| CFG file ver. 1.00 d. 19/9-2006 |<br>+---------------------------------+<br>+---------------------------------+<br>
| Cross compiling for ARM 9 Linux |<br>+---------------------------------+<br>+--------------------------------------+<br>|   Compiling with Runetime check !!   |<br>|   Stack checking / Range checking    |<br>| Check overflow of integer operations |<br>
+--------------------------------------+<br>+--------------+<br>| Standard lib |<br>+--------------+<br>Hint: End of reading config file /etc/fpc.cfg<br>Free Pascal Compiler version 2.4.0 [2010/01/19] for arm<br>Copyright (c) 1993-2009 by Florian Klaempfl<br>
Target OS: Linux for ARM<br>Compiling hw1.pp<br>Assembling hw1<br>Linking hw1<br>16 lines compiled, 0.3 sec<br>1 hint(s) issued<br><br>_______________________________________________<br>fpc-pascal maillist  -  <a href="mailto:fpc-pascal@lists.freepascal.org">fpc-pascal@lists.freepascal.org</a><br>
<a href="http://lists.freepascal.org/mailman/listinfo/fpc-pascal" target="_blank">http://lists.freepascal.org/mailman/listinfo/fpc-pascal</a><br></blockquote></div><br>