Mercurial > hg > Members > kono > nitros9-code

annotate lib/alib/strlen.a @ 2738:d25fd78e727a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Updated rules.mak to correct for non booting dw3 and becker disk images.
author drencor-xeen
date Thu, 03 Jan 2013 22:47:46 -0600
parents 7d70b7e1cb21
children aaba193af04f
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2474
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
1 **********************************
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
2
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
3 * String Length: find length of null terminated string.
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
4 * note:null NOT included in count.
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
5
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
6 * ENTRY: X=start of string
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
7
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
8 * EXIT: D=length
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
9 * all other regs (except cc) preserved
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
10
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
11 nam Find String Length
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
12 ttl Assembler Library Module
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
13
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
14
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
15 psect STRLEN,0,0,0,0,0
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
16
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
17 STRLEN:
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
18 pshs x
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
19 ldd #-1 comp for inital inc
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
20
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
21 loop
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
22 addd #1 bump count
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
23 tst ,x+ end?
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
24 bne loop
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
25
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
26 puls x,pc
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
27
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
28 endsect
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
29
7d70b7e1cb21 Moved net and alib files into here
boisy
parents:
diff changeset
30