only log if slow

Author: IanButterworth

test/buildkitetestjson.jl

@@ -214,7 +214,7 @@ function write_testset_json_files(dir::String, testset::Test.DefaultTestSet)
         res_file = joinpath(dir, "results_$(name)_$(i).json")
         open(io -> json_repr(io, chunk), res_file, "w")
         push!(files, res_file)
-        @info "Saved $(basename(res_file)) ($(Base.format_bytes(filesize(res_file))))"
+        @debug "Saved $(basename(res_file)) ($(Base.format_bytes(filesize(res_file))))"
     end
     return files
 end

test/testdefs.jl

@@ -89,9 +89,14 @@ function runtests(name, path, isolate=true; seed=nothing)
         tc = Test.get_test_counts(ts)
 
         if Base.get_bool_env("CI", false)
-            @info "Writing test result data to $(@__DIR__)"
+            # @info "Writing test result data to $(@__DIR__)"
             # Profile.clear()
-            @time "write_testset_json_files" write_testset_json_files(@__DIR__, ts)
+            t = @elapsed result_files = write_testset_json_files(@__DIR__, ts)
+            if t > 5
+                sizes = map(f -> Base.format_bytes(filesize(f)), result_files)
+                result_files_info = Dict(zip(result_files, sizes))
+                @warn "Writing test result data was slow: $t seconds" result_files_info
+            end
             # Profile.print(IOContext(stdout, :displaysize=>(1000,200)), noisefloor=1.0)
         end