paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-31 07:50:15 +02:00
Code Issues Packages Projects Releases Wiki Activity

* forgot to commit (test for r9623)

Browse Source 
git-svn-id: trunk@9821 -
This commit is contained in:
Jonas Maebe 2008-01-20 16:23:33 +00:00
parent 94ea214f32
commit 5290a04e33
2 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
.gitattributes vendored
View File

@ -7970,6 +7970,7 @@ tests/webtbs/tw10454.pp svneol=native#text/plain
tests/webtbs/tw1046.pp svneol=native#text/plain
tests/webtbs/tw10489.pp svneol=native#text/plain
tests/webtbs/tw1050.pp svneol=native#text/plain
tests/webtbs/tw10519.pp svneol=native#text/plain
tests/webtbs/tw10540.pp svneol=native#text/plain
tests/webtbs/tw1061.pp svneol=native#text/plain
tests/webtbs/tw10623.pp svneol=native#text/plain

9
tests/webtbs/tw10519.pp Normal file
View File

@ -0,0 +1,9 @@
uses sysutils;
var
cs:String;
begin
cs:=FormatFloat('0.00000E+0000',52247.9532745);
if (cs<>'5.22480E+0004') then
halt(1);
end.