Ver Fonte

* new bug

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