X-Git-Url: https://git.arvados.org/arvados.git/blobdiff_plain/8884a9fff1ee4d5f6df3fc3ef43aed3a9eec9ea2..44c95f99098fa6c6acbfa82d4b6cbc6015eb6e39:/services/api/test/helpers/time_block.rb

diff --git a/services/api/test/helpers/time_block.rb b/services/api/test/helpers/time_block.rb
index a3b03ff2ba..6c444e2478 100644
--- a/services/api/test/helpers/time_block.rb
+++ b/services/api/test/helpers/time_block.rb
@@ -1,3 +1,7 @@
+# Copyright (C) The Arvados Authors. All rights reserved.
+#
+# SPDX-License-Identifier: AGPL-3.0
+
 class ActiveSupport::TestCase
   def time_block label
     t0 = Time.now
@@ -8,4 +12,16 @@ class ActiveSupport::TestCase
       $stderr.puts "#{t1 - t0}s #{label}"
     end
   end
+
+  def vmpeak c
+    open("/proc/self/status").each_line do |line|
+      print "Begin #{c} #{line}" if (line =~ /^VmHWM:/)
+    end
+    n = yield
+    open("/proc/self/status").each_line do |line|
+      print "End #{c} #{line}" if (line =~ /^VmHWM:/)
+    end
+    n
+  end
+
 end