Save benchmark logs to an untracked directory.

[gnu-emacs-elpa] / benchmark / context-coloring-benchmark.el

diff --git a/benchmark/context-coloring-benchmark.el b/benchmark/context-coloring-benchmark.el
index 707188f0b1da53b4ed674ec3bf5bfd39c388fafd..6d66f18c96f03519c6a4d405bda4b6ae3a02524e 100644 (file)
--- a/benchmark/context-coloring-benchmark.el
+++ b/benchmark/context-coloring-benchmark.el
@@ -15,6 +15,7 @@
     (with-temp-buffer
       (insert "\n")
       (append-to-buffer results-buffer (point-min) (point-max))))
+  (make-directory (context-coloring-benchmark-resolve-path "./logs") t)
   (append-to-file nil nil result-file))
 
 (defun context-coloring-benchmark-next-tick (function)
@@ -34,7 +35,7 @@
 (defun context-coloring-benchmark-async (title setup teardown fixtures callback)
   (funcall setup)
   (let ((result-file (context-coloring-benchmark-resolve-path
-                      (concat "./results-" title "-" (format-time-string "%s") ".log"))))
+                      (concat "./logs/results-" title "-" (format-time-string "%s") ".log"))))
     (context-coloring-benchmark-next
      fixtures
      (lambda (path next)