1 files changed, 1 insertions, 1 deletions
diff --git a/pack.c b/pack.c
index 45b816a590..12f30cb6b0 100644
--- a/pack.c
+++ b/pack.c
@@ -1127,7 +1127,7 @@ pack_unpack_internal(VALUE str, VALUE fmt, int mode)
 	else if (ISDIGIT(*p)) {
 	    errno = 0;
 	    len = STRTOUL(p, (char**)&p, 10);
-	    if (errno) {
+	    if (len < 0 || errno) {
 		rb_raise(rb_eRangeError, "pack length too big");
 	    }
 	}