Since it now is possible to define types inside a class,
please look at the example below.
the class internal type section continues accross the border of the
visibility "protected" => an error is given that after the "f" a "=" was
expected (as needed for a new type "f")
Is that intended? Or should a visibility change exit the type section?
program Project1;
{$mode objfpc}{$H+}
type
Tfoo=class
private
type
TF = (one,two,three);
// var // enable this and it works
protected
f: TF;
end;
begin
end.
_______________________________________________
fpc-devel maillist - [email protected]
http://lists.freepascal.org/mailman/listinfo/fpc-devel
