Mercurial > hg > Members > kono > nitros9-code
view lib/alib/is_digit.a @ 2765:0bd16cca86b7
Updated rules.mak for all the os9 format's to format the entire disk. People were having some issues with the disk images not being formatted to their full capacity and preventing some functions from working.
author | drencor-xeen |
---|---|
date | Thu, 17 Jan 2013 11:03:26 -0600 |
parents | 7d70b7e1cb21 |
children | aaba193af04f |
line wrap: on
line source
***************************************** * See if character in "B" is a digit 0..9 * OTHER MODULES NEEDED: none * ENTRY: B=character to test * EXIT: CC zero=1 if digit, 0 if not nam Is Char a Digit? ttl Assembler Library Module psect IS_DIGIT,0,0,0,0,0 IS_DIGIT: cmpb #'0 blo no not digit, zero cleared cmpb #'9 if equal, zero set bhi no not digit, zero cleared orcc #%00000100 set zero no rts endsect