Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / fpc-devel / 2008-03

Valgrind Val

2 messages · 2 people · –

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

Unknown author

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.

Petr

Ing. Petr Kristan . EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice tel: +420 466335223 Czech Republic (Eastern Europe) fax: +420 466510709

Reply by email

Florian Klaempfl
to Unknown author
Show quoted text 19 lines
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.

Reply by email