|
|
1.1 root 1: //////////
2: / /usr/src/libm/i387/fabs87.s
3: / i387 mathematics library
4: / fabs(d)
5: //////////
6:
7: RASIZE = 4
8:
9: .globl fabs
10:
11: //////////
12: / double
13: / fabs(d)
14: / double d;
15: //////////
16:
17: d = RASIZE / arg offset
18:
19: fabs:
20: fldl d(%esp) / Load argument d
21: fabs / and perform abs.
22: ret
23:
24: / end of fabs87.s
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.