duk_bi_boolean.c File Reference

#include "duk_internal.h"

Go to the source code of this file.

Functions
DUK_INTERNAL duk_ret_t	duk_bi_boolean_prototype_tostring_shared (duk_context *ctx)
DUK_INTERNAL duk_ret_t	duk_bi_boolean_constructor (duk_context *ctx)

Function Documentation

duk_bi_boolean_constructor()

DUK_INTERNAL duk_ret_t duk_bi_boolean_constructor

(

duk_context *

ctx

)

Definition at line 46 of file duktape-1.5.2/src-separate/duk_bi_boolean.c.

                                                                    {
    duk_hthread *thr = (duk_hthread *) ctx;
    duk_hobject *h_this;
 
    DUK_UNREF(thr);
 
    duk_to_boolean(ctx, 0);
 
    if (duk_is_constructor_call(ctx)) {
        /* XXX: helper; rely on Boolean.prototype as being non-writable, non-configurable */
        duk_push_this(ctx);
        h_this = duk_get_hobject(ctx, -1);
        DUK_ASSERT(h_this != NULL);
        DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, h_this) == thr->builtins[DUK_BIDX_BOOLEAN_PROTOTYPE]);
 
        DUK_HOBJECT_SET_CLASS_NUMBER(h_this, DUK_HOBJECT_CLASS_BOOLEAN);
 
        duk_dup(ctx, 0);  /* -> [ val obj val ] */
        duk_xdef_prop_stridx(ctx, -2, DUK_STRIDX_INT_VALUE, DUK_PROPDESC_FLAGS_NONE);  /* XXX: proper flags? */
    }  /* unbalanced stack */
 
    return 1;
}

References duk_hthread::builtins, DUK_ASSERT, DUK_BIDX_BOOLEAN_PROTOTYPE, duk_dup(), duk_get_hobject(), DUK_HOBJECT_CLASS_BOOLEAN, DUK_HOBJECT_GET_PROTOTYPE, DUK_HOBJECT_SET_CLASS_NUMBER, duk_is_constructor_call(), DUK_PROPDESC_FLAGS_NONE, duk_push_this(), DUK_STRIDX_INT_VALUE, duk_to_boolean(), DUK_UNREF, duk_xdef_prop_stridx(), duk_hthread::heap, and NULL.

duk_bi_boolean_prototype_tostring_shared()

DUK_INTERNAL duk_ret_t duk_bi_boolean_prototype_tostring_shared

(

duk_context *

ctx

)

Definition at line 10 of file duktape-1.5.2/src-separate/duk_bi_boolean.c.

                                                                                  {
    duk_tval *tv;
    duk_hobject *h;
    duk_small_int_t coerce_tostring = duk_get_current_magic(ctx);
 
    /* XXX: there is room to use a shared helper here, many built-ins
     * check the 'this' type, and if it's an object, check its class,
     * then get its internal value, etc.
     */
 
    duk_push_this(ctx);
    tv = duk_get_tval(ctx, -1);
    DUK_ASSERT(tv != NULL);
 
    if (DUK_TVAL_IS_BOOLEAN(tv)) {
        goto type_ok;
    } else if (DUK_TVAL_IS_OBJECT(tv)) {
        h = DUK_TVAL_GET_OBJECT(tv);
        DUK_ASSERT(h != NULL);
 
        if (DUK_HOBJECT_GET_CLASS_NUMBER(h) == DUK_HOBJECT_CLASS_BOOLEAN) {
            duk_get_prop_stridx(ctx, -1, DUK_STRIDX_INT_VALUE);
            DUK_ASSERT(duk_is_boolean(ctx, -1));
            goto type_ok;
        }
    }
 
    return DUK_RET_TYPE_ERROR;
 
 type_ok:
    if (coerce_tostring) {
        duk_to_string(ctx, -1);
    }
    return 1;
}

References DUK_ASSERT, duk_get_current_magic(), duk_get_prop_stridx(), duk_get_tval(), DUK_HOBJECT_CLASS_BOOLEAN, DUK_HOBJECT_GET_CLASS_NUMBER, duk_is_boolean(), duk_push_this(), DUK_RET_TYPE_ERROR, DUK_STRIDX_INT_VALUE, duk_to_string(), DUK_TVAL_GET_OBJECT, DUK_TVAL_IS_BOOLEAN, DUK_TVAL_IS_OBJECT, and NULL.