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

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

[elpa] externals/names 9ca77b7 18/44: Add test for :functionlike-macros


From: Stefan Monnier
Subject: [elpa] externals/names 9ca77b7 18/44: Add test for :functionlike-macros
Date: Sat, 27 Mar 2021 14:40:11 -0400 (EDT)

branch: externals/names
commit 9ca77b739ae9bdddab1733357310ec9ff7a18724
Author: Artur Malabarba <bruce.connor.am@gmail.com>
Commit: Artur Malabarba <bruce.connor.am@gmail.com>

    Add test for :functionlike-macros
---
 tests/names-tests.el | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/tests/names-tests.el b/tests/names-tests.el
index 741934b..6cf3d4d 100644
--- a/tests/names-tests.el
+++ b/tests/names-tests.el
@@ -277,3 +277,16 @@
    (defcustom a-hi 1 "hi" :type 'boolean :group 'names-tests :package-version 
'(names-tests . ""))
    (defcustom a-ok 1 "hi" :type 'boolean :package-version '(names-tests . "") 
:group 'a)))
 
+(names-deftest functionlike-macros
+  ""
+  (:functionlike-macros
+   (thread-first ->>)
+   (defvar var nil)
+   (defun fun (x &optional y) (concat x y))
+   (thread-first (fun "some string" var) (fun var) fun)
+   (->> "some string" (fun var) fun))
+  ((defvar a-var nil)
+   (defun a-fun (x &optional y) (concat x y))
+   (thread-first (a-fun "some string" a-var) (a-fun a-var) fun)
+   (->> "some string" (a-fun a-var) fun)))
+



reply via email to

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