Return to libcpats.c CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / X / inline

Annotation of 43BSD/contrib/X/inline/libcpats.c, revision 1.1

1.1     ! root        1: /* Copyright (c) 1984 Regents of the University of California */
        !             2: 
        !             3: #ifndef lint
        !             4: static char sccsid[] = "@(#)libcpats.c 1.2     (Berkeley)      8/18/84";
        !             5: #endif not lint
        !             6: 
        !             7: #include "inline.h"
        !             8: 
        !             9: /*
        !            10:  * Pattern table for the C library.
        !            11:  */
        !            12: struct pats libc_ptab[] = {
        !            13: 
        !            14: #ifdef vax
        !            15:        { "1,_fgetc\n",
        !            16: "      movl    (sp)+,r2\n\
        !            17:        sobgeq  (r2),1f\n\
        !            18:        pushl   r2\n\
        !            19:        calls   $1,__filbuf\n\
        !            20:        jbr     2f\n\
        !            21: 1:\n\
        !            22:        movzbl  *4(r2),r0\n\
        !            23:        incl    4(r2)\n\
        !            24: 2:\n" },
        !            25: 
        !            26:        { "2,_fputc\n",
        !            27: "      movl    (sp)+,r2$\n\
        !            28:        movl    (sp)+,r3\n\
        !            29:        sobgeq  (r3),1f\n\
        !            30:        pushl   r3\n\
        !            31:        pushl   r2\n\
        !            32:        calls   $2,__flsbuf\n\
        !            33:        jbr     2f\n\
        !            34: 1:\n\
        !            35:        movb    r2,*4(r3)\n\
        !            36:        incl    4(r3)\n\
        !            37: 2:\n" },
        !            38: 
        !            39:        { "1,_strlen\n",
        !            40: "      movl    (sp)+,r5\n\
        !            41:        movl    r5,r1\n\
        !            42: 1:\n\
        !            43:        locc    $0,$65535,(r1)\n\
        !            44:        jeql    1b\n\
        !            45:        subl3   r5,r1,r0\n" },
        !            46: #endif vax
        !            47: 
        !            48: #ifdef mc68000
        !            49: /* someday... */
        !            50: #endif mc68000
        !            51: 
        !            52:        { "", "" }
        !            53: };

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