summaryrefslogtreecommitdiffstats
path: root/byterun/alloc.c
diff options
context:
space:
mode:
Diffstat (limited to 'byterun/alloc.c')
-rw-r--r--byterun/alloc.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/byterun/alloc.c b/byterun/alloc.c
index 41dafdc4f..97d57b977 100644
--- a/byterun/alloc.c
+++ b/byterun/alloc.c
@@ -35,6 +35,7 @@ CAMLexport value alloc (mlsize_t wosize, tag_t tag)
mlsize_t i;
Assert (tag < 256);
+ Assert (tag != Infix_tag);
if (wosize == 0){
result = Atom (tag);
}else if (wosize <= Max_young_wosize){