tests: add fail test for class properties

git-svn-id: trunk@14639 -

.gitattributes

@@ -8899,6 +8899,7 @@ tests/test/tclass12a.pp svneol=native#text/pascal
 tests/test/tclass12b.pp svneol=native#text/pascal
 tests/test/tclass12c.pp svneol=native#text/pascal
 tests/test/tclass13.pp svneol=native#text/pascal
+tests/test/tclass14a.pp svneol=native#text/pascal
 tests/test/tclass2.pp svneol=native#text/plain
 tests/test/tclass3.pp svneol=native#text/plain
 tests/test/tclass4.pp svneol=native#text/plain

tests/test/tclass14a.pp

@@ -0,0 +1,18 @@
+{ %FAIL}
+program tclass14a;
+
+{$ifdef fpc}
+  {$mode delphi}
+{$endif}
+
+type
+  TSomeClass = class
+  public
+    class var
+      FSomeField: Integer;
+    // class properties are not for sreaming therefore 'stored' is not supported
+    class property SomeField: Integer read FSomeField write FSomeField stored False;
+  end;
+
+begin
+end.