diff options
Diffstat (limited to 'byterun/gc_ctrl.c')
| -rw-r--r-- | byterun/gc_ctrl.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/byterun/gc_ctrl.c b/byterun/gc_ctrl.c index a0adb0cdc..89bf63856 100644 --- a/byterun/gc_ctrl.c +++ b/byterun/gc_ctrl.c @@ -14,6 +14,7 @@ #include "alloc.h" #include "compact.h" +#include "custom.h" #include "gc.h" #include "gc_ctrl.h" #include "major_gc.h" @@ -91,8 +92,8 @@ static void check_block (char *hp) case Double_array_tag: Assert (Wosize_val (v) % Double_wosize == 0); break; - case Final_tag: - Assert (!Is_in_heap (Final_fun (v))); + case Custom_tag: + Assert (!Is_in_heap (Custom_ops_val (v))); break; case Infix_tag: |