Mercurial > hg > Members > kono > nitros9-code
annotate lib/alib/to_sp.a @ 2668:07441dfebc27 lwtools-port
Make tocgen build with lwasm
lwasm does not treat a trailing colon as part of the symbol name. Removed
trailing colons on symbol references.
author | William Astle <lost@l-w.ca> |
---|---|
date | Sun, 10 Jun 2012 13:35:44 -0600 |
parents | 7d70b7e1cb21 |
children | aaba193af04f |
rev | line source |
---|---|
2474 | 1 ********************************** |
2 | |
3 * Advance X to 1st space character | |
4 | |
5 * OTHER MODULES NEEDED: none | |
6 | |
7 * ENTRY: X=somewhere in a string | |
8 | |
9 * EXIT: X=1st space character in string | |
10 | |
11 | |
12 nam Advance to space | |
13 ttl Assembler Library Module | |
14 | |
15 psect TO_SP,0,0,0,0,0 | |
16 | |
17 TO_SP: | |
18 pshs b | |
19 spl | |
20 ldb ,x+ | |
21 cmpb #$20 is it space? | |
22 bne spl no, loop | |
23 leax -1,x point to space | |
24 puls b,pc | |
25 | |
26 endsect |