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

; int iscntrl(int c)

SECTION code_clib
SECTION code_ctype

PUBLIC iscntrl

EXTERN asm_iscntrl, error_znc

iscntrl:

   inc h
   dec h
   jp nz, error_znc

   ld a,l
   call asm_iscntrl
   
   ld l,h
   ret nc
   
   inc l
   ret
