Mercurial > hg > Members > kono > nitros9-code

comparison lib/kreiderclib/findstr.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 findstr.r
2
3 section code
4
5 findstr: pshs y,u
6 bsr L002c
7 bra L0008
8 L0006 bsr L000e
9 L0008 ldb ,x
10 bne L0006
11 bra L0046
12 L000e pshs x,y
13 bsr findastr
14 puls x,y
15 bne L001b
16 leau 1,u
17 leax 1,x
18 rts
19 L001b tfr u,d
20 puls x,y,u,pc
21 findnstr: pshs y,u
22 bsr L002c
23 L0023 bsr L000e
24 cmpu 12,s
25 ble L0023
26 bra L0046
27 L002c ldu 8,s
28 tfr u,d
29 ldx 10,s
30 leax d,x
31 leax -1,x
32 ldy 12,s
33 rts
34 findastr: pshs y,u
35 ldu 6,s
36 ldx 8,s
37 bra L004a
38 L0042 cmpb ,u+
39 beq L004a
40 L0046 clra
41 clrb
42 puls y,u,pc
43 L004a ldb ,x+
44 bne L0042
45 ldd #1
46 puls y,u,pc
47
48 endsect
49