repo.or.cz
/
awish.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
let us start from the start!
[awish.git]
/
asm
/
utils.awa
blob
3d218b914bf3590c483e98a9b07e7b68e05f9b95
1
kill_all_threads:
2
defloc: .cnt = -1
3
psh 290 ; .cnt: more than max
4
.loop:
5
kil [.cnt]
6
sub [.cnt], 1
7
jne .loop, [.cnt], 0
8
drp
9
ret
10
11
12
clear_stack:
13
dpt
14
jle .quit, 1
15
swp
16
pop
17
jmp clear_stack
18
.quit:
19
ret