Changeset - 1edcae806f76
[Not reviewed]
0 1 0
Sergey Pashinin - 11 years ago 2014-08-23 12:20:10
sergey@pashinin.com
wg-if-let removed
1 file changed with 0 insertions and 9 deletions:
0 comments (0 inline, 0 general)
src/workgroups-utils-basic.el
Show inline comments
 
@@ -37,15 +37,6 @@ Iterative to prevent stack overflow."
 

	
 
;;; bindings
 

	
 
(defmacro wg-if-let (cond-form then &rest else)
 
  "Bind VAR to the return value of COND.  If VAR is non-nil, do THEN.
 
Else do ELSE...
 

	
 
\(fn ((VAR COND) THEN ELSE...)"
 
  (declare (indent 2))
 
  `(let (,cond-form)
 
     (if ,(car cond-form) ,then ,@else)))
 

	
 
(defmacro wg-when-let (binds &rest body)
 
  "Like `let*' but when all BINDS are non-nil - eval BODY."
 
  (declare (indent 1))
0 comments (0 inline, 0 general)