Баги IDE PascalABC.Net

begin
  var i := 5;
  var ptr := @i;
  ptr^ := 3;
end.

begin
  match 1 with
    integer(var a): Print(1);
  end;
end.

unit TestUnit;
 
type
  __TSomeName = class
  end;
end.

unit TestUnit2;
uses TestUnit;
 
type
  TA = TestUnit.__TSomeName;
end.

unit TestUnit2;
uses TestUnit;
 
type
  MyTypeTSomeName;
end.

unit TestUnit2;
uses TestUnit;
 
type
  MyTypeit.__TSomeName;
end.

begin
  var s := SeqGen(10, p -> p * p, 1);
  var a := Arr(s);
  a.Println();
  Writeln(a.GetType());
end.

type
  t1=class
    property p1:byte write writeln(value);
  end;
 
begin end.

procedure p1(b1, b2: byte) := exit;
 
type
  t1 = class
    constructor(p: procedure) := exit;
  end;
 
begin
  new t1(//обязательно в конструкторе, в методе выводит правильную ошибку
    ()->
    p1(0)//Ошибка: Неверное число параметров конструктора
  )
end.

uses System.Reflection;
 
type
  r1=record//b1 и b2 должно сохранять. b3 и b4 не должно
    public b1:byte;
    private b2:byte;
    
    public const b3:byte = 1;
    public class b4:byte;
  end;
 
begin
  var t := typeof(r1);
  
  //как это работает сейчас:
  t.GetFields//b1 b4 b3
  .Where(fi->not fi.IsStatic)//b1 b3
  .Where(fi->not fi.IsLiteral)//b1
  .PrintLines;//выводит только b1
  
  writeln('-'*50);
  
  //как надо:
  t.GetFields(
    BindingFlags.GetField or
    BindingFlags.Instance or
    BindingFlags.Public or
    BindingFlags.NonPublic
  )//b1 b2 b3
  .Where(fi->not fi.IsLiteral)//b1 b2
  .PrintLines;//выводит как и должно, b1 и b2
  
end.

var True: boolean;
begin  
 True:=False; 
 Print(True); 
end.

var
 true:boolean;
begin
  true:=false;
  writeln(true);
  readln;
end.