doomemacs/core/autoload/test.el

;;; core/autoload/test.el -*- lexical-binding: t; -*-

;;;###autoload
(defmacro def-test-group! (name &rest body)
  (declare (indent defun))
  (unless (plist-get body :disabled)
    (dolist (form body)
      (when (eq (car form) 'ert-deftest)
        (setf (cadr form) (intern (format "test-%s-%s" name (symbol-name (cadr form)))))))
    `(progn ,@body)))
Major optimization refactor, across the board + enable lexical-scope everywhere (lexical-binding = t): ~5-10% faster startup; ~5-20% general boost + reduce consing, function calls & garbage collection by preferring cl-loop & dolist over lambda closures (for mapc[ar], add-hook, and various cl-lib filter/map/reduce functions) -- where possible + prefer functions with dedicated opcodes, like assq (see byte-defop's in bytecomp.el for more) + prefer pcase & cond (faster) over cl-case + general refactor for code readability + ensure naming & style conventions are adhered to + appease byte-compiler by marking unused variables with underscore + defer minor mode activation to after-init, emacs-startup or window-setup hooks; a customization opportunity for users + ensures custom functionality won't interfere with startup. 2017-06-08 11:47:56 +02:00			`;;; core/autoload/test.el -- lexical-binding: t; --`
Add core-lib & core-lib-{buffers,package} unit tests + tasks 2017-04-04 22:18:38 -04:00
			`;;;###autoload`
			`(defmacro def-test-group! (name &rest body)`
			`(declare (indent defun))`
Add :disabled property to def-test-group! 2017-04-12 10:52:42 -04:00			`(unless (plist-get body :disabled)`
			`(dolist (form body)`
			`(when (eq (car form) 'ert-deftest)`
			`(setf (cadr form) (intern (format "test-%s-%s" name (symbol-name (cadr form)))))))`
			`(progn ,@body)))