anchor.diff:        end;
       end;
     finally
  +    if not FMethod.HasAttribute<IsReference>(nil) then
  +      AddToContext(LMethodResult);
  +
       FreeContext;
  -
  -    if not FMethod.HasAttribute<IsReference>(nil) then
  -      CleanupGarbage(LMethodResult);
     end;
   end;
   
  
positive.code: end;
  
  procedure TMARSActivationRecord.FreeContext;
  begin
    while FContext.Count > 0 do
    begin
      CleanupGarbage(FContext[0]);
      FContext.Delete(0);
    end;
  end;
  
  
negative.code: 
      procedure AddToContext(AValue: TValue); virtual;
  
      procedure Prepare; virtual;
      procedure Invoke; virtual;
  
  