From 87c9bd0754589042e21d89b34f6af351aebb8f97 Mon Sep 17 00:00:00 2001
From: dearblue <dearblue@users.osdn.me>
Date: Sun, 3 Apr 2022 22:14:42 +0900
Subject: [PATCH] Fixed bounds check for `heap_p()` function in `src/gc.c`

One extra element was included.
---
 src/gc.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/gc.c b/src/gc.c
index cda8b544c..c978b6131 100644
--- a/src/gc.c
+++ b/src/gc.c
@@ -307,7 +307,7 @@ heap_p(mrb_gc *gc, struct RBasic *object)
     RVALUE *p;
 
     p = objects(page);
-    if (&p[0].as.basic <= object && object <= &p[MRB_HEAP_PAGE_SIZE].as.basic) {
+    if (&p[0].as.basic <= object && object <= &p[MRB_HEAP_PAGE_SIZE - 1].as.basic) {
       return TRUE;
     }
     page = page->next;