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     ! 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.