Return to mmul.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/mmul.t1, revision 1.1

1.1     ! root        1:        .data   0
        !             2:        .data   2
        !             3:        .data   1
        !             4:        .data   0
        !             5:        .globl  _mmul_
        !             6:        .align  2
        !             7:        .stabs  "mmul.f",0x64,0,0,0
        !             8: 
        !             9: .text
        !            10:        .globl  _mmul_
        !            11:        .align  1
        !            12: _mmul_:
        !            13:        .word   LWM1
        !            14:        subl3   $LF1,fp,sp
        !            15:        jbr     L12
        !            16: L15:
        !            17:        movl    *16(r12),-92(fp)
        !            18:        movl    *24(r12),-96(fp)
        !            19:        movl    *20(r12),-100(fp)
        !            20:        movl    v.5-v.1(r11),r10
        !            21:        movl    v.4-v.1(r11),r9
        !            22:        movl    4(r12),r8
        !            23:        movl    8(r12),r7
        !            24:        movl    -56(fp),r6
        !            25:        movl    $1,v.2-v.1(r11)
        !            26:        cmpl    v.2-v.1(r11),-92(fp)
        !            27:        jgtr    L27
        !            28: L28:
        !            29:        movl    r8,r8
        !            30:        movl    r7,r7
        !            31:        movl    $1,v.3-v.1(r11)
        !            32:        cmpl    v.3-v.1(r11),-96(fp)
        !            33:        jgtr    L31
        !            34: L32:
        !            35:        clrl    r9
        !            36:        mull3   -68(fp),v.3-v.1(r11),r0
        !            37:        movl    r0,-104(fp)
        !            38:        movl    r8,r8
        !            39:        movl    r7,r7
        !            40:        movl    $1,r10
        !            41:        cmpl    r10,-100(fp)
        !            42:        jgtr    L36
        !            43: L37:
        !            44: L35:
        !            45:        mull3   r6,r10,r0
        !            46:        addl2   v.2-v.1(r11),r0
        !            47:        addl3   -104(fp),r10,r1
        !            48:        ldf     (r8)[r0]
        !            49:        mulf    (r7)[r1]
        !            50:        stf     r0
        !            51:        ldf     r0
        !            52:        addf    r9
        !            53:        stf     r0
        !            54:        movl    r0,r9
        !            55:        incl    r10
        !            56:        cmpl    r10,-100(fp)
        !            57:        jleq    L37
        !            58: L36:
        !            59: L26:
        !            60:        mull3   -80(fp),v.3-v.1(r11),r0
        !            61:        addl2   v.2-v.1(r11),r0
        !            62:        movl    r9,*12(r12)[r0]
        !            63:        incl    v.3-v.1(r11)
        !            64:        cmpl    v.3-v.1(r11),-96(fp)
        !            65:        jleq    L32
        !            66: L31:
        !            67:        incl    v.2-v.1(r11)
        !            68:        cmpl    v.2-v.1(r11),-92(fp)
        !            69:        jleq    L28
        !            70: L27:
        !            71:        movl    r9,v.4-v.1(r11)
        !            72:        movl    r10,v.5-v.1(r11)
        !            73: L14:
        !            74: L13:
        !            75:        ret#0
        !            76: L12:
        !            77:        movl    $v.1,r11
        !            78:        movl    fp,r12
        !            79:        movl    *16(r12),-56(fp)
        !            80:        movl    *20(r12),-60(fp)
        !            81:        addl3   $1,-56(fp),r0
        !            82:        movl    r0,-64(fp)
        !            83:        shll    $2,-64(fp),r0
        !            84:        subl2   r0,4(r12)
        !            85:        movl    *20(r12),-68(fp)
        !            86:        movl    *24(r12),-72(fp)
        !            87:        addl3   $1,-68(fp),r0
        !            88:        movl    r0,-76(fp)
        !            89:        shll    $2,-76(fp),r0
        !            90:        subl2   r0,8(r12)
        !            91:        movl    *16(r12),-80(fp)
        !            92:        movl    *24(r12),-84(fp)
        !            93:        addl3   $1,-80(fp),r0
        !            94:        movl    r0,-88(fp)
        !            95:        shll    $2,-88(fp),r0
        !            96:        subl2   r0,12(r12)
        !            97:        jbr     L15
        !            98:        .set    LF1,104
        !            99:        .set    LWM1,0x1FC0
        !           100: .text
        !           101:        .data   2
        !           102:        .align  2
        !           103: v.2:
        !           104:        .space  4
        !           105:        .align  2
        !           106: v.5:
        !           107:        .space  4
        !           108:        .align  2
        !           109: v.4:
        !           110:        .space  4
        !           111:        .align  2
        !           112: v.3:
        !           113:        .space  4
        !           114:        .set    v.1,v.4
        !           115: 

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