Permalink
Browse files

Typo

  • Loading branch information...
1 parent af2b34c commit 0581446d58aa1c8af51c3e41955f4d67b6a28f57 @jeapostrophe committed May 27, 2011
Showing with 2 additions and 2 deletions.
  1. +2 −2 lib/binio.rkt
View
@@ -17,10 +17,10 @@
(define (int32? x)
(and (integer? x)
- (< (* -1 32768) x +32767)))
+ (<= (* -1 32768) x +32767)))
(define (int64? x)
(and (integer? x)
- (< (* -1 9223372036854775808) x +9223372036854775807)))
+ (<= (* -1 9223372036854775808) x +9223372036854775807)))
(define (prepare-cstring s)
(values (add1 (string-utf-8-length s))

0 comments on commit 0581446

Please sign in to comment.