dwsIOCPWorkerThreadPool does not compile in RS10.1 Berlin

[Former user]

procedure TIOCPWorkerThread.Execute;

   procedure ExecuteAnonymousFunction(p : PAnonymousWorkUnit);
   begin
      try
         p^();
      finally
         p^._Release;  // compiler dies here with an "E2018 Record, object or class type required"
      end;
   end;

var
   data : TIOCPData;
begin
   CoInitialize(nil);

[Eric Grange]

Initial support for external record (Fixed Issue #92)

→ <<cset d7e6f759d3bf>>

[Eric Grange]

Incorrectly closed

[Eric Grange]

Not reproducible with Berlin 10.1 update 2 Starter...