[EMAIL PROTECTED] schrieb:
This program runed in valgrind brings on error:
program val;
var
n, e: Integer;
begin
System.Val('', n, e);
end.
==18377== Conditional jump or move depends on uninitialised value(s)
==18377== at 0x804EDC5:
SYSTEM_INITVAL$SHORTSTRING$BOOLEAN$BYTE$$LONGINT (sstrings.inc:768)
==18377== by 0x804EEDA: fpc_val_sint_shortstr (sstrings.inc:819)
==18377== by 0x805171A: fpc_val_sint_ansistr (astrings.inc:881)
==18377== by 0x804827C: main (val.pas:5)
Problem is that InitVal does not take into account empty string.
And this little patch solves this for me.
Thanks, applied.
_______________________________________________
fpc-devel maillist - fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel