Function del_light_source

src/light.c:98–138

Find and delete a light source. Assumes at most one light source is attached to an object at a time. */

/* Find and delete a light source.
   Assumes at most one light source is attached to an object at a time. */
void
del_light_source(int type, anything *id)
{
    light_source *curr;
    anything tmp_id;

    tmp_id = cg.zeroany;
    /* need to be prepared for dealing a with light source which
       has only been partially restored during a level change
       (in particular: chameleon vs prot. from shape changers) */
    switch (type) {
    case LS_NONE:
        impossible("del_light_source:type=none");
        tmp_id.a_uint = 0;
        break;
    case LS_OBJECT:
        tmp_id.a_uint = id->a_obj ? id->a_obj->o_id : 0;
        break;
    case LS_MONSTER:
        tmp_id.a_uint = id->a_monst->m_id;
        break;
    default:
        tmp_id.a_uint = 0;
        break;
    }

    /* find the light source from its id */
    for (curr = gl.light_base; curr; curr = curr->next) {
        if (curr->type != type)
            continue;
        if (curr->id.a_obj
            == ((curr->flags & LSF_NEEDS_FIXUP) ? tmp_id.a_obj : id->a_obj))
            break;
    }
    if (curr) {
        delete_ls(curr);
    } else {
        impossible("del_light_source: not found type=%d, id=%s", type,
                   fmt_ptr((genericptr_t) id->a_obj));
    }
}

/* remove a light source from the light_base list and free it */
staticfn void