Return to sqr.t1 CVS log

Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.bin / f77 / f77pass1 / tst

Annotation of cci/usr/src/usr.bin/f77/f77pass1/tst/sqr.t1, revision 1.1

1.1     ! root        1:        .data   0
        !             2:        .data   2
        !             3:        .data   1
        !             4:        .data   0
        !             5:        .globl  _fsq_
        !             6:        .globl  _f_
        !             7:        .align  2
        !             8:        .stabs  "sqr.f",0x64,0,0,0
        !             9: 
        !            10: .text
        !            11:        .globl  _fsq_
        !            12:        .align  1
        !            13: _fsq_:
        !            14:        .word   LWM1
        !            15:        subl3   $LF1,fp,sp
        !            16:        jbr     L12
        !            17: L15:
        !            18:        pushl   4(r12)
        !            19:        callf   $8,_f_
        !            20:        movl    r0,-56(fp)
        !            21:        ldf     -56(fp)
        !            22:        mulf    -56(fp)
        !            23:        stf     r0
        !            24:        movl    r0,-60(fp)
        !            25:        movl    -60(fp),*4(r12)
        !            26:        jbr     L14
        !            27: L14:
        !            28: L13:
        !            29:        ret#0
        !            30: L12:
        !            31:        movl    fp,r12
        !            32:        jbr     L15
        !            33:        .set    LF1,60
        !            34:        .set    LWM1,0x1000
        !            35: .text
        !            36:        .data   2

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