From 992865e827cdfffa6451ca37e74f185c5228f894 Mon Sep 17 00:00:00 2001
From: Joel Kronqvist <joel.kronqvist@iki.fi>
Date: Fri, 1 Aug 2025 11:59:41 +0300
Subject: Modified quote so the values of lists are evaluated

---
 src/sexp/mod.rs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/sexp/mod.rs')

diff --git a/src/sexp/mod.rs b/src/sexp/mod.rs
index f6c50d7..71e62e9 100644
--- a/src/sexp/mod.rs
+++ b/src/sexp/mod.rs
@@ -39,7 +39,7 @@ use SLeaf::*;
 impl SExp {
     pub fn is_value(&self) -> bool {
         match self {
-            SCons(a, _) => **a == Atom(Quote),
+            SCons(a, b) => **a == Atom(Quote) && b.consists_of_values(),
             Atom(Var(_)) => false,
             Atom(_) => true,
         }
-- 
cgit v1.2.3