diff --git a/js-assembler/runtime-src/baselib-functions.js b/js-assembler/runtime-src/baselib-functions.js index e146006..3f873eb 100644 --- a/js-assembler/runtime-src/baselib-functions.js +++ b/js-assembler/runtime-src/baselib-functions.js @@ -227,7 +227,10 @@ var i; var oldArgcount, oldVal, oldProc, oldErrorHandler; if (! baselib.arity.isArityMatching(proc.racketArity, arguments.length - 4)) { - return fail(baselib.exceptions.makeExnFailContractArity("arity mismatch")); + var msg = baselib.format.format("arity mismatch: expected ~s arguments, but received ~s", + [proc.racketArity, arguments.length - 4]); + return fail(baselib.exceptions.makeExnFailContractArity(msg, + MACHINE.captureContinuationMarks())); } if (isPrimitiveProcedure(proc)) {