From 107926f8ddcaecf43c25c1493bc2a636ccfba08c Mon Sep 17 00:00:00 2001
From: Andy Wingo <wingo@pobox.com>
Date: Tue, 21 May 2019 12:39:55 +0200
Subject: [PATCH] Fix allocator passed to lightening

* libguile/jit.c (jit_alloc_fn): On targets that need a dynamically
  allocated literal pool, we will need to trace that pool, so pass a
  pointerful malloc.  Fixes JIT on AArch64.
---
 libguile/jit.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/libguile/jit.c b/libguile/jit.c
index 3079d0015..6c7399a75 100644
--- a/libguile/jit.c
+++ b/libguile/jit.c
@@ -4652,7 +4652,7 @@ static scm_i_pthread_once_t initialize_jit_once = SCM_I_PTHREAD_ONCE_INIT;
 static void*
 jit_alloc_fn (size_t size)
 {
-  return scm_gc_malloc_pointerless (size, "jit state");
+  return scm_gc_malloc (size, "jit state");
 }
 
 static void