Internal error 200109221 on Byte.SetBit in a method
Original Reporter info from Mantis: Bart @flyingsheep
-
Reporter name: Bart Broersma
Original Reporter info from Mantis: Bart @flyingsheep
- Reporter name: Bart Broersma
Description:
This program will trigger an internal error 200109221.
{$mode objfpc}
uses
SysUtils, Classes;
type
{ TFoo }
TFoo = class
procedure Bar;
end;
var
AByte: Byte;
{ TFoo }
procedure TFoo.Bar;
begin
AByte := Byte.SetBit(1);
end;
begin
end.
Steps to reproduce:
Compile with either trunk or 3.2.0
Additional information:
The error seems to be only triggered is the offending code (AByte := Byte.SetBit(1)) is part of a classes method.
In a regular procedure it just fails compilation with "Error: Illegal expression"
Discussed on forum: https://forum.lazarus.freepascal.org/index.php/topic,50705.0.html
Mantis conversion info:
- Mantis ID: 37426
- OS: Windows
- OS Build: 10
- Build: r45606
- Platform: i386
- Version: 3.3.1
- Fixed in version: 3.3.1
- Fixed in revision: 49102 (#2885d3ab)