no message

tests/webtbf/tw2670.pp

@@ -0,0 +1,16 @@
+{ %version=1.1}
+{ Source provided for Free Pascal Bug Report 2670 }
+{ Submitted by "marco" on  2003-09-07 }
+{ e-mail: [email protected] }
+program bugje;
+{$mode delphi}
+
+Uses Classes;
+
+type            theenum = (hello,hi, hoi);
+                testme= class(TComponent)
+                           field : theenum;
+                           end;
+
+begin
+end.