Re: [fpc-pascal] Codepage + class helper raises "Error identifier idents no member ..."

2016-03-20 Thread Bart
On 2/26/16, silvioprog  wrote:

> It compiles fine, but when you uncomment the line "//{$codepage utf8}", it
> raises:
>
> 'Error: identifier idents no member "Bar"'

@Silvio: Sven fixed it in trunk.
Can you test and report back in http://bugs.freepascal.org/view.php?id=29745
(I don't have fpc trunk)

Bart
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal


Re: [fpc-pascal] Codepage + class helper raises "Error identifier idents no member ..."

2016-03-19 Thread silvioprog
On Wed, Mar 16, 2016 at 8:53 PM, Bart  wrote:
[...]

> @Silvio: Sven fixed it in trunk.
> Can you test and report back in
> http://bugs.freepascal.org/view.php?id=29745
> (I don't have fpc trunk)


Now it is working like a charm. Thank you Bart and Sven! :-D

(you can close the issue ^^ )

-- 
Silvio Clécio
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Codepage + class helper raises "Error identifier idents no member ..."

2016-03-19 Thread Bart
On 3/17/16, silvioprog  wrote:

> Now it is working like a charm. Thank you Bart and Sven! :-D

I merely reported it in Mantis.

> (you can close the issue ^^ )

Done.

Bart
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal


Re: [fpc-pascal] Codepage + class helper raises "Error identifier idents no member ..."

2016-02-29 Thread silvioprog
On Sat, Feb 27, 2016 at 10:13 AM, Bart  wrote:

> On 2/27/16, Sven Barth  wrote:
>
> > That definitely shouldn't be the case. Please report.
>
> Done.
> http://bugs.freepascal.org/view.php?id=29745


Thank you! :-)

-- 
Silvio Clécio
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Codepage + class helper raises "Error identifier idents no member ..."

2016-02-27 Thread Bart
On 2/27/16, Sven Barth  wrote:

> That definitely shouldn't be the case. Please report.

Done.
http://bugs.freepascal.org/view.php?id=29745

Bart
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal


Re: [fpc-pascal] Codepage + class helper raises "Error identifier idents no member ..."

2016-02-27 Thread Bart
On 2/27/16, Bart  wrote:

>> It seems to do it for any codepage you insert.
>
> And it disappears if you comment out the {H+} directive.

It's the combination of
- codepage
- {$H+}
- var s: string = '';

Removing the initiaiation of the local string var (replace it with:
"var s: string")  makes compilation possible.

Bart
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal


Re: [fpc-pascal] Codepage + class helper raises "Error identifier idents no member ..."

2016-02-27 Thread Bart
On 2/27/16, Bart  wrote:

> It seems to do it for any codepage you insert.

And it disappears if you comment out the {H+} directive.

Bart
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal


Re: [fpc-pascal] Codepage + class helper raises "Error identifier idents no member ..."

2016-02-27 Thread Bart
On 2/27/16, Sven Barth  wrote:

> That definitely shouldn't be the case. Please report.

It seems to do it for any codepage you insert.

Bart
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal


Re: [fpc-pascal] Codepage + class helper raises "Error identifier idents no member ..."

2016-02-27 Thread Sven Barth
Am 26.02.2016 20:31 schrieb "silvioprog" :
>
> 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

Re: [fpc-pascal] Codepage + class helper raises "Error identifier idents no member ..."

2016-02-26 Thread silvioprog
On Fri, Feb 26, 2016 at 8:29 PM, Bart  wrote:

> On 2/26/16, silvioprog  wrote:
>
> > It compiles fine, but when you uncomment the line "//{$codepage utf8}",
> it
> > raises:
> >
> > 'Error: identifier idents no member "Bar"'
>
> Same here.
> fpc 3.0.0 win32.


Oops, I forgot to show my env. ^^'

Lazarus 1.7 rUnknown FPC 3.1.1 i386-win32-win32/win64

-- 
Silvio Clécio
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Codepage + class helper raises "Error identifier idents no member ..."

2016-02-26 Thread Bart
On 2/26/16, silvioprog  wrote:

> It compiles fine, but when you uncomment the line "//{$codepage utf8}", it
> raises:
>
> 'Error: identifier idents no member "Bar"'

Same here.
fpc 3.0.0 win32.

Bart
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal


[fpc-pascal] Codepage + class helper raises "Error identifier idents no member ..."

2016-02-26 Thread silvioprog
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.

-- 
Silvio Clécio
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal