瀏覽代碼

* new bug

peter 22 年之前
父節點
當前提交
752ed1b05b
共有 1 個文件被更改,包括 10 次插入0 次删除
  1. 10 0
      tests/webtbs/tw2809.pp

+ 10 - 0
tests/webtbs/tw2809.pp

@@ -0,0 +1,10 @@
+{ %version=1.1 }
+
+{$ifdef fpc}{$mode objfpc}{$endif}
+
+var
+  v : variant;
+begin
+  Initialize(v);
+  Finalize(v);
+end.