Return to t13.t0 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/t13.t0, revision 1.1.1.1

1.1       root        1:        .data   0
                      2:        .align  2
                      3: L15:
                      4:        .long   0x40000000      # .float .5
                      5:        .align  2
                      6: L19:
                      7:        .long   1
                      8:        .align  2
                      9: L20:
                     10:        .long   13
                     11:        .align  2
                     12: L21:
                     13:        .long   2
                     14:        .align  2
                     15: L26:
                     16:        .long   0xBF800000      # .float -.25
                     17:        .align  2
                     18: L27:
                     19:        .long   3
                     20:        .align  2
                     21: L29:
                     22:        .long   4
                     23:        .align  2
                     24: L35:
                     25:        .long   5
                     26:        .align  2
                     27: L37:
                     28:        .long   6
                     29:        .data   2
                     30:        .data   1
                     31:        .data   0
                     32:        .globl  _MAIN_
                     33:        .globl  _e_
                     34:        .align  2
                     35:        .stabs  "t13.f",0x64,0,0,0
                     36: 
                     37: .text
                     38:        .globl  _MAIN_
                     39:        .align  1
                     40: _MAIN_:
                     41:        .word   LWM1
                     42:        subl3   $LF1,fp,sp
                     43:        jbr     L12
                     44: L13:
                     45:        movl    $3,v.2-v.1(r11)
                     46:        movl    L15,v.3-v.1(r11)
                     47:        mull3   v.2-v.1(r11),v.2-v.1(r11),r0
                     48:        addl2   $-7,r0
                     49:        tstl    r0
                     50:        jlss    L16
                     51:        jeql    L17
                     52:        jbr     L18
                     53: L16:
                     54:        pushl   $L20
                     55:        pushl   $L19
                     56:        callf   $12,_e_
                     57:        jbr     L18
                     58: L17:
                     59:        pushl   $L20
                     60:        pushl   $L21
                     61:        callf   $12,_e_
                     62: L18:
                     63:        ldf     v.3-v.1(r11)
                     64:        mulf    v.3-v.1(r11)
                     65:        stf     r0
                     66:        ldf     r0
                     67:        addf    L26
                     68:        stf     r0
                     69:        tstl    r0
                     70:        jlss    L23
                     71:        jeql    L24
                     72:        jbr     L25
                     73: L23:
                     74:        pushl   $L20
                     75:        pushl   $L27
                     76:        callf   $12,_e_
                     77:        jbr     L24
                     78: L25:
                     79:        pushl   $L20
                     80:        pushl   $L29
                     81:        callf   $12,_e_
                     82: L24:
                     83:        mull3   v.2-v.1(r11),v.2-v.1(r11),r0
                     84:        addl2   $-7,r0
                     85:        casel   r0,$1,$3
                     86:        .align 1
                     87: L34:
                     88:        .word   L31-L34
                     89:        .word   L32-L34
                     90:        .word   L33-L34
                     91:        .word   L33-L34
                     92: L31:
                     93:        pushl   $L20
                     94:        pushl   $L35
                     95:        callf   $12,_e_
                     96:        jbr     L32
                     97: L33:
                     98:        pushl   $L20
                     99:        pushl   $L37
                    100:        callf   $12,_e_
                    101: L32:
                    102: L14:
                    103:        ret#0
                    104: L12:
                    105:        movl    $v.1,r11
                    106:        jbr     L13
                    107:        .set    LF1,52
                    108:        .set    LWM1,0x1800
                    109: .text
                    110:        .data   2
                    111:        .align  2
                    112: v.2:
                    113:        .space  4
                    114:        .align  2
                    115: v.3:
                    116:        .space  4
                    117:        .set    v.1,v.3
                    118: 

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