Function currentlevel_rewrite

src/do.c:1347–1371

check that we can write out the current level */

/* check that we can write out the current level */
staticfn NHFILE *
currentlevel_rewrite(void)
{
    NHFILE *nhfp;
    char whynot[BUFSZ];

    /* since level change might be a bit slow, flush any buffered screen
     *  output (like "you fall through a trap door") */
    mark_synch();

    nhfp = create_levelfile(ledger_no(&u.uz), whynot);
    if (!nhfp) {
        /*
         * This is not quite impossible: e.g., we may have
         * exceeded our quota. If that is the case then we
         * cannot leave this level, and cannot save either.
         * Another possibility is that the directory was not
         * writable.
         */
        pline1(whynot);
        return (NHFILE *) 0;
    }

    return nhfp;
}

#ifdef INSURANCE
void