Annotation of cci/usr/src/usr.bin/f77/f77pass1/tst/regf.t2, revision 1.1

1.1     ! root        1:        .data   0
        !             2:        .align  2
        !             3: L20:
        !             4:        .long   0x41000000      # .float 2
        !             5:        .align  2
        !             6: L21:
        !             7:        .long   0x40800000      # .float 1
        !             8:        .align  2
        !             9: L22:
        !            10:        .long   0x407FBE77      # .float .99900001
        !            11:        .align  2
        !            12: L23:
        !            13: .byte 00,00
        !            14:        .data   2
        !            15:        .data   1
        !            16:        .data   0
        !            17:        .globl  _bug4_
        !            18:        .globl  _MAIN_
        !            19:        .globl  _s_stop
        !            20:        .align  2
        !            21:        .stabs  "regf.f",0x64,0,0,0
        !            22: .text
        !            23: .globl _MAIN_
        !            24: .set   LF1,52
        !            25: .set   LWM1,0x1F80
        !            26: .align 1
        !            27: _MAIN_:.word   LWM1
        !            28: subl3  $LF1,fp,sp
        !            29: jbr    L12
        !            30: .align 1
        !            31: _bug4_:.word   LWM1
        !            32: L12:movl       $v.1,r11
        !            33: movl   L20,v.2-v.1(r11)
        !            34: movl   L21,v.3-v.1(r11)
        !            35: movl   L22,v.4-v.1(r11)
        !            36: movl   v.5-v.1(r11),r10
        !            37: movl   v.2-v.1(r11),r9
        !            38: movl   v.3-v.1(r11),r8
        !            39: movl   v.4-v.1(r11),r7
        !            40: movl   $1,r10
        !            41: L17:ldf        r9
        !            42: addf   r8
        !            43: mulf   r7
        !            44: stf    r9
        !            45: aobleq $10000,r10,L17
        !            46: movl   r9,v.2-v.1(r11)
        !            47: movl   r10,v.5-v.1(r11)
        !            48: pushl  $0
        !            49: pushl  $L23
        !            50: callf  $12,_s_stop
        !            51: ret#0
        !            52: 
        !            53:        .data   2
        !            54:        .align  2
        !            55: v.2:
        !            56:        .space  4
        !            57:        .align  2
        !            58: v.4:
        !            59:        .space  4
        !            60:        .align  2
        !            61: v.5:
        !            62:        .space  4
        !            63:        .align  2
        !            64: v.3:
        !            65:        .space  4
        !            66:        .set    v.1,v.5
        !            67: 

unix.superglobalmegacorp.com

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