summaryrefslogtreecommitdiff
path: root/libraries/integer-gmp/cbits/gmp-wrappers.cmm
diff options
context:
space:
mode:
Diffstat (limited to 'libraries/integer-gmp/cbits/gmp-wrappers.cmm')
-rw-r--r--libraries/integer-gmp/cbits/gmp-wrappers.cmm4
1 files changed, 4 insertions, 0 deletions
diff --git a/libraries/integer-gmp/cbits/gmp-wrappers.cmm b/libraries/integer-gmp/cbits/gmp-wrappers.cmm
index eb555fd382..4c7df574e7 100644
--- a/libraries/integer-gmp/cbits/gmp-wrappers.cmm
+++ b/libraries/integer-gmp/cbits/gmp-wrappers.cmm
@@ -80,6 +80,10 @@ import "rts" stg_INTLIKE_closure;
the case for all the platforms that GHC supports, currently.
-------------------------------------------------------------------------- */
+#if SIZEOF_MP_LIMB_T != SIZEOF_W
+#error "sizeof(mp_limb_t) != sizeof(W_)"
+#endif
+
/* This is used when a dummy pointer is needed for a ByteArray# return value
Ideally this would be a statically allocated 'ByteArray#'