ld/yasnippet
1
0
Fork 0
mirror of https://github.com/joaotavora/yasnippet.git synced 2025-10-13 13:13:03 +00:00
Code Issues Packages Projects Releases Wiki Activity

enhancement: test snippet compilation and loading. refactor test helpers

Browse Source
This commit is contained in:
João Távora 2012-04-22 16:34:12 +01:00
parent e30b67f9ca
commit d317a408c3
1 changed files with 26 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
yasnippet-tests.el
View File

@ -112,8 +112,31 @@ TODO: correct this bug!"
;;; Loading ;;; Loading
;;; ;;;
(ert-deftest basic-loading () (defmacro with-some-interesting-snippet-dirs (&rest body)
`(yas/saving-variables
(with-snippet-dirs
'((".emacs.d/snippets"
("c-mode"
(".yas-parents" . "cc-mode")
("printf" . "printf($1);"))
("emacs-lisp-mode" ("ert-deftest" . "(ert-deftest ${1:name} () $0)"))
("lisp-interaction-mode" (".yas-parents" . "emacs-lisp-mode")))
("library/snippets"
("c-mode" (".yas-parents" . "c++-mode"))
("cc-mode" ("def" . "# define"))
("emacs-lisp-mode" ("dolist" . "(dolist)"))
("lisp-interaction-mode" ("sc" . "brother from another mother"))))
,@body)))
(ert-deftest basic-jit-loading ()
"Test basic loading and expansion of snippets" "Test basic loading and expansion of snippets"
(yas/basic-jit-loading-1))
(ert-deftest basic-jit-loading-with-compiled-snippets ()
"Test basic loading and expansion of snippets"
(yas/basic-jit-loading-1 'compile))
(defun yas/basic-jit-loading-1 (&optional compile)
(yas/saving-variables (yas/saving-variables
(with-snippet-dirs (with-snippet-dirs
'((".emacs.d/snippets" '((".emacs.d/snippets"
@ -127,7 +150,7 @@ TODO: correct this bug!"
("cc-mode" ("def" . "# define")) ("cc-mode" ("def" . "# define"))
("emacs-lisp-mode" ("dolist" . "(dolist)")) ("emacs-lisp-mode" ("dolist" . "(dolist)"))
("lisp-interaction-mode" ("sc" . "brother from another mother")))) ("lisp-interaction-mode" ("sc" . "brother from another mother"))))
(yas/reload-all 'with-jit) (yas/reload-all)
(with-temp-buffer (with-temp-buffer
(should (= 4 (hash-table-count yas/scheduled-jit-loads))) (should (= 4 (hash-table-count yas/scheduled-jit-loads)))
(should (= 0 (hash-table-count yas/tables))) (should (= 0 (hash-table-count yas/tables)))
@ -140,6 +163,7 @@ TODO: correct this bug!"
("dolist" . "(dolist)") ("dolist" . "(dolist)")
("ert-deftest" . "(ert-deftest name () )"))) ("ert-deftest" . "(ert-deftest name () )")))
(c-mode) (c-mode)
(yas/minor-mode 1)
(yas/should-expand '(("printf" . "printf();") (yas/should-expand '(("printf" . "printf();")
("def" . "# define"))) ("def" . "# define")))
(yas/should-not-expand '("sc" "dolist" "ert-deftest")))))) (yas/should-not-expand '("sc" "dolist" "ert-deftest"))))))