On Sunday 27 May 2007, Jonas Maebe wrote:
> On 26 May 2007, at 23:40, Mario R. Carro wrote:
> > Hi. Why does this fail to compile with FPC 2.3.1? (from ZeosLib):
> >
> > procedure TZExpression.SetTokenizer(Value: IZTokenizer);
> > var
> > Parser: TZExpressionParser;
> > begin
> > FTokenizer := Value;
> > TZExpressionParser(FParser).Tokenizer := Value; // <-- This line
> > fails
> > end;
>
> Fixed.
>
Great! But look at the attached test: The compilation of the
line "ArrayInts := nil" fails with the same error. Rewriting it
as "FArrayInts := nil" lets the compiler accept it. I'm using r7494.
>
> Jonas
Thanks,
Mario
> _______________________________________________
> fpc-devel maillist - [email protected]
> http://lists.freepascal.org/mailman/listinfo/fpc-devel
program Test;
type
TArrayInts = array of Integer;
TTest = class
protected
FArrayInts: TArrayInts;
public
constructor Create;
property ArrayInts: TArrayInts read FArrayInts write FArrayInts;
end;
constructor TTest.Create;
begin
inherited;
ArrayInts := nil; // <-- compilation error here
end;
begin
end.
_______________________________________________
fpc-devel maillist - [email protected]
http://lists.freepascal.org/mailman/listinfo/fpc-devel
