Roll sequence number over at the end of 32 bits

This commit is contained in:
Tony Garnock-Jones 2011-08-11 01:12:08 -04:00
parent 86b0c9a317
commit b238c1d55b
1 changed files with 2 additions and 1 deletions

View File

@ -116,7 +116,8 @@
packet packet
write-packet! write-packet!
(lambda (new-seed) (loop new-seed (lambda (new-seed) (loop new-seed
(+ sequence-number 1) (bitwise-and (+ sequence-number 1)
#xffffffff)
cipher cipher
check-mac!)) check-mac!))
(lambda args (lambda args