dict Namespace Reference

Provides PyMite's dict module. More...

Functions
def	clear
def	keys
def	has_key
def	values

---

Detailed Description

Provides PyMite's dict module.

---

Function Documentation

def dict::clear

(

d

)

__NATIVE__
pPmObj_t pd;
PmReturn_t retval = PM_RET_OK;

/* Raise TypeError if it's not a dict or wrong number of args, */
pd = NATIVE_GET_LOCAL(0);
if ((OBJ_GET_TYPE(pd) != OBJ_TYPE_DIC) || (NATIVE_GET_NUM_ARGS() != 1))
{
    PM_RAISE(retval, PM_RET_EX_TYPE);
    return retval;
}

/* Clear the contents of the dict */
retval = dict_clear(pd);
PM_RETURN_IF_ERROR(retval);

NATIVE_SET_TOS(PM_NONE);

return retval;

def dict::keys

(

d

)

__NATIVE__
pPmObj_t pd;
pPmObj_t pl;
pPmObj_t pk;
pSeglist_t psl;
uint16_t i;
PmReturn_t retval = PM_RET_OK;

/* Raise TypeError if it's not a dict or wrong number of args, */
pd = NATIVE_GET_LOCAL(0);
if ((OBJ_GET_TYPE(pd) != OBJ_TYPE_DIC) || (NATIVE_GET_NUM_ARGS() != 1))
{
    PM_RAISE(retval, PM_RET_EX_TYPE);
    return retval;
}

/* Create empty list */
retval = list_new(&pl);
PM_RETURN_IF_ERROR(retval);

/* Iterate through the keys seglist */
psl = ((pPmDict_t)pd)->d_keys;
for (i = 0; i < ((pPmDict_t)pd)->length; i++)
{
    /* Get the key and append it to the list */
    retval = seglist_getItem(psl, i, &pk);
    PM_RETURN_IF_ERROR(retval);
    retval = list_append(pl, pk);
    PM_RETURN_IF_ERROR(retval);
}

/* Return the list of keys to the caller */
NATIVE_SET_TOS(pl);

return retval;

def dict::values

(

d

)

__NATIVE__
pPmObj_t pd;
pPmObj_t pl;
pPmObj_t pv;
pSeglist_t psl;
uint16_t i;
PmReturn_t retval = PM_RET_OK;

/* Raise TypeError if it's not a dict or wrong number of args, */
pd = NATIVE_GET_LOCAL(0);
if ((OBJ_GET_TYPE(pd) != OBJ_TYPE_DIC) || (NATIVE_GET_NUM_ARGS() != 1))
{
    PM_RAISE(retval, PM_RET_EX_TYPE);
    return retval;
}

/* Create empty list */
retval = list_new(&pl);
PM_RETURN_IF_ERROR(retval);

/* Iterate through the values seglist */
psl = ((pPmDict_t)pd)->d_vals;
for (i = 0; i < ((pPmDict_t)pd)->length; i++)
{
    /* Get the value and append it to the list */
    retval = seglist_getItem(psl, i, &pv);
    PM_RETURN_IF_ERROR(retval);
    retval = list_append(pl, pv);
    PM_RETURN_IF_ERROR(retval);
}

/* Return the list of values to the caller */
NATIVE_SET_TOS(pl);

return retval;