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

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.