From b934d63e9b45f73ffb61f096b61a18a2efe09bdc Mon Sep 17 00:00:00 2001 From: inoussa Date: Mon, 29 Oct 2012 19:15:58 +0000 Subject: [PATCH] Initialize "Result" to avoid garbage due to optimization git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2584 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- wst/trunk/date_utils.pas | 1 + 1 file changed, 1 insertion(+) diff --git a/wst/trunk/date_utils.pas b/wst/trunk/date_utils.pas index 8f3a484e1..52d57dbae 100644 --- a/wst/trunk/date_utils.pas +++ b/wst/trunk/date_utils.pas @@ -751,6 +751,7 @@ function xsd_DurationToStr(const AValue : TDurationRec) : string; var strTime, strDate : string; begin + Result := ''; if ( AValue.FractionalSecond > 0 ) then begin strTime := IntToStr(AValue.Second) + '.' + IntToStr(AValue.FractionalSecond) + 'S'; end else begin