unit u_alwaysrestore;
interface

[PCUAlwaysRestore]
function myfunc: integer;

type
[PCUAlwaysRestore]
MyClass = class
  
end;

implementation

function myfunc: integer;
begin
  
end;
end.