|
|
1.1 ! root 1: /****************************************************************************/ ! 2: /* Converts an ASCII Hex string into an unsigned long */ ! 3: /****************************************************************************/ ! 4: unsigned long ahtoul(char *str) ! 5: { ! 6: unsigned long l,val=0; ! 7: ! 8: while((l=(*str++)|0x20)!=0x20) ! 9: val=(l&0xf)+(l>>6&1)*9+val*16; ! 10: return(val); ! 11: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.