Browse Source

* removed, compiler can compile the code

peter 20 years ago
parent
commit
1f27423e32
1 changed files with 0 additions and 11 deletions
  1. 0 11
      tests/tbf/tb0169.pp

+ 0 - 11
tests/tbf/tb0169.pp

@@ -1,11 +0,0 @@
-{ %fail }
-
-var
-   l : longint;
-   s : single;
-
-begin
-   { THis should fail with an invalid type cast }
-   l:=longint(single(s+1))+12;
-end.
-