From c4f09d6ca87ea087147af0d4f6c920fdc89cde3f Mon Sep 17 00:00:00 2001
From: Alexander Nutz <alexandernutz68@gmail.com>
Date: Sat, 30 Aug 2025 14:48:44 +0200
Subject: [PATCH] fix

---
 sexpr.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/sexpr.ml b/sexpr.ml
index f3bb65a..964db00 100644
--- a/sexpr.ml
+++ b/sexpr.ml
@@ -792,7 +792,7 @@ let () =
     { source = src; path = "top" }
     parsr in
   let v = Option.get v in
-  let v = SExpr.flat_map SExprMacroExp.do_eval v in
+  let v = SExprMacroExp.do_eval v in
 
   Format.set_margin 40;
   Format.printf "%a@.@?" SExpr.pp_t v;