taro-ls: slightly increase efficiency of message processing and blank list when changing mailbox or searching
This commit is contained in:
parent
df6e8dd49b
commit
e85b36fcdf
1 changed files with 9 additions and 4 deletions
13
taro-ls.tal
13
taro-ls.tal
|
@ -133,10 +133,11 @@ BRK
|
||||||
BRK
|
BRK
|
||||||
|
|
||||||
&must_decode
|
&must_decode
|
||||||
|
.decoding/counting LDZ #00 EQU ,&decode_data JCN
|
||||||
.decoding/counting LDZ #01 EQU ,&count_1 JCN
|
.decoding/counting LDZ #01 EQU ,&count_1 JCN
|
||||||
.decoding/counting LDZ #02 EQU ,&count_2 JCN
|
,&count_2 JMP
|
||||||
|
|
||||||
( decode data )
|
&decode_data
|
||||||
.Console/read DEI
|
.Console/read DEI
|
||||||
.decoding/msg_type LDZ
|
.decoding/msg_type LDZ
|
||||||
DUP MBOX_LIST NEQ ,&no_mbox_list JCN
|
DUP MBOX_LIST NEQ ,&no_mbox_list JCN
|
||||||
|
@ -223,6 +224,8 @@ JMP2r
|
||||||
#0000 .list/select_index STZ2
|
#0000 .list/select_index STZ2
|
||||||
#0001 .list/select_len STZ2
|
#0001 .list/select_len STZ2
|
||||||
#0000 .list/top STZ2
|
#0000 .list/top STZ2
|
||||||
|
#0000 .list/len STZ2
|
||||||
|
#0000 .list/bytes STZ2
|
||||||
|
|
||||||
.list update_sb_pos
|
.list update_sb_pos
|
||||||
|
|
||||||
|
@ -252,7 +255,9 @@ JMP2r
|
||||||
#0000 .list/select_index STZ2
|
#0000 .list/select_index STZ2
|
||||||
#0001 .list/select_len STZ2
|
#0001 .list/select_len STZ2
|
||||||
#0000 .list/top STZ2
|
#0000 .list/top STZ2
|
||||||
|
#0000 .list/len STZ2
|
||||||
|
#0000 .list/bytes STZ2
|
||||||
|
|
||||||
.list update_sb_pos
|
.list update_sb_pos
|
||||||
|
|
||||||
pending_ops++
|
pending_ops++
|
||||||
|
@ -1308,7 +1313,7 @@ JMP2r
|
||||||
]
|
]
|
||||||
|
|
||||||
@metadata [ 00 "taro 0a
|
@metadata [ 00 "taro 0a
|
||||||
"v0.2.2 0a
|
"v0.2.3 0a
|
||||||
"GUI 20 "for 20 "mblaze 0a
|
"GUI 20 "for 20 "mblaze 0a
|
||||||
"Derek 20 "Stevens 20 "<nilix@nilfm.cc> 0a 00
|
"Derek 20 "Stevens 20 "<nilix@nilfm.cc> 0a 00
|
||||||
]
|
]
|
||||||
|
|
Loading…
Reference in a new issue