mirror of https://github.com/svaarala/duktape.git
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
79 lines
2.3 KiB
79 lines
2.3 KiB
/*
|
|
* Do a longjmp call, calling the fatal error handler if no
|
|
* catchpoint exists.
|
|
*/
|
|
|
|
#include "duk_internal.h"
|
|
|
|
#if defined(DUK_USE_PREFER_SIZE)
|
|
DUK_LOCAL void duk__uncaught_minimal(duk_hthread *thr) {
|
|
duk_fatal((duk_context *) thr, "uncaught error");
|
|
}
|
|
#endif
|
|
|
|
#if 0
|
|
DUK_LOCAL void duk__uncaught_readable(duk_hthread *thr) {
|
|
const char *summary;
|
|
char buf[64];
|
|
|
|
summary = duk_push_string_tval_readable((duk_context *) thr, &thr->heap->lj.value1);
|
|
DUK_SNPRINTF(buf, sizeof(buf), "uncaught: %s", summary);
|
|
buf[sizeof(buf) - 1] = (char) 0;
|
|
duk_fatal((duk_context *) thr, (const char *) buf);
|
|
}
|
|
#endif
|
|
|
|
#if !defined(DUK_USE_PREFER_SIZE)
|
|
DUK_LOCAL void duk__uncaught_error_aware(duk_hthread *thr) {
|
|
const char *summary;
|
|
char buf[64];
|
|
|
|
summary = duk_push_string_tval_readable_error((duk_context *) thr, &thr->heap->lj.value1);
|
|
DUK_ASSERT(summary != NULL);
|
|
DUK_SNPRINTF(buf, sizeof(buf), "uncaught: %s", summary);
|
|
buf[sizeof(buf) - 1] = (char) 0;
|
|
duk_fatal((duk_context *) thr, (const char *) buf);
|
|
}
|
|
#endif
|
|
|
|
DUK_INTERNAL void duk_err_longjmp(duk_hthread *thr) {
|
|
DUK_ASSERT(thr != NULL);
|
|
|
|
DUK_DD(DUK_DDPRINT("longjmp error: type=%d iserror=%d value1=%!T value2=%!T",
|
|
(int) thr->heap->lj.type, (int) thr->heap->lj.iserror,
|
|
&thr->heap->lj.value1, &thr->heap->lj.value2));
|
|
|
|
#if !defined(DUK_USE_CPP_EXCEPTIONS)
|
|
/* If we don't have a jmpbuf_ptr, there is little we can do except
|
|
* cause a fatal error. The caller's expectation is that we never
|
|
* return.
|
|
*
|
|
* With C++ exceptions we now just propagate an uncaught error
|
|
* instead of invoking the fatal error handler. Because there's
|
|
* a dummy jmpbuf for C++ exceptions now, this could be changed.
|
|
*/
|
|
if (!thr->heap->lj.jmpbuf_ptr) {
|
|
DUK_D(DUK_DPRINT("uncaught error: type=%d iserror=%d value1=%!T value2=%!T",
|
|
(int) thr->heap->lj.type, (int) thr->heap->lj.iserror,
|
|
&thr->heap->lj.value1, &thr->heap->lj.value2));
|
|
|
|
#if defined(DUK_USE_PREFER_SIZE)
|
|
duk__uncaught_minimal(thr);
|
|
#else
|
|
duk__uncaught_error_aware(thr);
|
|
#endif
|
|
DUK_UNREACHABLE();
|
|
}
|
|
#endif /* DUK_USE_CPP_EXCEPTIONS */
|
|
|
|
#if defined(DUK_USE_CPP_EXCEPTIONS)
|
|
{
|
|
duk_internal_exception exc; /* dummy */
|
|
throw exc;
|
|
}
|
|
#else /* DUK_USE_CPP_EXCEPTIONS */
|
|
DUK_LONGJMP(thr->heap->lj.jmpbuf_ptr->jb);
|
|
#endif /* DUK_USE_CPP_EXCEPTIONS */
|
|
|
|
DUK_UNREACHABLE();
|
|
}
|
|
|