|
|
1.1 ! root 1: //////// ! 2: / ! 3: / Intel 8086 C runtime. ! 4: / SMALL model. ! 5: / ! 6: //////// ! 7: ! 8: .globl lrdiv ! 9: .globl lldiv ! 10: .globl vrdiv ! 11: .globl lrsgn ! 12: .globl llsgn ! 13: ! 14: //////// ! 15: / ! 16: / long ! 17: / lrdiv(a, b); ! 18: / long a; ! 19: / long b; ! 20: / ! 21: / long ! 22: / lldiv(a, p); ! 23: / long a; ! 24: / long *p; ! 25: / ! 26: / these routines perform long division. they are called from ! 27: / the generated code whenever a long division is found in the ! 28: / user's program. ! 29: / ! 30: / both of these routines are just interfaces to the unsigned long ! 31: / divide routine via the long sign adjusters. ! 32: / ! 33: //////// ! 34: ! 35: lrdiv: mov ax,$vrdiv / get pointer to divide code ! 36: jmp lrsgn / and do the operation. ! 37: ! 38: lldiv: mov ax,$vrdiv / get pointer to divide code ! 39: jmp llsgn / and do the operation.
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.