fpspreadsheet: Fix crash of rpn formulas introduced by last commit

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@3353 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2014-07-20 18:28:40 +00:00
parent 7a3a9060e9
commit a7c7810ac5
2 changed files with 1 additions and 2 deletions

View File

@ -5847,7 +5847,6 @@ end;
function NewRPNItem: PRPNItem;
begin
Result := GetMem(SizeOf(TRPNItem));
Result^.FE.StringValue := '';
FillChar(Result^.FE, SizeOf(Result^.FE), 0);
Result^.FE.StringValue := '';
end;

View File

@ -90,11 +90,11 @@
<Unit3>
<Filename Value="numberstests.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="numberstests"/>
</Unit3>
<Unit4>
<Filename Value="manualtests.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="manualtests"/>
</Unit4>
<Unit5>
<Filename Value="testsutility.pas"/>