From 37d1764c6e765cdbce98793ab35777bc01651320 Mon Sep 17 00:00:00 2001
From: Aryadev Chavali <aryadev@aryadevchavali.com>
Date: Thu, 5 Mar 2026 19:59:46 +0000
Subject: [PATCH] reader: use make_list in read_quote

---
 src/reader.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/reader.c b/src/reader.c
index 6b5a9d5..f7ef1e0 100644
--- a/src/reader.c
+++ b/src/reader.c
@@ -200,8 +200,8 @@ read_err_t read_quote(sys_t *sys, stream_t *stream, lisp_t **ret)
   read_err_t err = read(sys, stream, &to_quote);
   if (err)
     return err;
-  *ret = cons(sys, to_quote, NIL);
-  *ret = cons(sys, intern(sys, SV_AUTO("quote")), *ret);
+  lisp_t *items[] = {intern(sys, SV_AUTO("quote")), to_quote};
+  *ret            = make_list(sys, items, ARRSIZE(items));
   return READ_ERR_OK;
 }