Return to subd.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/subd.x, revision 1.1

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

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