Am 26.02.2016 20:31 schrieb "silvioprog" <silviop...@gmail.com>:
>
> Hello,
>
> Consider the following code:
>
> === code ===
>
> program project1;
>
> {$mode objfpc}{$H+}
> //{$codepage utf8}
>
> uses Classes;
>
> type
> TFoo = class helper for TStream
> public
> procedure Bar;
> end;
>
> procedure TFoo.Bar;
> begin
> end;
>
> var
> s: string = '';
> m: TStream;
> begin
> m := TMemoryStream.Create;
> try
> m.Bar;
> finally
> m.Free;
> end;
> end.
>
> === /code ===
>
> It compiles fine, but when you uncomment the line "//{$codepage utf8}",
it raises:
>
> 'Error: identifier idents no member "Bar"'
>
> If you confirm it as bug I can open a issue on bugtracker.
That definitely shouldn't be the case. Please report.
Regards,
Sven
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
