Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Use let* in plist-r/o

  • Loading branch information...
commit c1ecd879ebb638539f8606e50562eb74a28eb0a5 1 parent f188f92
@scymtym scymtym authored
Showing with 3 additions and 2 deletions.
  1. +3 −2 let-plus.lisp
View
5 let-plus.lisp
@@ -327,8 +327,9 @@ key default)."
(define-let+-expansion (&plist-r/o entries)
"LET+ form for property lists, read only version."
- `(let ,(expand-entry-forms entries
- (lambda (key default) `(getf ,value ,key ,default)))
+ `(let* ,(expand-entry-forms entries
+ (lambda (key default)
+ `(getf ,value ,key ,default)))
,@body))
(define-let+-expansion (&hash-table entries)
Please sign in to comment.
Something went wrong with that request. Please try again.