diff options
| -rw-r--r-- | src/main/clojure/org/gnu/clojure/gnunet/core.clj | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/src/main/clojure/org/gnu/clojure/gnunet/core.clj b/src/main/clojure/org/gnu/clojure/gnunet/core.clj index 34e4a60..b759575 100644 --- a/src/main/clojure/org/gnu/clojure/gnunet/core.clj +++ b/src/main/clojure/org/gnu/clojure/gnunet/core.clj @@ -322,9 +322,10 @@ (assoc % :last-packets-bitmap (bit-set bitmap bit)) (conj % {:last-sequence-number-received seqnum - :last-packets-bitmap (.intValue - (bit-shift-left (biginteger bitmap) - (- seqnum last-seqnum)))}))) + :last-packets-bitmap (bit-and + (bit-shift-left bitmap + (- seqnum last-seqnum)) + 0xFFFFFFFF)}))) :when-not (.before (:timestamp message) (message-expiration)) ;; TODO: update bandwidth tracking ] |