summaryrefslogtreecommitdiff
path: root/vikalpa.scm
diff options
context:
space:
mode:
Diffstat (limited to 'vikalpa.scm')
-rw-r--r--vikalpa.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/vikalpa.scm b/vikalpa.scm
index dbf032b..480bbca 100644
--- a/vikalpa.scm
+++ b/vikalpa.scm
@@ -588,7 +588,8 @@
(expr expr))
(let ((new-expr (expand ms expr)))
(if (equal? expr new-expr)
- (if (pair? new-expr)
+ (if (and (not (expr-quoted? new-expr))
+ (pair? new-expr))
(cons (expand* ms (car new-expr))
(expand* ms (cdr new-expr)))
new-expr)