From 3b1c19fb8e6c45b1afe7d03539ff9d5e7603513e Mon Sep 17 00:00:00 2001
From: mehbark <terezi@pyrope.net>
Date: Fri, 3 Jan 2025 13:44:38 -0500
Subject: [PATCH] begin: use begin in = body

---
 utils.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/utils.lisp b/utils.lisp
index a410761..af360b1 100644
--- a/utils.lisp
+++ b/utils.lisp
@@ -709,7 +709,7 @@
            (,binds (begin ,@rest))))
 
        ((list* '= pattern body)
-        `(let-match1 ,pattern (progn ,@body)
+        `(let-match1 ,pattern (begin ,@body)
            (begin ,@rest)))
 
        ((structure ('=f name args . body))