Return to _outch.c CVS log

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

Annotation of researchv10no/ncurses/screen/_outch.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * This routine is one of the main things
        !             3:  * in this level of curses that depends on the outside
        !             4:  * environment.
        !             5:  */
        !             6: #include "curses.ext"
        !             7: /*     @(#) _outch.c: 1.1 10/15/83     (1.7    10/27/82)       */
        !             8: 
        !             9: int outchcount;
        !            10: 
        !            11: /*
        !            12:  * Write out one character to the tty.
        !            13:  */
        !            14: _outch (c)
        !            15: chtype c;
        !            16: {
        !            17: #ifdef DEBUG
        !            18: # ifndef LONGDEBUG
        !            19:        if (outf)
        !            20:                if (c < ' ')
        !            21:                        fprintf(outf, "^%c", (c+'@')&0177);
        !            22:                else
        !            23:                        fprintf(outf, "%c", c&0177);
        !            24: # else LONGDEBUG
        !            25:        if(outf) fprintf(outf, "_outch: char '%s' term %x file %x=%d\n",
        !            26:                unctrl(c&0177), SP, SP->term_file, fileno(SP->term_file));
        !            27: # endif LONGDEBUG
        !            28: #endif DEBUG
        !            29: 
        !            30:        outchcount++;
        !            31:        if (SP && SP->term_file)
        !            32:                putc (c&0177, SP->term_file);
        !            33:        else
        !            34:                putc (c&0177, stdout);
        !            35: }

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