|
|
1.1 ! root 1: /* Copyright (c) 1979 Regents of the University of California */ ! 2: ! 3: static char sccsid[] = "@(#)putn.c 1.1 8/27/80"; ! 4: ! 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:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.