- removed tests as modern Delphi versions behave differently (mantis #35886)

git-svn-id: trunk@42512 -

.gitattributes

@@ -16054,7 +16054,6 @@ tests/webtbf/tw4737.pp svneol=native#text/plain
 tests/webtbf/tw4757.pp svneol=native#text/plain
 tests/webtbf/tw4764.pp svneol=native#text/plain
 tests/webtbf/tw4777.pp svneol=native#text/plain
-tests/webtbf/tw4778a.pp svneol=native#text/plain
 tests/webtbf/tw4781a.pp svneol=native#text/plain
 tests/webtbf/tw4781b.pp svneol=native#text/plain
 tests/webtbf/tw4893d.pp svneol=native#text/plain
@@ -17943,7 +17942,6 @@ tests/webtbs/tw4705.pp svneol=native#text/plain
 tests/webtbs/tw4722.pp svneol=native#text/plain
 tests/webtbs/tw4763.pp svneol=native#text/plain
 tests/webtbs/tw4768.pp svneol=native#text/plain
-tests/webtbs/tw4778.pp svneol=native#text/plain
 tests/webtbs/tw4789.pp svneol=native#text/plain
 tests/webtbs/tw4809.pp svneol=native#text/plain
 tests/webtbs/tw4826.pp svneol=native#text/plain

tests/webtbf/tw4778a.pp

@@ -1,21 +0,0 @@
-{ %fail }
-
-{ Source provided for Free Pascal Bug Report 4778 }
-{ Submitted by "Phil H." on  2006-02-06 }
-{ e-mail: [email protected] }
-program Test1;
-
-{$mode delphi}
-
-var
-  AnInt : Integer;
-  
-begin
-
-  AnInt := 1;
-  
-//  WriteLn(Single(AnInt));
-
-  WriteLn(Double(AnInt));
-  
-end.

tests/webtbs/tw4778.pp

@@ -1,20 +0,0 @@
-{ Source provided for Free Pascal Bug Report 4778 }
-{ Submitted by "Phil H." on  2006-02-06 }
-{ e-mail: [email protected] }
-program Test1;
-
-{$mode delphi}
-
-var
-  AnInt : Longint;
-  
-begin
-
-  AnInt := 1;
-  
-  if single(anint) > 0.9 then
-    halt(1);
-
-//  WriteLn(Double(AnInt));
-  
-end.