Ver Fonte

* removed, compiler can compile the code

peter há 21 anos atrás
pai
commit
1f27423e32
1 ficheiros alterados com 0 adições e 11 exclusões
  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.
-