The application freezes at TBESEN.Free after compile error.

[dvilker]

As example:

var
  B: TBESEN;
begin
  B := TBESEN.Create;
  try
    try
      B.Execute('+'); // Compile error
    except on E: Exception do
      // Ignore
    end;
  finally
    B.Free; // Hungs here
  end;
end;  

Setting:

{$define PurePascal}
{$define PurePascalExecuteByteCode}

Lazarus 2.2.6 (rev Unknown) FPC 3.2.2 x86_64-darwin-cocoa