Mercurial > hg > Members > kono > nitros9-code

comparison lib/kreiderclib/bsearch.as @ 2824:1647f1874cdf lwtools-port

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added Kreidier C library
author Boisy Pitre <boisy.pitre@nuance.com>
date Thu, 23 May 2013 05:49:13 -0500
parents
children
comparison
equal deleted inserted replaced
2823:ad769d2a03e4 2824:1647f1874cdf
1 * Disassembly by Os9disasm of bsearch.r
2
3 section code
4
5 bsearch: pshs d,x,y,u
6 ldu 10,s
7 clra
8 clrb
9 L0006 addd #1
10 std 2,s
11 ldd 14,s
12 L000d subd 2,s
13 bmi L003d
14 ldd 14,s
15 addd 2,s
16 lsra
17 rorb
18 std 4,s
19 addd #-1
20 pshs d
21 ldd 18,s
22 lbsr ccmult
23 addd 12,s
24 std ,s
25 pshs u
26 jsr [20,s]
27 std ,s++
28 beq L0041
29 asla
30 ldd 4,s
31 bcc L0006
32 addd #-1
33 std 14,s
34 bra L000d
35 L003d clra
36 clrb
37 bra L0043
38 L0041 ldd ,s
39 L0043 leas 6,s
40 puls u,pc
41
42 endsect
43