Fatal Error (Exception External:?) after second exception in Interfaced based Services

[wanderlan]

Scenario: Windows 10, 64 bit Lazarus 2.2.2, 64 bit Freepascal 3.2.2 Sample 14 - Interfaced based services

In Project14ServerHttp.dpr Change the method 'Add' by inserting an exception: function TServiceCalculator.Add(n1, n2: integer): integer; begin result := n1+n2; raise Exception.Create('Test'); // <<< insert this exception end;

In browser type: http://localhost:8888/root/calculator/add?n1=1&n2=2 The first execution is ok, the exception is showed correctly but execute again... the server goes down with the message... >>> Fatal error, External Exception: ?

[wanderlan]

I tracked the bug, it seems occurs in the CallMethod assembly code (starting at line 57968 in mormot.pas)