Function shrink_worm

src/worm.c:174–186

* shrink_worm() * * Remove the tail segment of the worm (the starting segment of the list). */

 *  Remove the tail segment of the worm (the starting segment of the list).
 */
staticfn void
shrink_worm(int wnum) /* worm number */
{
    struct wseg *seg;

    if (wtails[wnum] == wheads[wnum])
        return; /* no tail */

    seg = wtails[wnum];
    wtails[wnum] = seg->nseg;
    seg->nseg = (struct wseg *) 0;
    toss_wsegs(seg, TRUE);
}

/*
 *  worm_move()