diff options
Diffstat (limited to 'byterun/alloc.c')
-rw-r--r-- | byterun/alloc.c | 1 |
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){ |