* new test

git-svn-id: trunk@7031 -

.gitattributes

@@ -7253,6 +7253,7 @@ tests/webtbf/tw8264a.pp svneol=native#text/plain
 tests/webtbf/tw8398.pp svneol=native#text/plain
 tests/webtbf/tw8528.pp svneol=native#text/plain
 tests/webtbf/tw8583.pp svneol=native#text/plain
+tests/webtbf/tw8588.pp svneol=native#text/plain
 tests/webtbf/uw0744.pp svneol=native#text/plain
 tests/webtbf/uw0840a.pp svneol=native#text/plain
 tests/webtbf/uw0840b.pp svneol=native#text/plain

tests/webtbf/tw8588.pp

@@ -0,0 +1,16 @@
+{ %fail }
+
+uses
+  Classes;
+
+type
+  TForm1 = class
+  private
+    { private declarations }
+    fScript:TStringlist.Create; <--- erroneous decl.
+  public
+    { public declarations }
+  end; 
+
+begin
+end.