diff --git a/tests/webtbs/tw2809.pp b/tests/webtbs/tw2809.pp
new file mode 100644
index 0000000000..bada39d1ac
--- /dev/null
+++ b/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.