Re: rdb$get_context

[RUST]

interface
function PID:Integer; cdecl; export;

implementation
Uses Windows;

function PID:Integer; cdecl; export;
begin
    Result := GetCurrentProcessId;
end;



DECLARE EXTERNAL FUNCTION PID
RETURNS INTEGER BY VALUE
ENTRY_POINT 'PID' MODULE_NAME 'IBUTILS.DLL'