Return to _line_free.c CVS log

Up to [Research Unix] / researchv10no / ncurses / screen

Annotation of researchv10no/ncurses/screen/_line_free.c, revision 1.1.1.1

1.1       root        1: /*     @(#) _line_free.c: 1.1 10/15/83 (1.9    10/27/82)       */
                      2: 
                      3: #include "curses.ext"
                      4: 
                      5: /* '_line_free' returns a line object to the free list */
                      6: _line_free (p)
                      7: register struct line   *p;
                      8: {
                      9:        register int i, sl, n=0;
                     10:        register struct line **q;
                     11: 
                     12:        if (p == NULL)
                     13:                return;
                     14: #ifdef DEBUG
                     15:        if(outf) fprintf(outf, "mem: Releaseline (%x), prev SP->freelist %x", p, SP->freelist);
                     16: #endif
                     17:        sl = lines;
                     18:        for (i=sl,q = &SP->cur_body[sl]; i>0; i--,q--)
                     19:                if (p == *q)
                     20:                        n++;
                     21:        for (i=sl,q = &SP->std_body[sl]; i>0; i--,q--)
                     22:                if (p == *q)
                     23:                        n++;
                     24: #ifdef DEBUG
                     25:        if(outf) fprintf(outf, ", count %d\n", n);
                     26: #endif
                     27:        if (n > 1)
                     28:                return;
                     29:        p -> next = SP->freelist;
                     30:        p -> hash = -888;
                     31:        SP->freelist = p;
                     32: }

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