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