|
|
1.1 root 1: /* alloca.s 4.1 83/06/27 */
2: /* like alloc, but automatic automatic free in return */
3:
4: #include "DEFS.h"
5:
6: ENTRY(alloca)
7: subl2 4(ap),sp /* crude allocation */
8: movl 16(fp),r1 /* pc */
9: movq 8(fp),ap /* new (old) ap and fp */
10: bicl2 $3,sp /* 4-byte align */
11: addl2 $7*4,sp /* reuse space of mscp */
12: movl sp,r0 /* return value */
13: jmp (r1) /* funny return */
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.