blob: eee1c6cea10048f24febdbdef63c0d6447a64a9e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
{ %FAIL }
{ Source provided for Free Pascal Bug Report 4529 }
{ Submitted by "Vincent Snijders" on 2005-11-20 }
{ e-mail: vsnijders@quicknet.nl }
program Project1;
{$mode objfpc}{$H+}
uses
Classes
{ add your units here };
type
MyClass = class(TComponent)
FClassVar: integer; static;
end;
begin
end.
|
