parallel_benchmark.cr

require "benchmark"
require "http/client"

def get(url)
  HTTP::Client.get(url)
end

Benchmark.bm do |x|
  x.report("sync") do
    get("http://www.google.com")
    get("http://www.google.com")
    get("http://www.google.com")
    get("http://www.google.com")
    get("http://www.google.com")
    get("http://www.google.com")
    get("http://www.google.com")
    get("http://www.google.com")
    get("http://www.google.com")
  end

  x.report("parallel") do
    parallel(
      get("http://www.google.com"),
      get("http://www.google.com"),
      get("http://www.google.com"),
      get("http://www.google.com"),
      get("http://www.google.com"),
      get("http://www.google.com"),
      get("http://www.google.com"),
      get("http://www.google.com"),
      get("http://www.google.com"),
    )
  end
end