Compiler crashes with objccategory

Compiling the following program, using either FPC-3.2.2 or trunk, on aarch64-darwin crashes the compiler:

//---------- BEGIN ----------

program Project1;

{mode objfpc}{H+} {$ModeSwitch objectivec1}

uses CoreBluetooth;

type Test=objccategory(NSObject,CBCentralManagerDelegateProtocol) procedure centralManagerDidUpdateState (central: CBCentralManager); end;

begin end.

//---------- END ----------