Browse Source

* new bug

peter 22 năm trước cách đây
mục cha
commit
752ed1b05b
1 tập tin đã thay đổi với 10 bổ sung0 xóa
  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.