Return to subf.x CVS log

Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / lib / libc / tahoe / gen

Annotation of cci/usr/src/lib/libc/tahoe/gen/subf.x, revision 1.1.1.1

1.1       root        1: .data
                      2: .text
                      3: LL0:.align     1
                      4: .globl Xsubf
                      5: .set   L12,0x0
                      6: .data
                      7: .text
                      8: _subf:
                      9: Xsubf:.word    L12
                     10: clrl   r1
                     11: pushl  12(fp)
                     12: callf  $8,Xnegf
                     13: pushl  r1
                     14: pushl  r0
                     15: pushl  8(fp)
                     16: pushl  4(fp)
                     17: callf  $20,Xaddf
                     18: ret
                     19: 
                     20: 
                     21: /*
                     22:  * subf(d1,d2)
                     23:  * {
                     24:  *     return(d1+(-d2));
                     25:  * }
                     26: */

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.