|
|
1.1 root 1: #
2: # Copyright (c) 1979 Regents of the University of California
3: #
4: # char sccsid[] = "@(#)12div.s 4.1 10/10/80";
5: #
6: # INTEGER DIVISION
7: #
8: _DIV2:
9: incl r10
10: cvtwl (sp)+,r0
11: cvtwl (sp)+,r1
12: divl3 r0,r1,-(sp)
13: jmp (r8)
14: _DIV24:
15: incl r10
16: cvtwl (sp)+,r0
17: divl2 r0,(sp)
18: jmp (r8)
19: _DIV42:
20: incl r10
21: movl (sp)+,r0
22: cvtwl (sp)+,r1
23: divl3 r0,r1,-(sp)
24: jmp (r8)
25: _DIV4:
26: incl r10
27: divl2 (sp)+,(sp)
28: jmp (r8)
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.