Return to putn.c CVS log

Up to [CSRG BSD Unix] / 3BSD / cmd / pi

Annotation of 3BSD/cmd/pi/putn.c, revision 1.1

1.1     ! root        1: /* Copyright (c) 1979 Regents of the University of California */
        !             2:     /*
        !             3:      * put[1234]
        !             4:      * these sort of replace the assembler code
        !             5:      * which used to mung the stack inserting 1, 2, 3, or 4 and then
        !             6:      * jmp ( not jsr ) to put.  these are more portable,
        !             7:      * but since they can only receive integer arguments,  calls
        !             8:      * to one of these with long or real arguments must be changed
        !             9:      * to call put directly.
        !            10:      */
        !            11: 
        !            12:     /*
        !            13:      * is there some reason why these aren't #defined?
        !            14:      */
        !            15: 
        !            16: put1 ( arg1 )
        !            17:     int                arg1;
        !            18:     {
        !            19:        return ( put ( 1 , arg1 ) );
        !            20:     }
        !            21: 
        !            22: put2 ( arg1 , arg2 )
        !            23:     int                arg1 , arg2;
        !            24:     {
        !            25:        return ( put ( 2 , arg1 , arg2 ) );
        !            26:     }
        !            27: 
        !            28: put3 ( arg1 , arg2 , arg3 )
        !            29:     int                arg1 , arg2 , arg3;
        !            30:     {
        !            31:        return ( put ( 3 , arg1 , arg2 , arg3 ) );
        !            32:     }
        !            33: 
        !            34: put4 ( arg1 , arg2 , arg3 , arg4 )
        !            35:     int                arg1 , arg2 , arg3 , arg4;
        !            36:     {
        !            37:        return ( put ( 4 , arg1 , arg2 , arg3 , arg4 ) );
        !            38:     }
        !            39: 

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