From a3b0aa1aa62665fa2f619c4bb0845f2035eb5c54 Mon Sep 17 00:00:00 2001
From: Juan Pedro Monetta Sanchez <jmonetta@debianLaptop>
Date: Thu, 13 Jul 2023 10:20:11 -0300
Subject: [PATCH] Make tools reader respect forms :line and :column meta when
 provided

---
 src/main/clojure/cljs/vendor/clojure/tools/reader.clj | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/main/clojure/cljs/vendor/clojure/tools/reader.clj b/src/main/clojure/cljs/vendor/clojure/tools/reader.clj
index ab9db30da..b29061750 100644
--- a/src/main/clojure/cljs/vendor/clojure/tools/reader.clj
+++ b/src/main/clojure/cljs/vendor/clojure/tools/reader.clj
@@ -378,7 +378,7 @@
       (let [o (read* rdr true nil opts pending-forms)]
         (if (instance? IMeta o)
           (let [m (if (and line (seq? o))
-                    (assoc m :line line :column column)
+                    (merge {:line line :column column} m)
                     m)]
             (if (instance? IObj o)
               (with-meta o (merge (meta o) m))