瀏覽代碼

* removed, compiler can compile the code

peter 21 年之前
父節點
當前提交
1f27423e32
共有 1 個文件被更改,包括 0 次插入11 次删除
  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.
-