|
|
1.1 root 1: ////////
2: /
3: / Intel 8086 runtime.
4: / SMALL model.
5: /
6: ////////
7:
8: .globl lrmul
9: .globl llmul
10: .globl vrmul
11: .globl lrsgn
12: .globl llsgn
13:
14: ////////
15: /
16: / long
17: / lrmul(a, b);
18: / long a;
19: / long b;
20: /
21: / long
22: / llmul(a, p);
23: / long a;
24: / long *p;
25: /
26: / these routines perform long multiplication. they are called from
27: / the generated code whenever a long multiplication is found in the
28: / user's program.
29: /
30: / both of these routines are just interfaces to the unsigned long
31: / multiply routine via the long sign adjusters.
32: /
33: ////////
34:
35: lrmul: mov ax,$vrmul / get pointer to multiply code
36: jmp lrsgn / and do the operation.
37:
38: llmul: mov ax,$vrmul / get pointer to multiply 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.