ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
org-mode/testing/lisp/test-ob-R.el

31 lines
767 B
EmacsLisp
Raw Normal View History

fix leftover cruft in test-ob-R.el
2011-09-21 15:31:38 -04:00
;;; test-ob-R.el --- tests for ob-R.el
adding a file for R tests * testing/lisp/test-ob-R.el (test-ob-R/simple-session): Simple session test.
2011-09-21 08:57:07 -04:00
;; Copyright (c) 2011 Eric Schulte
;; Authors: Eric Schulte
;; Released under the GNU General Public License version 3
;; see: http://www.gnu.org/licenses/gpl-3.0.html
only load those test files for which the required executables are present * testing/org-test.el (org-exe-not-found): An error type used to signal a missing executable (org-test-for-executable): A function used by test files to throw an error if a required executable is not present. (org-test-load): Simply skip files for which the required executables are not present. * testing/lisp/test-ob-R.el: Conditional loading. * testing/lisp/test-ob-awk.el: Conditional loading. * testing/lisp/test-ob-fortran.el: Conditional loading.
2011-09-21 18:34:43 -04:00
(org-test-for-executable "R")
(unless (featurep 'ess)
org tests using throw/catch rather than errors to avoid loading unsupported tests
2011-09-24 17:57:05 -04:00
(throw 'missing-test-dependency "ESS"))
only load those test files for which the required executables are present * testing/org-test.el (org-exe-not-found): An error type used to signal a missing executable (org-test-for-executable): A function used by test files to throw an error if a required executable is not present. (org-test-load): Simply skip files for which the required executables are not present. * testing/lisp/test-ob-R.el: Conditional loading. * testing/lisp/test-ob-awk.el: Conditional loading. * testing/lisp/test-ob-fortran.el: Conditional loading.
2011-09-21 18:34:43 -04:00
adding a file for R tests * testing/lisp/test-ob-R.el (test-ob-R/simple-session): Simple session test.
2011-09-21 08:57:07 -04:00
(let ((load-path (cons (expand-file-name
".." (file-name-directory
(or load-file-name buffer-file-name)))
load-path)))
(require 'org-test)
(require 'org-test-ob-consts))
fix leftover cruft in test-ob-R.el
2011-09-21 15:31:38 -04:00
(require 'ob-R)
adding a file for R tests * testing/lisp/test-ob-R.el (test-ob-R/simple-session): Simple session test.
2011-09-21 08:57:07 -04:00
(ert-deftest test-ob-R/simple-session ()
(org-test-with-temp-text
"#+begin_src R :session R\n paste(\"Yep!\")\n#+end_src\n"
(should (string= "Yep!" (org-babel-execute-src-block)))))
fix leftover cruft in test-ob-R.el
2011-09-21 15:31:38 -04:00
(provide 'test-ob-R)
adding a file for R tests * testing/lisp/test-ob-R.el (test-ob-R/simple-session): Simple session test.
2011-09-21 08:57:07 -04:00
fix leftover cruft in test-ob-R.el
2011-09-21 15:31:38 -04:00
;;; test-ob-R.el ends here
adding a file for R tests * testing/lisp/test-ob-R.el (test-ob-R/simple-session): Simple session test.
2011-09-21 08:57:07 -04:00