code.delx.au - gnu-emacs-elpa/blob - benchmark/scenarios.el

   1 ;; Setup
   2 (add-hook 'js-mode-hook 'context-coloring-mode)
   3 (elp-instrument-package "context-coloring-")
   4
   5 (dolist (path '("./fixtures/jquery-2.1.1.js"
   6                 "./fixtures/lodash-2.4.1.js"
   7                 "./fixtures/async-0.9.0.js"
   8                 "./fixtures/mkdirp-0.5.0.js"))
   9
  10   ;; Test 5 times.
  11   (find-file (expand-file-name
  12               path
  13               (file-name-directory (or load-file-name buffer-file-name))))
  14   (dotimes (n 4)
  15     (sit-for 2)
  16     (revert-buffer t t))
  17   (sit-for 2))
  18
  19 (elp-results)