1*e074627dSbostic.data 2*e074627dSbostic.data 3*e074627dSbostic_sccsid:.long 0x40282329 4*e074627dSbostic.long 0x6269676e 5*e074627dSbostic.long 0x756d312e 6*e074627dSbostic.long 0x6320342e 7*e074627dSbostic.long 0x3420362f 8*e074627dSbostic.long 0x33302f38 9*e074627dSbostic.long 0x33000000 10*e074627dSbostic.comm _rusefile,32 11*e074627dSbostic.comm _relfil,4 12*e074627dSbostic.comm _listfile,4 13*e074627dSbostic.comm _liston,4 14*e074627dSbostic.comm _Znumber,12 15*e074627dSbostic.text 16*e074627dSbosticLL0:.align 1 17*e074627dSbostic.globl _as_atoi 18*e074627dSbostic.data 19*e074627dSbosticL163:.long 0x10202 20*e074627dSbostic.long 0x3030303 21*e074627dSbostic.long 0x1020303 22*e074627dSbostic.space 4 23*e074627dSbostic.long 0x0 24*e074627dSbostic.space 4 25*e074627dSbostic.long 0x2030000 26*e074627dSbostic.space 4 27*e074627dSbostic.text 28*e074627dSbostic.data 1 29*e074627dSbosticL167:.ascii "%s%s\12\0" 30*e074627dSbostic.text 31*e074627dSbostic.data 1 32*e074627dSbosticL168:.ascii "n_n.num_tag != 0\0" 33*e074627dSbostic.text 34*e074627dSbostic.data 1 35*e074627dSbosticL169:.ascii " Botch width computation\0" 36*e074627dSbostic.text 37*e074627dSbostic.lcomm L170,12 38*e074627dSbostic.set L106,0x1c00 39*e074627dSbostic.data 40*e074627dSbostic.text 41*e074627dSbostic_as_atoi:.word L106 42*e074627dSbosticsubl3 $92,fp,sp 43*e074627dSbosticmovl 4(fp),r12 44*e074627dSbosticclrl -92(fp) 45*e074627dSbosticclrl -88(fp) 46*e074627dSbosticL112:tstb (r12) 47*e074627dSbosticjeql L111 48*e074627dSbosticcvtbl (r12),r0 49*e074627dSbosticcmpl r0,$43 50*e074627dSbosticjeql L110 51*e074627dSbosticcmpl r0,$45 52*e074627dSbosticjeql L117 53*e074627dSbosticcmpl r0,$48 54*e074627dSbosticjeql L110 55*e074627dSbosticL111:movab -72(fp),r1 56*e074627dSbosticmovab _Znumber,r0 57*e074627dSbosticmovl $12,r2 58*e074627dSbosticmovblk 59*e074627dSbosticmovab -84(fp),r1 60*e074627dSbosticmovab _Znumber,r0 61*e074627dSbosticmovl $12,r2 62*e074627dSbosticmovblk 63*e074627dSbosticsubl3 $72,fp,r11 64*e074627dSbosticpushl r11 65*e074627dSbosticcallf $8,_numclear 66*e074627dSbosticsubl3 $84,fp,-56(fp) 67*e074627dSbosticpushl -56(fp) 68*e074627dSbosticcallf $8,_numclear 69*e074627dSbosticL120:tstb (r12) 70*e074627dSbosticjeql L126 71*e074627dSbosticcvtbl (r12),r0 72*e074627dSbosticcasel r0,$48,$54 73*e074627dSbostic.align 1 74*e074627dSbosticL2000007: 75*e074627dSbostic.word L134-L2000007 76*e074627dSbostic.word L134-L2000007 77*e074627dSbostic.word L134-L2000007 78*e074627dSbostic.word L134-L2000007 79*e074627dSbostic.word L134-L2000007 80*e074627dSbostic.word L134-L2000007 81*e074627dSbostic.word L134-L2000007 82*e074627dSbostic.word L134-L2000007 83*e074627dSbostic.word L124-L2000007 84*e074627dSbostic.word L124-L2000007 85*e074627dSbostic.word L126-L2000007 86*e074627dSbostic.word L126-L2000007 87*e074627dSbostic.word L126-L2000007 88*e074627dSbostic.word L126-L2000007 89*e074627dSbostic.word L126-L2000007 90*e074627dSbostic.word L126-L2000007 91*e074627dSbostic.word L126-L2000007 92*e074627dSbostic.word L140-L2000007 93*e074627dSbostic.word L140-L2000007 94*e074627dSbostic.word L140-L2000007 95*e074627dSbostic.word L140-L2000007 96*e074627dSbostic.word L140-L2000007 97*e074627dSbostic.word L140-L2000007 98*e074627dSbostic.word L126-L2000007 99*e074627dSbostic.word L126-L2000007 100*e074627dSbostic.word L126-L2000007 101*e074627dSbostic.word L126-L2000007 102*e074627dSbostic.word L126-L2000007 103*e074627dSbostic.word L126-L2000007 104*e074627dSbostic.word L126-L2000007 105*e074627dSbostic.word L126-L2000007 106*e074627dSbostic.word L126-L2000007 107*e074627dSbostic.word L126-L2000007 108*e074627dSbostic.word L126-L2000007 109*e074627dSbostic.word L126-L2000007 110*e074627dSbostic.word L126-L2000007 111*e074627dSbostic.word L126-L2000007 112*e074627dSbostic.word L126-L2000007 113*e074627dSbostic.word L126-L2000007 114*e074627dSbostic.word L126-L2000007 115*e074627dSbostic.word L126-L2000007 116*e074627dSbostic.word L126-L2000007 117*e074627dSbostic.word L126-L2000007 118*e074627dSbostic.word L126-L2000007 119*e074627dSbostic.word L126-L2000007 120*e074627dSbostic.word L126-L2000007 121*e074627dSbostic.word L126-L2000007 122*e074627dSbostic.word L126-L2000007 123*e074627dSbostic.word L126-L2000007 124*e074627dSbostic.word L147-L2000007 125*e074627dSbostic.word L147-L2000007 126*e074627dSbostic.word L147-L2000007 127*e074627dSbostic.word L147-L2000007 128*e074627dSbostic.word L147-L2000007 129*e074627dSbostic.word L147-L2000007 130*e074627dSbosticL126:pushl r11 131*e074627dSbosticcallf $8,_posovf 132*e074627dSbosticorl2 r0,-92(fp) 133*e074627dSbostictstl -88(fp) 134*e074627dSbosticjeql L156 135*e074627dSbosticbitl $8,-92(fp) 136*e074627dSbosticjeql L157 137*e074627dSbosticandl2 $-13,-92(fp) 138*e074627dSbosticjbr L156 139*e074627dSbosticL117:xorl2 $1,-88(fp) 140*e074627dSbosticL110:incl r12 141*e074627dSbosticjbr L112 142*e074627dSbosticL124:cmpl 8(fp),$10 143*e074627dSbosticjlss L126 144*e074627dSbosticL134:cvtbl (r12),r0 145*e074627dSbosticsubl3 $48,r0,-60(fp) 146*e074627dSbosticjbr L121 147*e074627dSbosticL2000001:cmpl r0,$10 148*e074627dSbosticjeql L155 149*e074627dSbosticcmpl r0,$16 150*e074627dSbosticjeql L154 151*e074627dSbosticL151:pushl -60(fp) 152*e074627dSbosticpushl r11 153*e074627dSbosticpushl r11 154*e074627dSbosticcallf $16,_numaddd 155*e074627dSbosticorl2 r0,-92(fp) 156*e074627dSbosticincl r12 157*e074627dSbosticjbr L120 158*e074627dSbosticL140:cmpl 8(fp),$16 159*e074627dSbosticjlss L126 160*e074627dSbosticcvtbl (r12),r0 161*e074627dSbosticsubl3 $55,r0,-60(fp) 162*e074627dSbosticjbr L121 163*e074627dSbosticL147:cmpl 8(fp),$16 164*e074627dSbosticjlss L126 165*e074627dSbosticcvtbl (r12),r0 166*e074627dSbosticsubl3 $87,r0,-60(fp) 167*e074627dSbosticL121:movl 8(fp),r0 168*e074627dSbosticcmpl r0,$8 169*e074627dSbosticjneq L2000001 170*e074627dSbosticpushl r11 171*e074627dSbosticpushl r11 172*e074627dSbosticpushl $3 173*e074627dSbosticL2000005:callf $16,_numshift 174*e074627dSbosticL2000006:orl2 r0,-92(fp) 175*e074627dSbosticjbr L151 176*e074627dSbosticL154:pushl r11 177*e074627dSbosticpushl r11 178*e074627dSbosticpushl $4 179*e074627dSbosticjbr L2000005 180*e074627dSbosticL155:pushl r11 181*e074627dSbosticpushl -56(fp) 182*e074627dSbosticpushl $1 183*e074627dSbosticcallf $16,_numshift 184*e074627dSbosticorl2 r0,-92(fp) 185*e074627dSbosticpushl r11 186*e074627dSbosticpushl r11 187*e074627dSbosticpushl $3 188*e074627dSbosticcallf $16,_numshift 189*e074627dSbosticorl2 r0,-92(fp) 190*e074627dSbosticpushl r11 191*e074627dSbosticpushl -56(fp) 192*e074627dSbosticpushl r11 193*e074627dSbosticcallf $16,_numaddv 194*e074627dSbosticjbr L2000006 195*e074627dSbosticL157:pushl r11 196*e074627dSbosticpushl r11 197*e074627dSbosticcallf $12,_numnegate 198*e074627dSbosticorl2 r0,-92(fp) 199*e074627dSbosticL156:tstl -88(fp) 200*e074627dSbosticjeql L99999 201*e074627dSbosticmnegl $1,r0 202*e074627dSbosticjbr L99998 203*e074627dSbosticL99999:clrl r0 204*e074627dSbosticL99998:movl r0,-60(fp) 205*e074627dSbosticclrl r10 206*e074627dSbosticL2000003:cmpl (r11)[r10],-60(fp) 207*e074627dSbosticjeql L160 208*e074627dSbosticaoblss $2,r10,L2000003 209*e074627dSbosticL160:decl r10 210*e074627dSbosticjgeq L164 211*e074627dSbosticclrl r10 212*e074627dSbosticL164:movb L163+8[r10],-64(fp) 213*e074627dSbosticjneq L165 214*e074627dSbosticpushl $L169 215*e074627dSbosticpushl $L168 216*e074627dSbosticpushl $L167 217*e074627dSbosticcallf $16,_panic 218*e074627dSbosticL165:movl -92(fp),*12(fp) 219*e074627dSbosticsubl3 $72,fp,r0 220*e074627dSbosticmovab L170,r1 221*e074627dSbosticmovab (r1),r1 222*e074627dSbosticmovab (r0),r0 223*e074627dSbosticmovl $12,r2 224*e074627dSbosticmovblk 225*e074627dSbosticmovab L170,r0 226*e074627dSbosticret#1 227*e074627dSbostic.align 1 228*e074627dSbostic.globl _as_atof 229*e074627dSbostic.lcomm L180,12 230*e074627dSbostic.set L171,0x0 231*e074627dSbostic.data 232*e074627dSbostic.text 233*e074627dSbostic_as_atof:.word L171 234*e074627dSbosticsubl3 $64,fp,sp 235*e074627dSbosticmovab -64(fp),r1 236*e074627dSbosticmovab _Znumber,r0 237*e074627dSbosticmovl $12,r2 238*e074627dSbosticmovblk 239*e074627dSbosticcvtlb 8(fp),-56(fp) 240*e074627dSbosticmovl 8(fp),r0 241*e074627dSbosticcmpl r0,$4 242*e074627dSbosticjeql L179 243*e074627dSbosticcmpl r0,$5 244*e074627dSbosticjeql L178 245*e074627dSbosticL176:subl3 $64,fp,r0 246*e074627dSbosticmovab L180,r1 247*e074627dSbosticmovab (r1),r1 248*e074627dSbosticmovab (r0),r0 249*e074627dSbosticmovl $12,r2 250*e074627dSbosticmovblk 251*e074627dSbosticmovab L180,r0 252*e074627dSbosticret#1 253*e074627dSbosticL178:pushl 4(fp) 254*e074627dSbosticcallf $8,_atof 255*e074627dSbosticmovl r1,-60(fp) 256*e074627dSbosticmovl r0,-64(fp) 257*e074627dSbosticjbr L176 258*e074627dSbosticL179:pushl 4(fp) 259*e074627dSbosticcallf $8,_atof 260*e074627dSbosticldd r0 261*e074627dSbosticcvdf 262*e074627dSbosticstf -64(fp) 263*e074627dSbosticjbr L176 264*e074627dSbostic.align 1 265*e074627dSbostic.globl _posovf 266*e074627dSbostic.set L181,0x1800 267*e074627dSbostic.data 268*e074627dSbostic.text 269*e074627dSbostic_posovf:.word L181 270*e074627dSbosticsubl3 $56,fp,sp 271*e074627dSbosticmovl 4(fp),r12 272*e074627dSbosticclrl -56(fp) 273*e074627dSbosticbitl $-2147483648,4(r12) 274*e074627dSbosticjeql L185 275*e074627dSbosticmovl $4,-56(fp) 276*e074627dSbosticL185:cmpl 4(r12),$-2147483648 277*e074627dSbosticjneq L2000010 278*e074627dSbosticclrl r11 279*e074627dSbosticL2000009:tstl (r12)[r11] 280*e074627dSbosticjeql L187 281*e074627dSbosticL2000010:movl -56(fp),r0 282*e074627dSbosticret#1 283*e074627dSbosticL187:decl r11 284*e074627dSbosticjgeq L2000009 285*e074627dSbosticorl2 $8,-56(fp) 286*e074627dSbosticjbr L2000010 287*e074627dSbostic.align 1 288*e074627dSbostic.globl _isclear 289*e074627dSbostic.set L192,0x1000 290*e074627dSbostic.data 291*e074627dSbostic.text 292*e074627dSbostic_isclear:.word L192 293*e074627dSbosticmovl 4(fp),r12 294*e074627dSbosticpushl $_Znumber 295*e074627dSbosticpushl r12 296*e074627dSbosticcallf $12,_isunequal 297*e074627dSbostictstl r0 298*e074627dSbosticjneq L99997 299*e074627dSbosticmovl $1,r0 300*e074627dSbosticjbr L99996 301*e074627dSbosticL99997:clrl r0 302*e074627dSbosticL99996:ret#1 303*e074627dSbostic.align 1 304*e074627dSbostic.globl _isunequal 305*e074627dSbostic.set L197,0x1c00 306*e074627dSbostic.data 307*e074627dSbostic.text 308*e074627dSbostic_isunequal:.word L197 309*e074627dSbosticmovl 4(fp),r12 310*e074627dSbosticmovl 8(fp),r11 311*e074627dSbosticmovl $2,r10 312*e074627dSbosticL203:movl r12,r0 313*e074627dSbosticaddl2 $4,r12 314*e074627dSbosticmovl r11,r1 315*e074627dSbosticaddl2 $4,r11 316*e074627dSbosticcmpl (r0),(r1) 317*e074627dSbosticjeql L202 318*e074627dSbosticmovl r10,r0 319*e074627dSbosticret#1 320*e074627dSbosticL202:decl r10 321*e074627dSbosticjneq L203 322*e074627dSbosticclrl r0 323*e074627dSbosticret#1 324*e074627dSbostic.align 1 325*e074627dSbostic.globl _numclear 326*e074627dSbostic.set L205,0x1800 327*e074627dSbostic.data 328*e074627dSbostic.text 329*e074627dSbostic_numclear:.word L205 330*e074627dSbosticmovl 4(fp),r12 331*e074627dSbosticmovl $2,r11 332*e074627dSbosticL211:clrl (r12) 333*e074627dSbosticaddl2 $4,r12 334*e074627dSbosticdecl r11 335*e074627dSbosticjneq L211 336*e074627dSbosticclrl r0 337*e074627dSbosticret#1 338*e074627dSbostic.align 1 339*e074627dSbostic.globl _numshift 340*e074627dSbostic.set L212,0x1fc0 341*e074627dSbostic.data 342*e074627dSbostic.text 343*e074627dSbostic_numshift:.word L212 344*e074627dSbosticmovl 8(fp),r12 345*e074627dSbosticmovl 12(fp),r11 346*e074627dSbosticmovl $2,r10 347*e074627dSbostictstl 4(fp) 348*e074627dSbosticjneq L216 349*e074627dSbosticL219:movl (r11),(r12) 350*e074627dSbosticaddl2 $4,r11 351*e074627dSbosticaddl2 $4,r12 352*e074627dSbosticdecl r10 353*e074627dSbosticjneq L219 354*e074627dSbosticclrl r0 355*e074627dSbosticret#1 356*e074627dSbosticL216:clrl r9 357*e074627dSbosticmovl 4(fp),r0 358*e074627dSbosticshll r0,$1,r0 359*e074627dSbosticsubl3 $1,r0,r7 360*e074627dSbostictstl 4(fp) 361*e074627dSbosticjleq L220 362*e074627dSbosticL223:movl (r11),r6 363*e074627dSbosticaddl2 $4,r11 364*e074627dSbosticsubl3 4(fp),$32,r0 365*e074627dSbosticshrl r0,r6,r0 366*e074627dSbosticandl3 r7,r0,r8 367*e074627dSbosticmovl 4(fp),r0 368*e074627dSbosticshll r0,r6,r6 369*e074627dSbosticmcoml r7,r0 370*e074627dSbosticandl2 r0,r6 371*e074627dSbosticorl3 r9,r6,(r12) 372*e074627dSbosticaddl2 $4,r12 373*e074627dSbosticmovl r8,r9 374*e074627dSbosticdecl r10 375*e074627dSbosticjneq L223 376*e074627dSbostictstl r9 377*e074627dSbosticjeql L99995 378*e074627dSbosticmovl $2,r0 379*e074627dSbosticjbr L99994 380*e074627dSbosticL99995:clrl r0 381*e074627dSbosticL99994:ret#1 382*e074627dSbosticL220:mnegl 4(fp),4(fp) 383*e074627dSbosticaddl2 $8,r11 384*e074627dSbosticaddl2 $8,r12 385*e074627dSbosticL226:subl2 $4,r11 386*e074627dSbosticmovl (r11),r6 387*e074627dSbosticandl3 r7,r6,r8 388*e074627dSbosticmovl 4(fp),r0 389*e074627dSbosticshrl r0,r6,r6 390*e074627dSbosticsubl3 r0,$32,r0 391*e074627dSbosticshll r0,$1,r0 392*e074627dSbosticdecl r0 393*e074627dSbosticandl2 r0,r6 394*e074627dSbosticorl3 r9,r6,r0 395*e074627dSbosticsubl2 $4,r12 396*e074627dSbosticmovl r0,(r12) 397*e074627dSbosticsubl3 4(fp),$32,r0 398*e074627dSbosticshll r0,r8,r9 399*e074627dSbosticdecl r10 400*e074627dSbosticjneq L226 401*e074627dSbostictstl r9 402*e074627dSbosticjeql L99993 403*e074627dSbosticmovl $2,r0 404*e074627dSbosticjbr L99992 405*e074627dSbosticL99993:clrl r0 406*e074627dSbosticL99992:ret#1 407*e074627dSbostic.align 1 408*e074627dSbostic.globl _numaddd 409*e074627dSbostic.lcomm L231,12 410*e074627dSbostic.set L227,0x0 411*e074627dSbostic.data 412*e074627dSbostic.text 413*e074627dSbostic_numaddd:.word L227 414*e074627dSbosticcvtlb 12(fp),L231+3 415*e074627dSbosticpushl $L231 416*e074627dSbosticpushl 8(fp) 417*e074627dSbosticpushl 4(fp) 418*e074627dSbosticcallf $16,_numaddv 419*e074627dSbosticret#1 420*e074627dSbostic.align 1 421*e074627dSbostic.globl _numaddv 422*e074627dSbostic.set L232,0x1fc0 423*e074627dSbostic.data 424*e074627dSbostic.text 425*e074627dSbostic_numaddv:.word L232 426*e074627dSbosticsubl3 $56,fp,sp 427*e074627dSbosticmovl 4(fp),r12 428*e074627dSbosticmovl 8(fp),r11 429*e074627dSbosticmovl 12(fp),r10 430*e074627dSbosticclrl r8 431*e074627dSbosticmovl $2,r9 432*e074627dSbosticL238:movl (r11),r7 433*e074627dSbosticaddl2 $4,r11 434*e074627dSbosticmovl (r10),r6 435*e074627dSbosticaddl2 $4,r10 436*e074627dSbosticaddl3 r6,r7,r0 437*e074627dSbosticaddl3 r8,r0,-56(fp) 438*e074627dSbosticmovl -56(fp),(r12) 439*e074627dSbosticaddl2 $4,r12 440*e074627dSbosticclrl r8 441*e074627dSbosticcmpl -56(fp),r7 442*e074627dSbosticjlssu L99991 443*e074627dSbosticcmpl -56(fp),r6 444*e074627dSbosticjgequ L237 445*e074627dSbosticL99991:movl $1,r8 446*e074627dSbosticL237:decl r9 447*e074627dSbosticjneq L238 448*e074627dSbostictstl r8 449*e074627dSbosticjeql L99990 450*e074627dSbosticmovl $1,r0 451*e074627dSbosticjbr L99989 452*e074627dSbosticL99990:clrl r0 453*e074627dSbosticL99989:ret#1 454*e074627dSbostic.align 1 455*e074627dSbostic.globl _numnegate 456*e074627dSbostic.set L240,0x0 457*e074627dSbostic.data 458*e074627dSbostic.text 459*e074627dSbostic_numnegate:.word L240 460*e074627dSbosticsubl3 $56,fp,sp 461*e074627dSbosticpushl 8(fp) 462*e074627dSbosticpushl 4(fp) 463*e074627dSbosticcallf $12,_num1comp 464*e074627dSbosticmovl r0,-56(fp) 465*e074627dSbosticpushl $1 466*e074627dSbosticpushl 4(fp) 467*e074627dSbosticpushl 4(fp) 468*e074627dSbosticcallf $16,_numaddd 469*e074627dSbosticorl2 r0,-56(fp) 470*e074627dSbosticmovl -56(fp),r0 471*e074627dSbosticret#1 472*e074627dSbostic.align 1 473*e074627dSbostic.globl _num1comp 474*e074627dSbostic.set L244,0x1c00 475*e074627dSbostic.data 476*e074627dSbostic.text 477*e074627dSbostic_num1comp:.word L244 478*e074627dSbosticmovl 4(fp),r12 479*e074627dSbosticmovl 8(fp),r11 480*e074627dSbosticmovl $2,r10 481*e074627dSbosticL250:mcoml (r11),(r12) 482*e074627dSbosticaddl2 $4,r11 483*e074627dSbosticaddl2 $4,r12 484*e074627dSbosticdecl r10 485*e074627dSbosticjneq L250 486*e074627dSbosticclrl r0 487*e074627dSbosticret#1 488*e074627dSbostic.align 1 489*e074627dSbostic.globl _bignumprint 490*e074627dSbostic.data 1 491*e074627dSbosticL260:.ascii "val[msd] = 0x%x, val[lsd] = 0x%x.\0" 492*e074627dSbostic.text 493*e074627dSbostic.data 1 494*e074627dSbosticL262:.ascii "value %20.17f\0" 495*e074627dSbostic.text 496*e074627dSbostic.data 1 497*e074627dSbosticL264:.ascii "value %20.17f\0" 498*e074627dSbostic.text 499*e074627dSbostic.set L252,0x0 500*e074627dSbostic.data 501*e074627dSbostic.text 502*e074627dSbostic_bignumprint:.word L252 503*e074627dSbosticmovl _num_type,r0 504*e074627dSbosticcmpl r0,$3 505*e074627dSbosticjeql L258 506*e074627dSbosticcmpl r0,$4 507*e074627dSbosticjeql L261 508*e074627dSbosticcmpl r0,$5 509*e074627dSbosticjeql L263 510*e074627dSbosticL256:ret#2 511*e074627dSbosticL258:pushl 4(fp) 512*e074627dSbosticpushl 8(fp) 513*e074627dSbosticpushl $L260 514*e074627dSbosticL2000011:callf $16,_printf 515*e074627dSbosticjbr L256 516*e074627dSbosticL261:pushl $0 517*e074627dSbosticpushl 4(fp) 518*e074627dSbosticpushl $L262 519*e074627dSbosticjbr L2000011 520*e074627dSbosticL263:pushl 8(fp) 521*e074627dSbosticpushl 4(fp) 522*e074627dSbosticpushl $L264 523*e074627dSbosticjbr L2000011 524*e074627dSbostic 525