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

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.