add a prefixing to benchmarks

Author: seabbs

benchmark/make_epiaware_suite.jl

@@ -3,7 +3,28 @@
 """
 function make_epiaware_suite(model; check = true,
         adbackends = [:forwarddiff, :reversediff, :reversediff_compiled])
-    suite = TuringBenchmarking.make_turing_suite(
-        model; check = check, adbackends = adbackends)
+    suite = prefix_warnings(
+        () -> TuringBenchmarking.make_turing_suite(
+            model; check = check, adbackends = adbackends),
+        model
+    )
     return suite
 end
+
+function prefix_warnings(f, g)
+    original_stderr = stderr
+    (read_pipe, write_pipe) = redirect_stderr()
+    result = nothing
+    try
+        result = f()
+    finally
+        redirect_stderr(original_stderr)
+        close(write_pipe)
+        output = String(read(read_pipe))
+        if !isempty(output)
+            println(stderr, "\nWarnings from $(g):")
+            println(stderr, output)
+        end
+    end
+    return result
+end