From: Robin Templeton Date: Mon, 11 Aug 2014 10:05:45 +0000 (-0400) Subject: execute top level require forms X-Git-Url: http://git.hcoop.net/bpt/guile.git/commitdiff_plain/b8bc2628c2c921b40eb478aa0b009cdcfb6f336a execute top level require forms --- diff --git a/module/language/elisp/boot.el b/module/language/elisp/boot.el index 4e8347f2f..e6d3994fa 100644 --- a/module/language/elisp/boot.el +++ b/module/language/elisp/boot.el @@ -790,3 +790,7 @@ (defun %set-eager-macroexpansion-mode (ignore) nil) + +(%define-compiler-macro require (form) + `(eval-when (:compile-toplevel :load-toplevel :execute) + (funcall #'require ,@(cdr form))))