|
|
1.1 ! root 1: # "@(#)system_s.s 5.1 (Berkeley) 11/3/86" ! 2: ! 3: .data ! 4: .text ! 5: LL0:.align 1 ! 6: .globl _system_ ! 7: .set MASK__,0x04 ! 8: .data ! 9: .text ! 10: _system_:.word MASK__ ! 11: subl3 $1056,fp,sp ! 12: movl 4(fp),r0 /* s */ ! 13: subl3 $1056,fp,r1 /* buf */ ! 14: cmpl 8(fp),$1000 /* if (n < 1000) */ ! 15: jgeq L9999 ! 16: movl 8(fp),r2 /* length = n */ ! 17: jbr L1000 ! 18: L9999: ! 19: movl $1000,r2 /* else length = 1000 */ ! 20: L1000: ! 21: movs3 /* copy string */ ! 22: clrb (r1) /* add end-of-str */ ! 23: subl3 $1056,fp,-(sp) /* push &buf */ ! 24: callf $8,_system ! 25: ret#2 ! 26:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.