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.
83 lines
1.9 KiB
83 lines
1.9 KiB
/*===
|
|
*** test_1 (duk_safe_call)
|
|
concat: foobarquux
|
|
still here
|
|
==> rc=0, result='undefined'
|
|
*** test_2 (duk_safe_call)
|
|
==> rc=1, result='TypeError: thread required, found 123 (stack index -1)'
|
|
*** test_3 (duk_safe_call)
|
|
==> rc=1, result='TypeError: thread required, found none (stack index 123)'
|
|
*** test_4 (duk_safe_call)
|
|
==> rc=1, result='TypeError: thread required, found none (stack index -2147483648)'
|
|
===*/
|
|
|
|
static duk_ret_t test_1(duk_context *ctx, void *udata) {
|
|
duk_context *new_ctx;
|
|
|
|
(void) udata;
|
|
|
|
duk_set_top(ctx, 0);
|
|
(void) duk_push_thread(ctx);
|
|
new_ctx = duk_require_context(ctx, -1);
|
|
|
|
duk_push_string(new_ctx, "foo");
|
|
duk_push_string(new_ctx, "bar");
|
|
duk_push_string(new_ctx, "quux");
|
|
duk_concat(new_ctx, 3);
|
|
printf("concat: %s\n", duk_get_string(new_ctx, -1));
|
|
|
|
/* This duk_pop() makes the new thread unreachable (assuming there
|
|
* is no other reference to it), so new_ctx is no longer valid
|
|
* afterwards.
|
|
*/
|
|
duk_pop(ctx);
|
|
|
|
printf("still here\n");
|
|
return 0;
|
|
}
|
|
|
|
static duk_ret_t test_2(duk_context *ctx, void *udata) {
|
|
duk_context *new_ctx;
|
|
|
|
(void) udata;
|
|
|
|
/* non-thread value */
|
|
duk_set_top(ctx, 0);
|
|
duk_push_int(ctx, 123);
|
|
new_ctx = duk_require_context(ctx, -1);
|
|
printf("new_ctx is NULL: %d\n", (new_ctx == NULL ? 1 : 0));
|
|
return 0;
|
|
}
|
|
|
|
static duk_ret_t test_3(duk_context *ctx, void *udata) {
|
|
duk_context *new_ctx;
|
|
|
|
(void) udata;
|
|
|
|
/* invalid index */
|
|
duk_set_top(ctx, 0);
|
|
duk_push_int(ctx, 123);
|
|
new_ctx = duk_require_context(ctx, 123);
|
|
printf("new_ctx is NULL: %d\n", (new_ctx == NULL ? 1 : 0));
|
|
return 0;
|
|
}
|
|
|
|
static duk_ret_t test_4(duk_context *ctx, void *udata) {
|
|
duk_context *new_ctx;
|
|
|
|
(void) udata;
|
|
|
|
/* invalid index */
|
|
duk_set_top(ctx, 0);
|
|
duk_push_int(ctx, 123);
|
|
new_ctx = duk_require_context(ctx, DUK_INVALID_INDEX);
|
|
printf("new_ctx is NULL: %d\n", (new_ctx == NULL ? 1 : 0));
|
|
return 0;
|
|
}
|
|
|
|
void test(duk_context *ctx) {
|
|
TEST_SAFE_CALL(test_1);
|
|
TEST_SAFE_CALL(test_2);
|
|
TEST_SAFE_CALL(test_3);
|
|
TEST_SAFE_CALL(test_4);
|
|
}
|
|
|