summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2024-01-18 21:01:05 -0800
committerKaz Kylheku <kaz@kylheku.com>2024-01-18 21:01:05 -0800
commitfbf3ae2f5c6c89c3d48ffe40760b9f31d7dfbadd (patch)
tree7bc40e9072aebb99bb755c24a5215ea1ef84387f
parent27bd56447ca3eaa4c2eef8cba17d3045f8bb0726 (diff)
downloadtxr-fbf3ae2f5c6c89c3d48ffe40760b9f31d7dfbadd.tar.gz
txr-fbf3ae2f5c6c89c3d48ffe40760b9f31d7dfbadd.tar.bz2
txr-fbf3ae2f5c6c89c3d48ffe40760b9f31d7dfbadd.zip
mmap: bug: low length diagnosed as "zero-sized element type"
* ffi.c (mmap_wrap): Make the diagnostic depend on the actual condition that it's wording is about. If the element type is nonzero, but the length is too low for the array to have any elements, that is not strictly an error; we can let that pass.
-rw-r--r--ffi.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/ffi.c b/ffi.c
index e6ffdbfb..1a95ea80 100644
--- a/ffi.c
+++ b/ffi.c
@@ -6906,7 +6906,7 @@ val mmap_wrap(val type, val len, val prot, val flags,
int pro = c_int(prot, self);
int flg = c_int(flags, self);
- if (ln != 0 && nelem == 0)
+ if (!tft->size)
uw_throwf(error_s, lit("~a: zero-sized element type ~s specified"),
self, type, nao);