Return to io.h CVS log

Up to [Research Unix] / researchv10no / cmd / hdr

Annotation of researchv10no/cmd/hdr/io.h, revision 1.1

1.1     ! root        1: /*
        !             2:  *     Sydney C Compiler.
        !             3:  *
        !             4:  *     Copyright 1984, Bruce Ellis.
        !             5:  *
        !             6:  *     Unauthorised possesion, sale or use prohibited.
        !             7:  */
        !             8: 
        !             9: extern char    *err_ptr;
        !            10: extern char    *put_ptr;
        !            11: extern char    *get_end;
        !            12: extern char    *get_ptr;
        !            13: extern char    err_buff[];
        !            14: extern char    put_buff[];
        !            15: extern char    get_buff[];
        !            16: extern void    err_flush();
        !            17: extern void    put_flush();
        !            18: 
        !            19: #define        put(c)  if (*put_ptr++ = (c), put_ptr == &put_buff[BUFFZ]) \
        !            20:                        put_flush(); \
        !            21:                else
        !            22: 
        !            23: #ifdef PUT_CALLS
        !            24: extern void    putz();
        !            25: extern void    vput();
        !            26: extern void    uput();
        !            27: #else  PUT_CALLS
        !            28: /*
        !            29:  *     vput and uput pack longs into 1, 2 or 4 bytes.
        !            30:  *     putz() is equivalent to [uv]put(0) but less optimisable.
        !            31:  *
        !            32:  *     If packing is not required we can replace them with
        !            33:  *     four put()s.  The argument to the [uv]put macros should
        !            34:  *     be a register (look at how often it is accessed).
        !            35:  */
        !            36: #define        putz()  put(0)
        !            37: 
        !            38: #define        vput(i) if ((unsigned long)(i) < 0x80) \
        !            39:                        put(i); \
        !            40:                else if ((unsigned long)(i) < 0x4000) \
        !            41:                { \
        !            42:                        put((((int)(i) >> 8) & 0x3F) | 0x80); \
        !            43:                        put((int)(i) & 0xFF); \
        !            44:                } \
        !            45:                else \
        !            46:                { \
        !            47:                        put((((i) >> 24) & 0x3F) | 0xC0); \
        !            48:                        put(((i) >> 16) & 0xFF); \
        !            49:                        put(((int)(i) >> 8) & 0xFF); \
        !            50:                        put((int)(i) & 0xFF); \
        !            51:                }
        !            52: 
        !            53: #define        uput(i) if ((i) < 0x40) \
        !            54:                { \
        !            55:                        if ((i) < -0x40) \
        !            56:                        { \
        !            57:                                if ((i) < -0x2000) \
        !            58:                                { \
        !            59:                                        put((((i) >> 24) & 0x3F) | 0xC0); \
        !            60:                                        put(((i) >> 16) & 0xFF); \
        !            61:                                        put(((int)(i) >> 8) & 0xFF); \
        !            62:                                        put((int)(i) & 0xFF); \
        !            63:                                } \
        !            64:                                else \
        !            65:                                { \
        !            66:                                        put((((int)(i) >> 8) & 0x3F) | 0x80); \
        !            67:                                        put((int)(i) & 0xFF); \
        !            68:                                } \
        !            69:                        } \
        !            70:                        else \
        !            71:                                put(i); \
        !            72:                } \
        !            73:                else if ((i) < 0x2000) \
        !            74:                { \
        !            75:                        put((((int)(i) >> 8) & 0x3F) | 0x80); \
        !            76:                        put((int)(i) & 0xFF); \
        !            77:                } \
        !            78:                else \
        !            79:                { \
        !            80:                        put((((i) >> 24) & 0x3F) | 0xC0); \
        !            81:                        put(((i) >> 16) & 0xFF); \
        !            82:                        put(((int)(i) >> 8) & 0xFF); \
        !            83:                        put((int)(i) & 0xFF); \
        !            84:                }
        !            85: #endif PUT_CALLS

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