From ed95701c79e8368a1f64e958f78a2e9279ff995d Mon Sep 17 00:00:00 2001 From: Peter Taoussanis Date: Thu, 3 Aug 2023 15:44:33 +0200 Subject: [PATCH] [nop] Bring back private `write-str-sm` Hadn't actually intended to remove this --- src/taoensso/nippy.clj | 1 + 1 file changed, 1 insertion(+) diff --git a/src/taoensso/nippy.clj b/src/taoensso/nippy.clj index 56ea6c9..2217478 100644 --- a/src/taoensso/nippy.clj +++ b/src/taoensso/nippy.clj @@ -726,6 +726,7 @@ (defn- write-biginteger [out ^BigInteger n] (write-bytes-lg out (.toByteArray n))) (defn- write-str-sm* [^DataOutput out ^String s] (write-bytes-sm* out (.getBytes s StandardCharsets/UTF_8))) +(defn- write-str-sm [^DataOutput out ^String s] (write-bytes-sm out (.getBytes s StandardCharsets/UTF_8))) (defn- write-str-md [^DataOutput out ^String s] (write-bytes-md out (.getBytes s StandardCharsets/UTF_8))) (defn- write-str-lg [^DataOutput out ^String s] (write-bytes-lg out (.getBytes s StandardCharsets/UTF_8))) (defn- write-str [^DataOutput out ^String s]