ea9b833

src/dev/grahp/error.clj modified (view file)

@@ -78,12 +78,3 @@                     (str/trim-newline (s/explain-str ~spec x#)))                (assoc ~m '~x x#))         x#))))--(defmacro defn!-  {:clj-kondo/lint-as 'clojure.core/defn}-  [fn-name docstring args & body]-  (assert (and (vector? args) (every? simple-symbol? args)))-  `(defn ~fn-name ~docstring ~args-     (adorn ~@body-            (str "Error while in function '" (ns-name *ns*) "/" '~fn-name "'")-            {:args ~(zipmap (map keyword args) args)})))

src/net/bowmap/network/message/client.clj modified (view file)

@@ -2,7 +2,6 @@   (:require    [clojure.alpha.spec :as s]    [dev.grahp.build :refer [build]]-   [dev.grahp.error :refer [defn!]]    [net.bowmap.network.message :as msg]    [net.bowmap.network.packet :as pk]    [net.bowmap.network.packet.types :as t]@@ -280,7 +279,7 @@                                                         :relative-velocity-x :relative-velocity-y :relative-velocity-z                                                         :rotate-velocity])]})) -(defn! message->packet+(defn message->packet   "Encodes a message into a packet.    Like decoding, encoding a packet requires the connection state, as packet    ids are not unique across connection states. Several packets are logically

src/net/bowmap/network/message/server.clj modified (view file)

@@ -2,7 +2,7 @@   (:require    [clojure.alpha.spec :as s]    [dev.grahp.build :refer [build]]-   [dev.grahp.error :refer [adorn defn! raise]]+   [dev.grahp.error :refer [adorn raise]]    [net.bowmap.network.message :as msg]    [net.bowmap.network.packet :as pk]    [net.bowmap.network.packet.read :refer [->bit-mask ->byte ->double ->enum@@ -276,7 +276,7 @@         present-ids (set (keys packets))]     (set/difference all-ids present-ids))) -(defn! packet->message+(defn packet->message   "Deserializes one (framed, serialized) packet into a message.    The initial length field of the packet should be stripped from the buffer.    Can throw if: