mirror of
https://github.com/pestctrl/emacs-config.git
synced 2026-02-16 08:14:15 +00:00
This is how to properly enforce precedence
This commit is contained in:
parent
4fc034318a
commit
a584410654
1 changed files with 6 additions and 3 deletions
|
|
@ -96,21 +96,24 @@
|
|||
(list ,@body)
|
||||
;; TODO: Should be strict about this, don't let this implicitly happen
|
||||
(flatten-list it)
|
||||
(string-join it " && ")))
|
||||
(string-join it " && ")
|
||||
(format "{ %s; }" it)))
|
||||
|
||||
(defmacro shell-or (&rest body)
|
||||
`(-->
|
||||
(list ,@body)
|
||||
;; TODO: Should be strict about this, don't let this implicitly happen
|
||||
(flatten-list it)
|
||||
(string-join it " || ")))
|
||||
(string-join it " || ")
|
||||
(format "{ %s; }" it)))
|
||||
|
||||
(defmacro shell-then (&rest body)
|
||||
`(-->
|
||||
(list ,@body)
|
||||
;; TODO: Should be strict about this, don't let this implicitly happen
|
||||
(flatten-list it)
|
||||
(string-join it " ; ")))
|
||||
(string-join it " ; ")
|
||||
(format "{ %s; }" it)))
|
||||
|
||||
(defmacro shell-let* (let-clauses &rest body)
|
||||
(declare (indent 1))
|
||||
|
|
|
|||
Loading…
Reference in a new issue