Function newepri

src/priest.c:15–25

staticfn boolean has_shrine(struct monst *);

void
newepri(struct monst *mtmp)
{
    if (!mtmp->mextra)
        mtmp->mextra = newmextra();
    if (!EPRI(mtmp)) {
        EPRI(mtmp) = (struct epri *) alloc(sizeof(struct epri));
        (void) memset((genericptr_t) EPRI(mtmp), 0, sizeof(struct epri));
        EPRI(mtmp)->parentmid = mtmp->m_id;
    }
}

void
free_epri(struct monst *mtmp)