paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-11-07 04:49:30 +01:00
Code Issues Packages Projects Releases Wiki Activity

fpvectorial: Fixes a typo introduced in commit 39538 #8ec4f4bd8c

Browse Source 
git-svn-id: trunk@39566 -
This commit is contained in:
sekelsenmat 2012-12-17 09:22:38 +00:00
parent d9f9355bcc
commit 97fc0ecda5
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/fpvectorial/epsvectorialreader.pas
View File

@ -358,7 +358,7 @@ begin
else else
// Code for normal numbers, decimals // Code for normal numbers, decimals
begin begin
FloatValue := 0; FloatValue := StrToFloat(StrValue, FPointSeparator);
end; end;
end; end;
@ -1095,7 +1095,7 @@ begin
if lIndexN < 0 then raise Exception.Create('[TvEPSVectorialReader.ExecuteStackManipulationOperator] rool operator: n must be positive or zero'); if lIndexN < 0 then raise Exception.Create('[TvEPSVectorialReader.ExecuteStackManipulationOperator] rool operator: n must be positive or zero');
if lIndexJ = 0 then Exit; if lIndexJ = 0 then Exit(True);
SetLength(lTokens, lIndexN); SetLength(lTokens, lIndexN);