Return to closwin.c CVS log

Up to [MW Coherent from dump] / coherent / g / usr / bin / vsh / winlib

Annotation of coherent/g/usr/bin/vsh/winlib/closwin.c, revision 1.1

1.1     ! root        1: /*
        !             2:  *     Close one window, free memory and update remaining windows
        !             3:  *
        !             4:  *      Copyright (c) 1990-93 by Udo Munk
        !             5:  */
        !             6: 
        !             7: #ifdef AIX
        !             8: #define NLS
        !             9: #endif
        !            10: 
        !            11: #include <curses.h>
        !            12: #include "winfun.h"
        !            13: 
        !            14: extern W_LIST *wl;
        !            15: extern void free();
        !            16: 
        !            17: close_window(w)
        !            18: WINDOW *w;
        !            19: {
        !            20:        register W_LIST *wlp = wl->w_next;
        !            21:        register W_LIST *lwlp = wl;
        !            22: 
        !            23:        if ((lwlp->w_next == (W_LIST *) 0) || (lwlp->w_w == w)) /* don't close */
        !            24:                return(WIN_ERR);                                /* stdscr !! */
        !            25:        do {
        !            26:                if (wlp->w_w == w) {
        !            27:                        lwlp->w_next = wlp->w_next;
        !            28:                        delwin(wlp->w_w);
        !            29:                        free((char *) wlp);
        !            30:                        wlp = lwlp->w_next;
        !            31:                        touchwin(lwlp->w_w);
        !            32:                        wnoutrefresh(lwlp->w_w);
        !            33:                } else {
        !            34:                        touchwin(lwlp->w_w);
        !            35:                        wnoutrefresh(lwlp->w_w);
        !            36:                        lwlp = wlp;
        !            37:                        wlp = wlp->w_next;
        !            38:                }
        !            39:        } while (wlp != (W_LIST *) 0);
        !            40:        touchwin(lwlp->w_w);
        !            41:        wnoutrefresh(lwlp->w_w);
        !            42:        doupdate();
        !            43:        return(WIN_OK);
        !            44: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.