chrissy
/
P8000
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

add ASM source to generate 100% comp. WEGA 3.2 object

This commit is contained in:
Oliver Lehmann 2008-06-09 20:05:55 +00:00
parent f5f9018c54
commit 505b3ae564
1 changed files with 245 additions and 243 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

488
WEGA/src/uts/sys/debug.s
View File

@ -48,8 +48,9 @@ _debugwstr::
.byte %30 .byte %30
.byte %37 .byte %37
.byte %0 .byte %0
.even
_kdebug:: _kdebug::
.word 0 .word %0
.comm 0, _buffer1; .comm 0, _buffer1;
.comm 0, _buffer2; .comm 0, _buffer2;
.comm 0, _buffer3; .comm 0, _buffer3;
@ -92,7 +93,7 @@ _kdebug::
.comm 4, _tk_nin; .comm 4, _tk_nin;
.comm 4, _tk_nout; .comm 4, _tk_nout;
.comm 200, _callout; .comm 200, _callout;
.comm 50, _breakpt; .comm 50, _breakpt;
_kdbstr: _kdbstr:
.=.+6 .=.+6
_hzif: _hzif:
@ -112,6 +113,7 @@ _hzif:
.byte %44 .byte %44
.byte %45 .byte %45
.byte %46 .byte %46
.even
_foo: _foo:
.word 0 .word 0
_format: _format:
@ -131,14 +133,14 @@ _gethex::
dec fp,#~L2 dec fp,#~L2
subl rr2,rr2 subl rr2,rr2
jpr L20000 jpr L20000
L95: L96:
cpb |_stkseg+~L1+1|(fp),#97 cpb |_stkseg+~L1+1|(fp),#97
jpr ge,L20005 jpr ge,L20005
L97: L98:
cpb |_stkseg+~L1+1|(fp),#48 cpb |_stkseg+~L1+1|(fp),#48
jpr lt,L99 jpr lt,L100
cpb |_stkseg+~L1+1|(fp),#57 cpb |_stkseg+~L1+1|(fp),#57
jpr gt,L99 jpr gt,L100
ldb rl2,|_stkseg+~L1+1|(fp) ldb rl2,|_stkseg+~L1+1|(fp)
subb rl2,#48 subb rl2,#48
L20007: L20007:
@ -156,20 +158,20 @@ L20000:
testb rl2 testb rl2
jpr eq,L10000 jpr eq,L10000
cpb rl2,#65 cpb rl2,#65
jpr lt,L95 jpr lt,L96
cpb rl2,#70 cpb rl2,#70
jpr gt,L95 jpr gt,L96
extsb r2 extsb r2
sub r2,#55 sub r2,#55
jpr L20007 jpr L20007
L20005: L20005:
cpb |_stkseg+~L1+1|(fp),#102 cpb |_stkseg+~L1+1|(fp),#102
jpr gt,L97 jpr gt,L98
ldb rl2,|_stkseg+~L1+1|(fp) ldb rl2,|_stkseg+~L1+1|(fp)
extsb r2 extsb r2
sub r2,#87 sub r2,#87
jpr L20007 jpr L20007
L99: L100:
ldl rr2,|_stkseg+~L1+2|(fp) ldl rr2,|_stkseg+~L1+2|(fp)
L10000: L10000:
inc fp,#~L2 inc fp,#~L2
@ -229,148 +231,148 @@ _zpr::
.psec data .psec data
.data .data
L114: L115:
.byte %4b,%44,%42,%3a,%20,%55,%6e,%73 .byte %4b,%44,%42,%3a,%20,%55,%6e,%73
.byte %65,%74,%20,%62,%72,%65,%61,%6b .byte %65,%74,%20,%62,%72,%65,%61,%6b
.byte %70,%6f,%69,%6e,%74,%a,%0 .byte %70,%6f,%69,%6e,%74,%a,%0
.even .even
L116: L117:
.byte %4b,%44,%42,%3a,%20,%40,%25,%58 .byte %4b,%44,%42,%3a,%20,%40,%25,%58
.byte %20,%42,%72,%65,%61,%6b,%70,%6f .byte %20,%42,%72,%65,%61,%6b,%70,%6f
.byte %69,%6e,%74,%a,%0 .byte %69,%6e,%74,%a,%0
.even .even
L121: L122:
.byte %4b,%44,%42,%3e,%7,%0 .byte %4b,%44,%42,%3e,%7,%0
.even .even
L126: L127:
.byte %75,%6d,%70,%20,%63,%61,%6c,%6c .byte %75,%6d,%70,%20,%63,%61,%6c,%6c
.byte %20,%74,%6f,%20,%40,%0 .byte %20,%74,%6f,%20,%40,%0
.even .even
L131: L132:
.byte %72,%65,%61,%6b,%70,%6f,%69,%6e .byte %72,%65,%61,%6b,%70,%6f,%69,%6e
.byte %74,%20,%40,%0 .byte %74,%20,%40,%0
.even .even
L136: L137:
.byte %4b,%44,%42,%3a,%20,%4e,%6f,%20 .byte %4b,%44,%42,%3a,%20,%4e,%6f,%20
.byte %6d,%6f,%72,%65,%20,%62,%72,%65 .byte %6d,%6f,%72,%65,%20,%62,%72,%65
.byte %61,%6b,%20,%73,%6c,%6f,%74,%73 .byte %61,%6b,%20,%73,%6c,%6f,%74,%73
.byte %a,%0 .byte %a,%0
.even .even
L139: L140:
.byte %20,%46,%41,%55,%4c,%54,%20,%0 .byte %20,%46,%41,%55,%4c,%54,%20,%0
.even .even
L142: L143:
.byte %73,%65,%72,%20,%73,%70,%61,%63 .byte %73,%65,%72,%20,%73,%70,%61,%63
.byte %65,%20,%64,%0 .byte %65,%20,%64,%0
.even .even
L146: L147:
.byte %68,%79,%73,%69,%63,%61,%6c,%20 .byte %68,%79,%73,%69,%63,%61,%6c,%20
.byte %73,%70,%61,%63,%65,%20,%64,%0 .byte %73,%70,%61,%63,%65,%20,%64,%0
.even .even
L149: L150:
.byte %69,%73,%70,%6c,%61,%79,%20,%40 .byte %69,%73,%70,%6c,%61,%79,%20,%40
.byte %0 .byte %0
.even .even
L150: L151:
.byte %66,%6f,%72,%20,%0 .byte %66,%6f,%72,%20,%0
.even .even
L151: L152:
.byte %77,%6f,%72,%64,%73,%a,%0 .byte %77,%6f,%72,%64,%73,%a,%0
.even .even
L157: L158:
.byte %a,%0 .byte %a,%0
.even .even
L158: L159:
.byte %25,%73,%0 .byte %25,%73,%0
.even .even
L159: L160:
.byte %25,%73,%3a,%20,%0 .byte %25,%73,%3a,%20,%0
.even .even
L161: L162:
.byte %20,%46,%41,%55,%4c,%54,%20,%0 .byte %20,%46,%41,%55,%4c,%54,%20,%0
.even .even
L164: L165:
.byte %20,%46,%41,%55,%4c,%54,%20,%0 .byte %20,%46,%41,%55,%4c,%54,%20,%0
.even .even
L166: L167:
.byte %25,%73,%20,%0 .byte %25,%73,%20,%0
.even .even
L168: L169:
.byte %20,%20,%7c,%25,%73,%7c,%0 .byte %20,%20,%7c,%25,%73,%7c,%0
.even .even
L171: L172:
.byte %6f,%64,%69,%66,%79,%20,%0 .byte %6f,%64,%69,%66,%79,%20,%0
.even .even
L176: L177:
.byte %65,%67,%69,%73,%74,%65,%72,%20 .byte %65,%67,%69,%73,%74,%65,%72,%20
.byte %0 .byte %0
.even .even
L177: L178:
.byte %28,%25,%73,%29,%20,%77,%69,%74 .byte %28,%25,%73,%29,%20,%77,%69,%74
.byte %68,%20,%0 .byte %68,%20,%0
.even .even
L178: L179:
.byte %4f,%4b,%20,%0 .byte %4f,%4b,%20,%0
.even .even
L185:
.byte %65,%6d,%6f,%72,%79,%20,%40,%0
.even
L186: L186:
.byte %65,%6d,%6f,%72,%79,%20,%40,%0
.even
L187:
.byte %28,%25,%73,%29,%20,%77,%69,%74 .byte %28,%25,%73,%29,%20,%77,%69,%74
.byte %68,%20,%0 .byte %68,%20,%0
.even .even
L187: L188:
.byte %4f,%4b,%20,%0 .byte %4f,%4b,%20,%0
.even .even
L193: L194:
.byte %20,%46,%41,%55,%4c,%54,%20,%0 .byte %20,%46,%41,%55,%4c,%54,%20,%0
.even .even
.even .even
L195: L196:
.word 77 .word 77
.word 82 .word 82
.word 109 .word 109
.word 114 .word 114
.even .even
L199: L200:
.byte %65,%67,%69,%73,%74,%65,%72,%73 .byte %65,%67,%69,%73,%74,%65,%72,%73
.byte %a,%0 .byte %a,%0
.even .even
L204: L205:
.byte %72,%25,%64,%3a,%25,%73,%20,%0 .byte %72,%25,%64,%3a,%25,%73,%20,%0
.even .even
L205: L206:
.byte %a,%66,%63,%77,%3d,%25,%73,%20 .byte %a,%66,%63,%77,%3d,%25,%73,%20
.byte %0 .byte %0
.even .even
L206: L207:
.byte %70,%63,%73,%65,%67,%3d,%25,%73 .byte %70,%63,%73,%65,%67,%3d,%25,%73
.byte %20,%0 .byte %20,%0
.even .even
L207: L208:
.byte %70,%63,%6f,%66,%66,%3d,%25,%73 .byte %70,%63,%6f,%66,%66,%3d,%25,%73
.byte %0 .byte %0
.even .even
L210: L211:
.byte %69,%6e,%67,%6c,%65,%20,%73,%74 .byte %69,%6e,%67,%6c,%65,%20,%73,%74
.byte %65,%70,%a,%0 .byte %65,%70,%a,%0
.even .even
L214: L215:
.byte %61,%70,%65,%20,%63,%72,%61,%73 .byte %61,%70,%65,%20,%63,%72,%61,%73
.byte %68,%20,%64,%75,%6d,%70,%a,%0 .byte %68,%20,%64,%75,%6d,%70,%a,%0
.even .even
L215: L216:
.byte %77,%72,%69,%74,%61,%62,%6c,%65 .byte %77,%72,%69,%74,%61,%62,%6c,%65
.byte %20,%74,%61,%70,%65,%20,%6c,%6f .byte %20,%74,%61,%70,%65,%20,%6c,%6f
.byte %61,%64,%65,%64,%20,%69,%6e,%20 .byte %61,%64,%65,%64,%20,%69,%6e,%20
.byte %64,%72,%69,%76,%65,%20,%30,%3f .byte %64,%72,%69,%76,%65,%20,%30,%3f
.byte %20,%0 .byte %20,%0
.even .even
L223: L224:
.byte %6f,%6e,%74,%69,%6e,%75,%65,%a .byte %6f,%6e,%74,%69,%6e,%75,%65,%a
.byte %0 .byte %0
.even .even
L226: L227:
.byte %78,%69,%74,%a,%0 .byte %78,%69,%74,%a,%0
.even .even
.even .even
@ -384,65 +386,65 @@ _debug::
.psec data .psec data
.data .data
.even .even
L196: L197:
.long L184 .long L185
.long L175 .long L176
.long L184 .long L185
.long L175 .long L176
.even .even
L227: L228:
.long L130 .long L131
.long L222 .long L223
.long L148 .long L149
.long L225 .long L226
.long L127 .long L128
.long L127 .long L128
.long L127 .long L128
.long L127 .long L128
.long L125 .long L126
.long L127 .long L128
.long L127 .long L128
.long L170 .long L171
.long L127 .long L128
.long L127 .long L128
.long L145 .long L146
.long L127 .long L128
.long L198 .long L199
.long L209 .long L210
.long L213 .long L214
.long L141 .long L142
.long L127 .long L128
.long L127 .long L128
.long L127 .long L128
.long L127 .long L128
.long L127 .long L128
.long L127 .long L128
.long L127 .long L128
.long L127 .long L128
.long L127 .long L128
.long L127 .long L128
.long L127 .long L128
.long L127 .long L128
.long L130 .long L131
.long L222 .long L223
.long L148 .long L149
.long L225 .long L226
.long L127 .long L128
.long L127 .long L128
.long L127 .long L128
.long L127 .long L128
.long L125 .long L126
.long L127 .long L128
.long L127 .long L128
.long L170 .long L171
.long L127 .long L128
.long L127 .long L128
.long L145 .long L146
.long L127 .long L128
.long L198 .long L199
.long L209 .long L210
.long L213 .long L214
.long L141 .long L142
.psec .psec
.code .code
sub fp,#~L2 sub fp,#~L2
@ -457,14 +459,14 @@ L227:
ld |_stkseg+~L1+22|(fp),r4 ld |_stkseg+~L1+22|(fp),r4
ld |_stkseg+~L1+20|(fp),#5 ld |_stkseg+~L1+20|(fp),#5
cp |_stkseg+~L1+22|(fp),#2 cp |_stkseg+~L1+22|(fp),#2
jpr ne,L119 jpr ne,L120
clr |_stkseg+~L1+20|(fp) clr |_stkseg+~L1+20|(fp)
L20009: L20009:
ld r3,|_stkseg+~L1+20|(fp) ld r3,|_stkseg+~L1+20|(fp)
mult rr2,#10 mult rr2,#10
ld r2,_breakpt(r3) ld r2,_breakpt(r3)
test r2 test r2
jpr eq,L108 jpr eq,L109
ld r5,|_stkseg+~L1+20|(fp) ld r5,|_stkseg+~L1+20|(fp)
mult rr4,#10 mult rr4,#10
ld r2,_breakpt+2(r5) ld r2,_breakpt+2(r5)
@ -472,26 +474,26 @@ L20009:
ld r3,rr4(#36) ld r3,rr4(#36)
and r3,#16128 and r3,#16128
cp r2,r3 cp r2,r3
jpr ne,L108 jpr ne,L109
ld r7,|_stkseg+~L1+20|(fp) ld r7,|_stkseg+~L1+20|(fp)
mult rr6,#10 mult rr6,#10
ld r2,_breakpt+4(r7) ld r2,_breakpt+4(r7)
ld r3,rr4(#38) ld r3,rr4(#38)
dec r3,#2 dec r3,#2
cp r2,r3 cp r2,r3
jpr eq,L109 jpr eq,L110
L108: L109:
inc |_stkseg+~L1+20|(fp),#1 inc |_stkseg+~L1+20|(fp),#1
cp |_stkseg+~L1+20|(fp),#5 cp |_stkseg+~L1+20|(fp),#5
jpr lt,L20009 jpr lt,L20009
L109: L110:
cp |_stkseg+~L1+20|(fp),#5 cp |_stkseg+~L1+20|(fp),#5
jpr lt,L112 jpr lt,L113
ldl rr6,#L114 ldl rr6,#L115
L20020: L20022:
callr _printf callr _printf
jpr L119 jpr L120
L112: L113:
ld r3,|_stkseg+~L1+20|(fp) ld r3,|_stkseg+~L1+20|(fp)
mult rr2,#10 mult rr2,#10
ldl rr4,#_breakpt ldl rr4,#_breakpt
@ -504,7 +506,7 @@ L112:
ld r3,|_stkseg+~L1+20|(fp) ld r3,|_stkseg+~L1+20|(fp)
mult rr2,#10 mult rr2,#10
ldl rr4,_breakpt+2(r3) ldl rr4,_breakpt+2(r3)
ldl rr6,#L116 ldl rr6,#L117
callr _printf callr _printf
ldl rr4,#_stkseg+~L1+36 ldl rr4,#_stkseg+~L1+36
add r5,fp add r5,fp
@ -539,19 +541,19 @@ L112:
ldl rr2,|_stkseg+~L1|(fp) ldl rr2,|_stkseg+~L1|(fp)
add r3,#38 add r3,#38
dec @rr2,#2 dec @rr2,#2
L119: L120:
ldl rr6,#L121 ldl rr6,#L122
callr _printf callr _printf
callr _getchar callr _getchar
ld |_stkseg+~L1+18|(fp),r2 ld |_stkseg+~L1+18|(fp),r2
sub r2,#66 sub r2,#66
cp r2,#51 cp r2,#51
jpr ugt,L127 jpr ugt,L128
rl r2,#2 rl r2,#2
ldl rr4,L227(r2) ldl rr4,L228(r2)
jp @rr4 jp @rr4
L125: L126:
ldl rr6,#L126 ldl rr6,#L127
callr _printf callr _printf
callr _gethex callr _gethex
ldl rr4,rr2 ldl rr4,rr2
@ -559,12 +561,12 @@ L125:
ldl |_stkseg+~L1+32|(fp),rr4 ldl |_stkseg+~L1+32|(fp),rr4
ldl rr2,rr4 ldl rr2,rr4
call @rr2 call @rr2
L127: L128:
ldk r7,#10 ldk r7,#10
callr _putchar callr _putchar
jpr L119 jpr L120
L130: L131:
ldl rr6,#L131 ldl rr6,#L132
callr _printf callr _printf
callr _gethex callr _gethex
and r2,#16128 and r2,#16128
@ -572,21 +574,21 @@ L130:
and r4,#32512 and r4,#32512
ldl |_stkseg+~L1+8|(fp),rr4 ldl |_stkseg+~L1+8|(fp),rr4
clr |_stkseg+~L1+20|(fp) clr |_stkseg+~L1+20|(fp)
L134: L135:
ld r3,|_stkseg+~L1+20|(fp) ld r3,|_stkseg+~L1+20|(fp)
mult rr2,#10 mult rr2,#10
ld r2,_breakpt(r3) ld r2,_breakpt(r3)
test r2 test r2
jpr eq,L133 jpr eq,L134
inc |_stkseg+~L1+20|(fp),#1 inc |_stkseg+~L1+20|(fp),#1
cp |_stkseg+~L1+20|(fp),#5
jpr lt,L134
L133:
cp |_stkseg+~L1+20|(fp),#5 cp |_stkseg+~L1+20|(fp),#5
jpr lt,L135 jpr lt,L135
ldl rr6,#L136 L134:
jpr L20020 cp |_stkseg+~L1+20|(fp),#5
L135: jpr lt,L136
ldl rr6,#L137
jpr L20022
L136:
ld r3,|_stkseg+~L1+20|(fp) ld r3,|_stkseg+~L1+20|(fp)
mult rr2,#10 mult rr2,#10
ldl rr4,#_breakpt ldl rr4,#_breakpt
@ -626,19 +628,19 @@ L135:
ld r5,#127 ld r5,#127
callr _skbyte callr _skbyte
test r2 test r2
jpr ne,L138a jpr ne,L10009
ldl rr6,|_stkseg+~L1+8|(fp) ldl rr6,|_stkseg+~L1+8|(fp)
inc r7,#1 inc r7,#1
ldk r5,#2 ldk r5,#2
callr _skbyte callr _skbyte
test r2 test r2
jpr eq,L138 jpr eq,L139
L138a: L10009:
ldl rr6,#L139 ldl rr6,#L140
L20021: L20027:
callr _printf callr _printf
jpr L127 jpr L128
L138: L139:
ldb rl2,|_stkseg+~L1+41|(fp) ldb rl2,|_stkseg+~L1+41|(fp)
ldb |_stkseg+~L1+39|(fp),rl2 ldb |_stkseg+~L1+39|(fp),rl2
ldl rr4,#_stkseg+~L1+36 ldl rr4,#_stkseg+~L1+36
@ -647,32 +649,32 @@ L138:
ldb rh6,#0 ldb rh6,#0
ld r7,_mmut ld r7,_mmut
callr _loadsd callr _loadsd
jpr L127 jpr L128
L141: L142:
ldl rr6,#L142 ldl rr6,#L143
callr _printf callr _printf
ldl rr2,#_fubyte ldl rr2,#_fubyte
jpr L20010 jpr L20010
L145: L146:
ldl rr6,#L146 ldl rr6,#L147
callr _printf callr _printf
ldl rr2,#_fpbyte ldl rr2,#_fpbyte
jpr L20010 jpr L20010
L148: L149:
ldl rr2,#_fkbyte ldl rr2,#_fkbyte
L20010: L20010:
ldl |_stkseg+~L1+32|(fp),rr2 ldl |_stkseg+~L1+32|(fp),rr2
ldl rr6,#L149 ldl rr6,#L150
callr _printf callr _printf
callr _gethex callr _gethex
ldl rr4,rr2 ldl rr4,rr2
and r4,#32512 and r4,#32512
ldl |_stkseg+~L1+4|(fp),rr4 ldl |_stkseg+~L1+4|(fp),rr4
ldl rr6,#L150 ldl rr6,#L151
callr _printf callr _printf
callr _gethex callr _gethex
ldl |_stkseg+~L1+28|(fp),rr2 ldl |_stkseg+~L1+28|(fp),rr2
ldl rr6,#L151 ldl rr6,#L152
callr _printf callr _printf
clr |_stkseg+~L1+16|(fp) clr |_stkseg+~L1+16|(fp)
ldl rr2,|_stkseg+~L1+28|(fp) ldl rr2,|_stkseg+~L1+28|(fp)
@ -681,21 +683,21 @@ L20010:
slal rr2,#3 slal rr2,#3
ldl |_stkseg+~L1+28|(fp),rr2 ldl |_stkseg+~L1+28|(fp),rr2
subl rr2,rr2 subl rr2,rr2
L20012: L20014:
ldl |_stkseg+~L1+24|(fp),rr2 ldl |_stkseg+~L1+24|(fp),rr2
cpl rr2,|_stkseg+~L1+28|(fp) cpl rr2,|_stkseg+~L1+28|(fp)
jpr uge,L127 jpr uge,L128
test |_stkseg+~L1+16|(fp) test |_stkseg+~L1+16|(fp)
jpr ne,L155 jpr ne,L156
testl rr2 testl rr2
jpr eq,L156 jpr eq,L157
ldl rr6,#L157 ldl rr6,#L158
callr _printf callr _printf
L156: L157:
ld r7,|_stkseg+~L1+4|(fp) ld r7,|_stkseg+~L1+4|(fp)
callr _zpr callr _zpr
ldl |_stkseg+~L1+42|(fp),rr2 ldl |_stkseg+~L1+42|(fp),rr2
ldl rr6,#L158 ldl rr6,#L159
ldl rr4,rr2 ldl rr4,rr2
callr _printf callr _printf
ldl rr2,#_stkseg+~L1+4 ldl rr2,#_stkseg+~L1+4
@ -703,10 +705,10 @@ L156:
ld r7,rr2(#2) ld r7,rr2(#2)
callr _zpr callr _zpr
ldl |_stkseg+~L1+42|(fp),rr2 ldl |_stkseg+~L1+42|(fp),rr2
ldl rr6,#L159 ldl rr6,#L160
ldl rr4,rr2 ldl rr4,rr2
callr _printf callr _printf
L155: L156:
ldl rr2,|_stkseg+~L1+32|(fp) ldl rr2,|_stkseg+~L1+32|(fp)
ldl |_stkseg+~L1+42|(fp),rr2 ldl |_stkseg+~L1+42|(fp),rr2
ldl rr4,#_format ldl rr4,#_format
@ -714,10 +716,10 @@ L155:
ldl rr6,|_stkseg+~L1+4|(fp) ldl rr6,|_stkseg+~L1+4|(fp)
call @rr2 call @rr2
test r2 test r2
jpr eq,L160 jpr eq,L161
ldl rr6,#L161 ldl rr6,#L162
jpr L20021 jpr L20027
L160: L161:
ld r2,|_stkseg+~L1+16|(fp) ld r2,|_stkseg+~L1+16|(fp)
ldb rl3,_format(r2) ldb rl3,_format(r2)
subb rh3,rh3 subb rh3,rh3
@ -726,16 +728,16 @@ L160:
ld _kval,r3 ld _kval,r3
ldb rl3,_format(r2) ldb rl3,_format(r2)
cpb rl3,#32 cpb rl3,#32
jpr ult,L10009 jpr ult,L10010
ldb rl3,_format(r2) ldb rl3,_format(r2)
cpb rl3,#126 cpb rl3,#126
jpr ule,L162 jpr ule,L163
L10009: L10010:
ld r2,|_stkseg+~L1+16|(fp) ld r2,|_stkseg+~L1+16|(fp)
ldl rr4,#_format ldl rr4,#_format
add r5,r2 add r5,r2
ldb @rr4,#32 ldb @rr4,#32
L162: L163:
inc |_stkseg+~L1+16|(fp),#1 inc |_stkseg+~L1+16|(fp),#1
inc |_stkseg+~L1+6|(fp),#1 inc |_stkseg+~L1+6|(fp),#1
ldl rr2,|_stkseg+~L1+32|(fp) ldl rr2,|_stkseg+~L1+32|(fp)
@ -745,10 +747,10 @@ L162:
ldl rr6,|_stkseg+~L1+4|(fp) ldl rr6,|_stkseg+~L1+4|(fp)
call @rr2 call @rr2
test r2 test r2
jpr eq,L163 jpr eq,L164
ldl rr6,#L164 ldl rr6,#L165
jpr L20021 jpr L20027
L163: L164:
ld r2,|_stkseg+~L1+16|(fp) ld r2,|_stkseg+~L1+16|(fp)
ldb rl3,_format(r2) ldb rl3,_format(r2)
subb rh3,rh3 subb rh3,rh3
@ -757,51 +759,51 @@ L163:
ld r2,|_stkseg+~L1+16|(fp) ld r2,|_stkseg+~L1+16|(fp)
ldb rl3,_format(r2) ldb rl3,_format(r2)
cpb rl3,#32 cpb rl3,#32
jpr ult,L10010 jpr ult,L10011
ldb rl3,_format(r2) ldb rl3,_format(r2)
cpb rl3,#126 cpb rl3,#126
jpr ule,L165 jpr ule,L166
L10010: L10011:
ld r2,|_stkseg+~L1+16|(fp) ld r2,|_stkseg+~L1+16|(fp)
ldl rr4,#_format ldl rr4,#_format
add r5,r2 add r5,r2
ldb @rr4,#32 ldb @rr4,#32
L165: L166:
inc |_stkseg+~L1+16|(fp),#1 inc |_stkseg+~L1+16|(fp),#1
inc |_stkseg+~L1+6|(fp),#1 inc |_stkseg+~L1+6|(fp),#1
ld r7,_kval ld r7,_kval
callr _zpr callr _zpr
ldl |_stkseg+~L1+42|(fp),rr2 ldl |_stkseg+~L1+42|(fp),rr2
ldl rr6,#L166 ldl rr6,#L167
ldl rr4,rr2 ldl rr4,rr2
callr _printf callr _printf
ld r3,|_stkseg+~L1+16|(fp) ld r3,|_stkseg+~L1+16|(fp)
exts rr2 exts rr2
div rr2,#16 div rr2,#16
test r2 test r2
jpr ne,L152 jpr ne,L153
ldl rr6,#L168 ldl rr6,#L169
ldl rr4,#_format ldl rr4,#_format
callr _printf callr _printf
clr |_stkseg+~L1+16|(fp) clr |_stkseg+~L1+16|(fp)
L152: L153:
ldl rr2,|_stkseg+~L1+24|(fp) ldl rr2,|_stkseg+~L1+24|(fp)
addl rr2,#1 addl rr2,#1
jpr L20012 jpr L20014
L170: L171:
ldl rr6,#L171 ldl rr6,#L172
callr _printf callr _printf
callr _getchar callr _getchar
ldl rr4,#L195 ldl rr4,#L196
ld r6,#4 ld r6,#4
cpir r2,@rr4,r6,eq cpir r2,@rr4,r6,eq
jpr ne,L127 jpr ne,L128
sll r6,#2 sll r6,#2
neg r6 neg r6
ldl rr4,L196+12(r6) ldl rr4,L197+12(r6)
jp @rr4 jp @rr4
L175: L176:
ldl rr6,#L176 ldl rr6,#L177
callr _printf callr _printf
callr _gethex callr _gethex
ldl |_stkseg+~L1+28|(fp),rr2 ldl |_stkseg+~L1+28|(fp),rr2
@ -810,28 +812,28 @@ L175:
ld r7,rr4(r3) ld r7,rr4(r3)
callr _zpr callr _zpr
ldl |_stkseg+~L1+42|(fp),rr2 ldl |_stkseg+~L1+42|(fp),rr2
ldl rr6,#L177 ldl rr6,#L178
ldl rr4,rr2 ldl rr4,rr2
callr _printf callr _printf
callr _gethex callr _gethex
ld |_stkseg+~L1+14|(fp),r3 ld |_stkseg+~L1+14|(fp),r3
ldl rr6,#L178 ldl rr6,#L179
callr _printf callr _printf
callr _getchar callr _getchar
cp r2,#89 cp r2,#89
jpr eq,L182 jpr eq,L183
cp r2,#121 cp r2,#121
jpr ne,L127 jpr ne,L128
L182: L183:
ldl rr2,|_stkseg+~L1+28|(fp) ldl rr2,|_stkseg+~L1+28|(fp)
slal rr2,#1 slal rr2,#1
ldl rr4,|_stkseg+~L1|(fp) ldl rr4,|_stkseg+~L1|(fp)
add r5,r3 add r5,r3
ld r2,|_stkseg+~L1+14|(fp) ld r2,|_stkseg+~L1+14|(fp)
ld @rr4,r2 ld @rr4,r2
jpr L127 jpr L128
L184: L185:
ldl rr6,#L185 ldl rr6,#L186
callr _printf callr _printf
callr _gethex callr _gethex
ldl rr4,rr2 ldl rr4,rr2
@ -841,19 +843,19 @@ L184:
ld r7,@rr2 ld r7,@rr2
callr _zpr callr _zpr
ldl |_stkseg+~L1+42|(fp),rr2 ldl |_stkseg+~L1+42|(fp),rr2
ldl rr6,#L186 ldl rr6,#L187
ldl rr4,rr2 ldl rr4,rr2
callr _printf callr _printf
callr _gethex callr _gethex
ld |_stkseg+~L1+14|(fp),r3 ld |_stkseg+~L1+14|(fp),r3
ldl rr6,#L187 ldl rr6,#L188
callr _printf callr _printf
callr _getchar callr _getchar
cp r2,#89 cp r2,#89
jpr eq,L191 jpr eq,L192
cp r2,#121 cp r2,#121
jpr ne,L127 jpr ne,L128
L191: L192:
ldl rr4,#_stkseg+~L1+36 ldl rr4,#_stkseg+~L1+36
add r5,fp add r5,fp
ldb rl6,|_stkseg+~L1+8|(fp) ldb rl6,|_stkseg+~L1+8|(fp)
@ -876,96 +878,96 @@ L191:
ldb rh5,#0 ldb rh5,#0
callr _skbyte callr _skbyte
test r2 test r2
jpr ne,L198a jpr ne,L10012
ldl rr6,|_stkseg+~L1+8|(fp) ldl rr6,|_stkseg+~L1+8|(fp)
inc r7,#1 inc r7,#1
ldb rl5,|_stkseg+~L1+14|(fp) ldb rl5,|_stkseg+~L1+14|(fp)
ldb rh5,#0 ldb rh5,#0
callr _skbyte callr _skbyte
test r2 test r2
jpr eq,L138 jpr eq,L139
L198a: L10012:
ldl rr6,#L193 ldl rr6,#L194
jpr L20021 jpr L20027
L198: L199:
ldl rr6,#L199 ldl rr6,#L200
callr _printf callr _printf
subl rr2,rr2 subl rr2,rr2
L20013: L20015:
ldl |_stkseg+~L1+24|(fp),rr2 ldl |_stkseg+~L1+24|(fp),rr2
cpl rr2,#16 cpl rr2,#16
jpr ult,L20015 jpr ult,L20017
ldl rr2,|_stkseg+~L1|(fp) ldl rr2,|_stkseg+~L1|(fp)
ld r7,rr2(#34) ld r7,rr2(#34)
callr _zpr callr _zpr
ldl |_stkseg+~L1+42|(fp),rr2 ldl |_stkseg+~L1+42|(fp),rr2
ldl rr6,#L205
ldl rr4,rr2
callr _printf
ldl rr2,|_stkseg+~L1|(fp)
ld r7,rr2(#36)
callr _zpr
ldl |_stkseg+~L1+42|(fp),rr2
ldl rr6,#L206 ldl rr6,#L206
ldl rr4,rr2 ldl rr4,rr2
callr _printf callr _printf
ldl rr2,|_stkseg+~L1|(fp) ldl rr2,|_stkseg+~L1|(fp)
ld r7,rr2(#38) ld r7,rr2(#36)
callr _zpr callr _zpr
ldl |_stkseg+~L1+42|(fp),rr2 ldl |_stkseg+~L1+42|(fp),rr2
ldl rr6,#L207 ldl rr6,#L207
ldl rr4,rr2 ldl rr4,rr2
jpr L20021 callr _printf
L20015: ldl rr2,|_stkseg+~L1|(fp)
ld r7,rr2(#38)
callr _zpr
ldl |_stkseg+~L1+42|(fp),rr2
ldl rr6,#L208
ldl rr4,rr2
jpr L20027
L20017:
ldl rr2,|_stkseg+~L1+24|(fp) ldl rr2,|_stkseg+~L1+24|(fp)
ldk r2,#0 ldk r2,#0
and r3,#7 and r3,#7
testl rr2 testl rr2
jpr ne,L203 jpr ne,L204
ldk r7,#10 ldk r7,#10
callr _putchar callr _putchar
L203: L204:
ldl rr2,|_stkseg+~L1+24|(fp) ldl rr2,|_stkseg+~L1+24|(fp)
slal rr2,#1 slal rr2,#1
ldl rr4,|_stkseg+~L1|(fp) ldl rr4,|_stkseg+~L1|(fp)
ld r7,rr4(r3) ld r7,rr4(r3)
callr _zpr callr _zpr
ldl |_stkseg+~L1+42|(fp),rr2 ldl |_stkseg+~L1+42|(fp),rr2
ldl rr6,#L204 ldl rr6,#L205
ldl rr4,|_stkseg+~L1+24|(fp) ldl rr4,|_stkseg+~L1+24|(fp)
callr _printf callr _printf
ldl rr2,|_stkseg+~L1+24|(fp) ldl rr2,|_stkseg+~L1+24|(fp)
addl rr2,#1 addl rr2,#1
jpr L20013 jpr L20015
L209: L210:
ldl rr6,#L210 ldl rr6,#L211
callr _printf callr _printf
ldl rr2,|_stkseg+~L1|(fp) ldl rr2,|_stkseg+~L1|(fp)
add r3,#34 add r3,#34
set @rr2,#0 set @rr2,#0
jpr L20018 jpr L20020
L213: L214:
ldl rr6,#L214
callr _printf
ldl rr6,#L215 ldl rr6,#L215
callr _printf callr _printf
ldl rr6,#L216
callr _printf
callr _getchar callr _getchar
cp r2,#89 cp r2,#89
jpr eq,L219 jpr eq,L220
cp r2,#121 cp r2,#121
jpr ne,L127 jpr ne,L128
L219: L220:
ldl rr6,|_stkseg+~L1|(fp) ldl rr6,|_stkseg+~L1|(fp)
callr _dump callr _dump
jpr L127 jpr L128
L222: L223:
ldl rr6,#L223 ldl rr6,#L224
jpr L20019 jpr L20021
L225: L226:
ldl rr6,#L226 ldl rr6,#L227
L20019: L20021:
callr _printf callr _printf
L20018: L20020:
ld r7,|_stkseg+~L1+12|(fp) ld r7,|_stkseg+~L1+12|(fp)
callr _rvi callr _rvi
ldk r2,#1 ldk r2,#1