[<<][staapl][>>][..]
Sun Jul 20 23:57:14 EDT 2014

midi-size

This doesn't seem right:


racket@synth-sim.rkt> (call-word target/midi-size)
	08ED 11DA  6EEC       movwf    ec 0
	08EE 11DC  5038       movf     38 0 0
	08EF 11DE  80D8       bsfi     0 d8 0 0
	08F1 11E2  0012       return   0
racket@synth-sim.rkt> (wreg)
15
racket@synth-sim.rkt> (dump)
000  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
010  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
020  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  90
030  41 7F .  .  .  .  .  .  0F 0A .  .  .  .  .  . 
040  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
050  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
060  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
070  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
080  .  00 00 00 07 7F .  .  .  .  .  .  .  .  .  . 
090  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
0A0  .  00 00 .  .  .  .  .  .  .  .  .  .  .  .  . 
0B0  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
0C0  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
0D0  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
0E0  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
0F0  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
100  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
110  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .
120  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
130  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
140  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
150  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
160  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
170  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
180  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
190  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
1A0  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
1B0  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
1C0  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
1D0  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
1E0  90 40 7F 41 7F 90 40 7F 41 7F 90 40 7F 41 7F . 
1F0  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
racket@synth-sim.rkt> 



midi-size:
	08ED 11DA  6EEC       movwf    PREINC0 0
	08EE 11DC  5038       movf     midi-write 0 0
	08EF 11DE  80D8       bsfi     0 STATUS 0 0
	08F0 11E0  5439       subfwb   midi-read 0 0
	08F1 11E2  0012       return   0

: midi-size   midi-write @ midi-read @ - ;


sim problem
bsf is not a skip instruction!



[Reply][About]
[<<][staapl][>>][..]