From e167f5853c31bebed179c38e115514da67d54cb0 Mon Sep 17 00:00:00 2001
From: Stephen Dolan <sdolan@janestreet.com>
Date: Mon, 21 Oct 2019 10:40:19 +0100
Subject: [PATCH] Fix a pointer comparison in an assertion in freelist.c

---
 runtime/freelist.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/runtime/freelist.c b/runtime/freelist.c
index 2cbaa0a77..b0705bb1e 100644
--- a/runtime/freelist.c
+++ b/runtime/freelist.c
@@ -1000,7 +1000,7 @@ static void bf_check (void)
     }else{
       CAMLassert (caml_gc_phase != Phase_sweep
                   || caml_fl_merge == Val_NULL
-                  || Val_bp (bf_small_fl[i].merge) < caml_fl_merge);
+                  || bf_small_fl[i].merge < &Next_small(caml_fl_merge));
     }
     CAMLassert (*bf_small_fl[i].merge == Val_NULL
                 || Color_val (*bf_small_fl[i].merge) == Caml_blue);