Fix off by one error in sample count (#92)

src/benchmarking.jl

@@ -103,7 +103,7 @@ function benchmark(init, setup, f, teardown; evals::Union{Int, Nothing}=nothing,
         samples === nothing ? push!(data, sample) : (data[i += 1] = sample)
     end
 
-    samples === nothing || resize!(data, i-1)
+    samples === nothing || resize!(data, i)
 
     Benchmark(data)
 end

test/runtests.jl

@@ -47,6 +47,20 @@ using Chairmarks: Sample, Benchmark
             @test length(res.samples) < 100
         end
 
+        @testset "low sample count (#91)" begin
+            b = @be sleep(.001) evals=4 samples=0
+            @test Chairmarks.only(b.samples).warmup == 0 # Qualify only for compat
+            @test_broken Chairmarks.only(b.samples).evals == 4
+
+            b = @be sleep(.001) evals=4 samples=1
+            @test Chairmarks.only(b.samples).warmup == 1
+            @test Chairmarks.only(b.samples).evals == 4
+
+            b = @be sleep(.001) evals=4 samples=2
+            @test length(b.samples) == 2
+            @test all(s -> s.warmup == 1 && s.evals == 4, b.samples)
+        end
+
         @testset "errors" begin
             @test_throws UndefKeywordError Sample(allocs=1.5, bytes=1729) # needs `time`
         end