diff options
Diffstat (limited to 'tests/decode-tests.lisp')
| -rw-r--r-- | tests/decode-tests.lisp | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/tests/decode-tests.lisp b/tests/decode-tests.lisp index 918cd82..162f32b 100644 --- a/tests/decode-tests.lisp +++ b/tests/decode-tests.lisp @@ -97,7 +97,7 @@ (assert-array-decode (make-octets 32767 :element 9) 1024) (assert-array-decode (make-octets 32768 :element 10) 1024) (assert-array-decode (make-octets 131072 :element 11) 1024) - (for-all ((buffer (gen-buffer :length (gen-integer :min 0 :max 40000)))) + (for-all ((buffer (gen-buffer :length (gen-integer :min 1 :max 40000)))) (assert-array-decode buffer 1024))) (test simple-decoding-32kib @@ -107,7 +107,7 @@ (assert-array-decode (make-octets 32769 :element 2) 32kib) (assert-array-decode (make-octets 32768 :element 2) 32kib) (assert-array-decode (make-octets 16777216 :element 2) 32kib) - (for-all ((buffer (gen-buffer :length (gen-integer :min 0 :max 70000)))) + (for-all ((buffer (gen-buffer :length (gen-integer :min 1 :max 70000)))) (assert-array-decode buffer 32kib))) (test proper-return-values @@ -199,7 +199,7 @@ (assert-length (make-array 2048 :element-type '(unsigned-byte 8) :initial-element 2) 1024) (assert-length (make-array 16383 :element-type '(unsigned-byte 8) :initial-element 2) 1024) (assert-length (make-array 16384 :element-type '(unsigned-byte 8) :initial-element 2) 1024) - (for-all ((buffer (gen-buffer :length (gen-integer :min 0 :max 40000)))) + (for-all ((buffer (gen-buffer :length (gen-integer :min 1 :max 40000)))) (assert-length buffer 1024))) @@ -243,4 +243,3 @@ (assert-read-byte-error (make-octets 1024 :element 2) 32kib) (assert-read-byte-error (make-octets 32767 :element 2) 32kib) (assert-read-byte-error (make-octets 32768 :element 2) 32kib)) - |