summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--rts/sm/HeapAlloc.h5
1 files changed, 5 insertions, 0 deletions
diff --git a/rts/sm/HeapAlloc.h b/rts/sm/HeapAlloc.h
index c914b5db40..f2760bdaf7 100644
--- a/rts/sm/HeapAlloc.h
+++ b/rts/sm/HeapAlloc.h
@@ -52,7 +52,12 @@
#ifdef USE_LARGE_ADDRESS_SPACE
extern W_ mblock_address_space_begin;
+#if aarch64_HOST_ARCH
+# define MBLOCK_SPACE_SIZE ((StgWord)1 << 38) /* 1/4 TB */
+#else
# define MBLOCK_SPACE_SIZE ((StgWord)1 << 40) /* 1 TB */
+#endif
+
# define HEAP_ALLOCED(p) ((W_)(p) >= mblock_address_space_begin && \
(W_)(p) < (mblock_address_space_begin + \
MBLOCK_SPACE_SIZE))