emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/macrostep 3f815fb 031/110: Test for normal defmacro expans


From: ELPA Syncer
Subject: [nongnu] elpa/macrostep 3f815fb 031/110: Test for normal defmacro expansion
Date: Sat, 7 Aug 2021 09:17:56 -0400 (EDT)

branch: elpa/macrostep
commit 3f815fb51ae63f89aa06be349b64222e6badd379
Author: joddie <jonxfield@gmail.com>
Commit: joddie <jonxfield@gmail.com>

    Test for normal defmacro expansion
---
 macrostep-test.el | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/macrostep-test.el b/macrostep-test.el
index 03cd923..70d3777 100644
--- a/macrostep-test.el
+++ b/macrostep-test.el
@@ -44,6 +44,19 @@
                       ,expansion)))
          (macrostep-collapse-all)))))
 
+(ert-deftest macrostep-expand-defmacro ()
+  (defmacro macrostep-dummy-macro (&rest args)
+    `(expansion of ,@args))
+  (macrostep-with-text
+   '(progn
+     (first body form)
+     (second body form)
+     (macrostep-dummy-macro (first (argument)) second (third argument))
+     (remaining body forms))
+   (macrostep-should-expand
+    '(macrostep-dummy-macro (first (argument)) second (third argument))
+    '(expansion of (first (argument)) second (third argument)))))
+
 (ert-deftest macrostep-expand-macrolet ()
   (macrostep-with-text
       '(macrolet



reply via email to

[Prev in Thread] Current Thread [Next in Thread]