a46b022

src/net/bowmap/network/packet/read.clj modified (view file)

@@ -48,8 +48,8 @@  #_(defn read-array [codec len buf]) -(defn ^:prviate read-bit-mask! [buf codec mask]-  (let [n (codec buf)]+(defn ^:prviate read-bit-mask! [buf reader mask]+  (let [n (reader buf)]     (reduce-kv (fn [acc bit x]                  (if (bit-test n bit)                    (conj acc x)