16202: Add Workbench.SSHHelpHostSuffix

[arvados.git] / services / api / test / helpers / time_block.rb

# Copyright (C) The Arvados Authors. All rights reserved.
#
# SPDX-License-Identifier: AGPL-3.0

class ActiveSupport::TestCase
  def time_block label
    t0 = Time.now
    begin
      yield
    ensure
      t1 = Time.now
      $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