diff options
Diffstat (limited to 'kernel/byterun/coq_values.c')
| -rw-r--r-- | kernel/byterun/coq_values.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/byterun/coq_values.c b/kernel/byterun/coq_values.c index 3613bc07a6..bbe91da628 100644 --- a/kernel/byterun/coq_values.c +++ b/kernel/byterun/coq_values.c @@ -40,7 +40,7 @@ value coq_closure_arity(value clos) { c++; if (Is_instruction(c,GRAB)) return Val_int(3 + c[1] - Wosize_val(clos)); else { - if (Wosize_val(clos) != 2) failwith("Coq Values : coq_closure_arity"); + if (Wosize_val(clos) != 2) caml_failwith("Coq Values : coq_closure_arity"); return Val_int(1); } } |