| 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 | |