#!/usr/bin/emacs --script

;; This script must be run from the test directory
;; With no argument, run all tests. Otherwise run only mentioned tests.
;; Possible arguments: --rstats --rstats-indent

(let ((current-directory (file-name-directory load-file-name)))
  (setq ess-test-path (expand-file-name "." current-directory))
  (setq ess-root-path (expand-file-name "../lisp/" current-directory)))

(add-to-list 'load-path ess-root-path)
(add-to-list 'load-path ess-test-path)

(require 'ess-site)


(when (= (length argv) 0)
  (setq argv '("--inf" "--rstats" "--rstats-indent")))

(when (member "--inf" argv)
  (load (expand-file-name "ess-inf-tests.el" ess-test-path) nil t))
(when (member "--rstats" argv)
  (load (expand-file-name "ess-r-tests.el" ess-test-path) nil t))
(when (member "--rstats-indent" argv)
 (load (expand-file-name "ess-indentation-tests.el" ess-test-path) nil t))

;; run tests
(ert-run-tests-batch-and-exit t)
