Commit | Line | Data |
---|---|---|
2017ba8a CH |
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 |