isodigit.asm
bitfixer_bitfixer/dg/z88dk/libsrc/_DEVELOPMENT/ctype/c/sccz80/isodigit.asm

; int isodigit(int c)

SECTION code_clib
SECTION code_ctype

PUBLIC isodigit

EXTERN asm_isodigit, error_zc

isodigit:

   inc h
   dec h
   jp nz, error_zc

   ld a,l
   call asm_isodigit
   
   ld l,h
   ret c
   
   inc l
   ret
