Add benchmarks

Author: BenLauwens

test/benchmarks/benchmark_coroutines_MM1.jl

@@ -0,0 +1,33 @@
+using SimJulia, Distributions, BenchmarkTools
+
+@stateful function exp_source(sim::Simulation, lambd::Float64, server::Resource, mu::Float64)
+  while true
+    dt = rand(Exponential(1/lambd))
+    @yield return Timeout(sim, dt)
+    @Coroutine customer2(sim, server, mu)
+  end
+end
+
+@stateful function customer(sim::Simulation, server::Resource, mu::Float64)
+  @yield return Request(server)
+  dt = rand(Exponential(1/mu))
+  @yield return Timeout(sim, dt)
+  @yield return Release(server)
+end
+
+@stateful function customer2(sim::Simulation, server::Resource, mu::Float64)
+  @Request server req begin
+    dt = rand(Exponential(1/mu))
+    @yield return Timeout(sim, dt)
+  end
+end
+
+function test_mm1(n::Float64)
+  sim = Simulation()
+  server = Resource(sim, 1)
+  @Coroutine exp_source(sim, 1.0, server, 1.1)
+  run(sim, n)
+end
+
+BenchmarkTools.DEFAULT_PARAMETERS.samples = 100
+println(mean(@benchmark test_mm1(100.0)))

test/benchmarks/benchmark_coroutines_fibonnaci.jl

@@ -0,0 +1,22 @@
+using SimJulia, BenchmarkTools
+
+@stateful function fibonnaci(sim::Simulation)
+  a = 0.0
+  b = 1.0
+  while true
+    @yield return Timeout(sim, 1)
+    a, b = b, a+b
+  end
+end
+
+function run_test()
+  sim = Simulation()
+  @Coroutine fibonnaci(sim)
+  run(sim, 10)
+end
+
+run_test()
+BenchmarkTools.DEFAULT_PARAMETERS.samples = 100
+println(mean(@benchmark run_test()))
+#@profile for i in 1:100; run_test(); end
+#Profile.print(format=:flat)

test/benchmarks/benchmark_mixed_MM1.jl

@@ -0,0 +1,33 @@
+using SimJulia, Distributions, BenchmarkTools
+
+@stateful function exp_source(sim::Simulation, lambd::Float64, server::Resource, mu::Float64)
+  while true
+    dt = rand(Exponential(1/lambd))
+    @yield return Timeout(sim, dt)
+    @Process customer2(sim, server, mu)
+  end
+end
+
+function customer(sim::Simulation, server::Resource, mu::Float64)
+  yield(Request(server))
+  dt = rand(Exponential(1/mu))
+  yield(Timeout(sim, dt))
+  yield(Release(server))
+end
+
+function customer2(sim::Simulation, server::Resource, mu::Float64)
+  Request(server) do req
+    dt = rand(Exponential(1/mu))
+    yield(Timeout(sim, dt))
+  end
+end
+
+function test_mm1(n::Float64)
+  sim = Simulation()
+  server = Resource(sim, 1)
+  @Coroutine exp_source(sim, 1.0, server, 1.1)
+  run(sim, n)
+end
+
+BenchmarkTools.DEFAULT_PARAMETERS.samples = 100
+println(mean(@benchmark test_mm1(100.0)))

test/benchmarks/benchmark_processes_MM1.jl

@@ -0,0 +1,33 @@
+using SimJulia, Distributions, BenchmarkTools
+
+function exp_source(sim::Simulation, lambd::Float64, server::Resource, mu::Float64)
+  while true
+    dt = rand(Exponential(1/lambd))
+    yield(Timeout(sim, dt))
+    @Process customer2(sim, server, mu)
+  end
+end
+
+function customer(sim::Simulation, server::Resource, mu::Float64)
+  yield(Request(server))
+  dt = rand(Exponential(1/mu))
+  yield(Timeout(sim, dt))
+  yield(Release(server))
+end
+
+function customer2(sim::Simulation, server::Resource, mu::Float64)
+  Request(server) do req
+    dt = rand(Exponential(1/mu))
+    yield(Timeout(sim, dt))
+  end
+end
+
+function test_mm1(n::Float64)
+  sim = Simulation()
+  server = Resource(sim, 1)
+  @Process exp_source(sim, 1.0, server, 1.1)
+  run(sim, n)
+end
+
+BenchmarkTools.DEFAULT_PARAMETERS.samples = 100
+println(mean(@benchmark test_mm1(100.0)))

test/benchmarks/benchmark_processes_fibonnaci.jl

@@ -0,0 +1,22 @@
+using SimJulia, BenchmarkTools
+
+function fibonnaci(sim::Simulation)
+  a = 0.0
+  b = 1.0
+  while true
+    yield(Timeout(sim, 1))
+    a, b = b, a+b
+  end
+end
+
+function run_test()
+  sim = Simulation()
+  @Process fibonnaci(sim)
+  run(sim, 10)
+end
+
+run_test()
+BenchmarkTools.DEFAULT_PARAMETERS.samples = 100
+println(mean(@benchmark run_test()))
+#@profile for i in 1:100; run_test(); end
+#Profile.print(format=:flat)

test/benchmarks/benchmark_statemachines.jl

@@ -0,0 +1,22 @@
+using SimJulia, BenchmarkTools
+
+@stateful function fibonnaci(sim::Simulation)
+  a = 0.0
+  b = 1.0
+  while true
+    @yield return nothing
+    a, b = b, a+b
+  end
+end
+
+function run_test()
+  sim = Simulation()
+  fib = fibonnaci(sim)
+  for i in 1:10
+    fib()
+  end
+end
+
+run_test()
+BenchmarkTools.DEFAULT_PARAMETERS.samples = 100
+println(mean(@benchmark run_test()))

test/benchmarks/benchmark_tasks.jl

@@ -0,0 +1,22 @@
+using SimJulia, BenchmarkTools
+
+function fibonnaci(sim::Simulation)
+  a = 0.0
+  b = 1.0
+  while true
+    SimJulia.produce(Timeout(sim, 1))
+    a, b = b, a+b
+  end
+end
+
+function run_test()
+  sim = Simulation()
+  fib = @task fibonnaci(sim)
+  for i in 1:10
+    SimJulia.consume(fib)
+  end
+end
+
+run_test()
+BenchmarkTools.DEFAULT_PARAMETERS.samples = 100
+println(mean(@benchmark run_test()))