![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to g.t1 CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.bin / f77 / f77pass1 / tst|
Return to g.t1 CVS log | Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.bin / f77 / f77pass1 / tst |
1.1 ! root 1: .data 0 ! 2: .align 2 ! 3: L15: ! 4: .long 0x00000000 # .float 0 ! 5: .align 2 ! 6: L16: ! 7: .long 0x41C90FDB # .float 6.2831855 ! 8: .align 2 ! 9: L17: ! 10: .long 0x3DA3D70A # .float .02 ! 11: .align 2 ! 12: L18: ! 13: .long 0xC0800000 # .float -1 ! 14: .align 2 ! 15: L19: ! 16: .long 0x40800000 # .float 1 ! 17: .data 2 ! 18: .data 1 ! 19: .data 0 ! 20: .align 2 ! 21: L30: ! 22: .long L29 ! 23: .align 2 ! 24: L33: ! 25: .long L29 ! 26: .align 2 ! 27: L29: ! 28: .byte 050,070 ! 29: .byte 060,0141 ! 30: .byte 061,051 ! 31: .byte 00,00 ! 32: .align 2 ! 33: L43: ! 34: .byte 040,00 ! 35: .align 2 ! 36: L44: ! 37: .long 1 ! 38: .align 2 ! 39: L47: ! 40: .byte 052,00 ! 41: .data 2 ! 42: .data 1 ! 43: .data 0 ! 44: .align 2 ! 45: L55: ! 46: .long 0x42400000 # .float 12 ! 47: .data 2 ! 48: .data 1 ! 49: .data 0 ! 50: .globl _MAIN_ ! 51: .globl _graf_ ! 52: .globl _xsin_ ! 53: .globl _s_wsfe ! 54: .globl _do_fio ! 55: .globl _e_wsfe ! 56: .align 2 ! 57: .stabs "g.f",0x64,0,0,0 ! 58: ! 59: .text ! 60: .globl _MAIN_ ! 61: .align 1 ! 62: _MAIN_: ! 63: .word LWM1 ! 64: subl3 $LF1,fp,sp ! 65: jbr L12 ! 66: L13: ! 67: pushl $L19 ! 68: pushl $L18 ! 69: pushl $L17 ! 70: pushl $L16 ! 71: pushl $L15 ! 72: pushl $_xsin_ ! 73: callf $28,_graf_ ! 74: L14: ! 75: ret#0 ! 76: L12: ! 77: jbr L13 ! 78: .set LF1,52 ! 79: .set LWM1,0x1000 ! 80: .text ! 81: .globl _graf_ ! 82: .align 1 ! 83: _graf_: ! 84: .word LWM2 ! 85: subl3 $LF2,fp,sp ! 86: jbr L21 ! 87: L24: ! 88: movl *8(r12),v.3-v.2(r11) ! 89: L26: ! 90: addl3 $v.3-v.2,r11,r0 ! 91: pushl r0 ! 92: calls $8,*4(r12) ! 93: movl r0,v.4-v.2(r11) ! 94: cmpf2 v.4-v.2(r11),*20(r12) ! 95: jlss L9999 ! 96: cmpf2 v.4-v.2(r11),*24(r12) ! 97: jleq L27 ! 98: L9999: ! 99: movl L30,v.5+12 ! 100: pushl $v.5 ! 101: callf $8,_s_wsfe ! 102: movb L43,-53(fp) ! 103: pushl $1 ! 104: addl3 $-53,fp,r0 ! 105: pushl r0 ! 106: pushl $L44 ! 107: callf $16,_do_fio ! 108: callf $4,_e_wsfe ! 109: jbr L32 ! 110: L27: ! 111: ldf v.4-v.2(r11) ! 112: subf *20(r12) ! 113: stf r0 ! 114: ldf *24(r12) ! 115: subf *20(r12) ! 116: stf r1 ! 117: ldf r0 ! 118: divf r1 ! 119: stf r0 ! 120: cvlf $74 ! 121: stf r1 ! 122: ldf r0 ! 123: mulf r1 ! 124: stf r0 ! 125: ldf r0 ! 126: cvfl r0 ! 127: movl r0,v.6-v.2(r11) ! 128: movl L33,v.7+12 ! 129: pushl $v.7 ! 130: callf $8,_s_wsfe ! 131: movl v.6-v.2(r11),-60(fp) ! 132: movl -60(fp),r10 ! 133: movl v.8-v.2(r11),r9 ! 134: movl $1,r9 ! 135: cmpl r9,r10 ! 136: jgtr L35 ! 137: L36: ! 138: movb L43,-54(fp) ! 139: pushl $1 ! 140: addl3 $-54,fp,r0 ! 141: pushl r0 ! 142: pushl $L44 ! 143: callf $16,_do_fio ! 144: incl r9 ! 145: cmpl r9,r10 ! 146: jleq L36 ! 147: L35: ! 148: movl r9,v.8-v.2(r11) ! 149: movb L47,-55(fp) ! 150: pushl $1 ! 151: addl3 $-55,fp,r0 ! 152: pushl r0 ! 153: pushl $L44 ! 154: callf $16,_do_fio ! 155: callf $4,_e_wsfe ! 156: L32: ! 157: ldf v.3-v.2(r11) ! 158: addf *16(r12) ! 159: stf r0 ! 160: movl r0,v.3-v.2(r11) ! 161: cmpf2 v.3-v.2(r11),*12(r12) ! 162: jgtr L41 ! 163: jbr L26 ! 164: L41: ! 165: jbr L23 ! 166: L23: ! 167: L22: ! 168: ret#0 ! 169: L21: ! 170: movl $v.2,r11 ! 171: movl fp,r12 ! 172: jbr L24 ! 173: .set LF2,60 ! 174: .set LWM2,0x1E00 ! 175: .text ! 176: .globl _xsin_ ! 177: .align 1 ! 178: _xsin_: ! 179: .word LWM3 ! 180: subl3 $LF3,fp,sp ! 181: jbr L50 ! 182: L52: ! 183: ldf *4(r12) ! 184: mulf L55 ! 185: stf r0 ! 186: ldf r0 ! 187: sinf ! 188: stf r0 ! 189: ldf *4(r12) ! 190: sinf ! 191: stf r1 ! 192: ldf r0 ! 193: mulf r1 ! 194: stf r0 ! 195: movl r0,-60(fp) ! 196: jbr L51 ! 197: L51: ! 198: movl -60(fp),r0 ! 199: ret#1 ! 200: L50: ! 201: movl fp,r12 ! 202: jbr L52 ! 203: .set LF3,60 ! 204: .set LWM3,0x1000 ! 205: .text ! 206: .data 2 ! 207: .align 2 ! 208: v.7: ! 209: .long 0 ! 210: .long 6 ! 211: .space 8 ! 212: .align 2 ! 213: v.5: ! 214: .long 0 ! 215: .long 6 ! 216: .space 8 ! 217: .align 2 ! 218: v.8: ! 219: .space 4 ! 220: .align 2 ! 221: v.3: ! 222: .space 4 ! 223: .align 2 ! 224: v.4: ! 225: .space 4 ! 226: .align 2 ! 227: v.6: ! 228: .space 4 ! 229: .set v.2,v.4 ! 230:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.