Return to com.t2 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.t2, revision 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: .text
        !            24: .globl _MAIN_
        !            25: .set   LF1,52
        !            26: .set   LWM1,0x1800
        !            27: .align 1
        !            28: _MAIN_:.word   LWM1
        !            29: subl3  $LF1,fp,sp
        !            30: jbr    L12
        !            31: .align 1
        !            32: _com_:.word    LWM1
        !            33: L12:movl       $v.1,r11
        !            34: movl   $2,_x_
        !            35: movl   $3,_x_+4
        !            36: movl   $4,_x_+8
        !            37: movl   $5,_x_+12
        !            38: mull3  _x_+4,_x_,r0
        !            39: mull3  _x_+12,_x_+8,r1
        !            40: addl3  r1,r0,v.2-v.1(r11)
        !            41: pushl  $v.3
        !            42: callf  $8,_s_wsle
        !            43: pushl  $4
        !            44: addl3  $v.2-v.1,r11,-(sp)
        !            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: ret#0
        !            53: 
        !            54:        .data   2
        !            55:        .align  2
        !            56: v.3:
        !            57:        .long   0
        !            58:        .long   6
        !            59:        .space  4
        !            60:        .long   0
        !            61:        .align  2
        !            62: v.2:
        !            63:        .space  4
        !            64:        .set    v.1,v.2
        !            65: 

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