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

1.1       root        1:        .data   0
                      2:        .align  2
                      3: L15:
                      4:        .long   3
                      5:        .align  2
                      6: L16:
                      7:        .long   1
                      8:        .align  2
                      9: L17:
                     10: .byte 00,00
                     11:        .data   2
                     12:        .data   1
                     13:        .data   0
                     14:        .globl  _com_
                     15:        .globl  _MAIN_
                     16:        .comm   _x_,16
                     17:        .globl  _s_wsle
                     18:        .globl  _do_lio
                     19:        .globl  _e_wsle
                     20:        .globl  _s_stop
                     21:        .align  2
                     22:        .stabs  "com.f",0x64,0,0,0
                     23: 
                     24: .text
                     25:        .globl  _MAIN_
                     26:        .align  1
                     27: _MAIN_:
                     28:        .word   LWM1
                     29:        subl3   $LF1,fp,sp
                     30:        jbr     L12
                     31: L13:
                     32:        movl    $2,_x_
                     33:        movl    $3,_x_+4
                     34:        movl    $4,_x_+8
                     35:        movl    $5,_x_+12
                     36:        mull3   _x_+4,_x_,r0
                     37:        mull3   _x_+12,_x_+8,r1
                     38:        addl2   r1,r0
                     39:        movl    r0,v.2-v.1(r11)
                     40:        pushl   $v.3
                     41:        callf   $8,_s_wsle
                     42:        pushl   $4
                     43:        addl3   $v.2-v.1,r11,r0
                     44:        pushl   r0
                     45:        pushl   $L16
                     46:        pushl   $L15
                     47:        callf   $20,_do_lio
                     48:        callf   $4,_e_wsle
                     49:        pushl   $0
                     50:        pushl   $L17
                     51:        callf   $12,_s_stop
                     52: L14:
                     53:        ret#0
                     54:        .align  1
                     55: _com_:
                     56:        .word   LWM1
                     57: L12:
                     58:        movl    $v.1,r11
                     59:        jbr     L13
                     60:        .set    LF1,52
                     61:        .set    LWM1,0x1800
                     62: .text
                     63:        .data   2
                     64:        .align  2
                     65: v.3:
                     66:        .long   0
                     67:        .long   6
                     68:        .space  4
                     69:        .long   0
                     70:        .align  2
                     71: v.2:
                     72:        .space  4
                     73:        .set    v.1,v.2
                     74: 

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