From eb0d72422975122599111871b321ba0acef247df Mon Sep 17 00:00:00 2001 From: davidnolen Date: Sun, 4 Oct 2026 11:41:28 -0400 Subject: [PATCH] direct meta field access of IMeta instances --- src/main/cljs/cljs/core.cljs | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/src/main/cljs/cljs/core.cljs b/src/main/cljs/cljs/core.cljs index fc7dd7819..100e7b066 100644 --- a/src/main/cljs/cljs/core.cljs +++ b/src/main/cljs/cljs/core.cljs @@ -2185,9 +2185,11 @@ reduces them without incurring seq initialization" (defn meta "Returns the metadata of obj, returns nil if there is no metadata." [o] - (when (and (not (nil? o)) - (satisfies? IMeta o)) - (-meta o))) + (when (some? o) + (if (instance? IMeta o) + (.-_meta o) + (when (satisfies? IMeta o) + (-meta o))))) (defn peek "For a list or queue, same as first, for a vector, same as, but much