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