* don't allow initialzed threadvars

tests/tbf/tb0128.pp

@@ -0,0 +1,11 @@
+{ %version=1.1 }
+{ %fail }
+
+{$mode delphi}
+{$threading on}
+
+threadvar
+  { Initializing threadvars is not allowed }
+  p : longint = 1;
+begin
+end.