summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--flatbind.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/flatbind.lisp b/flatbind.lisp
index 9a76ff3..a741f76 100644
--- a/flatbind.lisp
+++ b/flatbind.lisp
@@ -67,7 +67,7 @@
(setf expanded
(ecase tag
(:simple
- (cond ((null expanded) form)
+ (cond ((null expanded) `(progn ,form))
((eq 'cl:progn (first expanded))
`(progn ,form ,@(rest expanded)))
(t