From dc25e664305ed49edff4e45eaec6ed1fad910c60 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Gustav=20S=C3=B6rn=C3=A4s?= <gustav@sornas.net>
Date: Mon, 8 Mar 2021 00:09:24 +0100
Subject: check index out of bounds correctly

---
 src/vm.rs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/vm.rs b/src/vm.rs
index 6b69b3c..1e04673 100644
--- a/src/vm.rs
+++ b/src/vm.rs
@@ -296,7 +296,7 @@ impl VM {
                 match (val, slot) {
                     (Value::Tuple(v), Value::Int(slot)) => {
                         let slot = slot as usize;
-                        if v.len() < slot {
+                        if v.len() <= slot {
                             self.stack.push(Value::Nil);
                             let len = v.len();
                             error!(self, ErrorKind::IndexOutOfBounds(Value::Tuple(v), len, slot));
-- 
cgit v1.2.1