view lib/alib/is_termin.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
line wrap: on
line source

*****************************************

* See if character in "B" is a valid string terminator.

* NOTE: This module is used by HEX_BIN, DEC_BIN, etc. It permits
*       SPACE, CR, COMMA and NULL to be used as a delimiter -- useful
*       for paramater and list processing....

* OTHER MODULES NEEDED: none

* ENTRY: B=character to test

* EXIT: CC zero=1 if space, 0 if not


 nam Is Char a Terminator?
 ttl Assembler Library Module


 psect IS_TERMIN,0,0,0,0,0


IS_TERMIN:
 tstb null?
 beq exit
 cmpb #$20 space
 beq exit
 cmpb #$0d carriage return
 beq exit
 cmpb #', comma?

exit
 rts

 endsect