tain_scan.c (238B)
1 /* ISC license. */ 2 3 #include <skalibs/fmtscan.h> 4 #include <skalibs/tai.h> 5 6 size_t tain_scan (char const *s, tain *a) 7 { 8 char pack[TAIN_PACK] ; 9 size_t r = ucharn_scan(s, pack, TAIN_PACK) ; 10 if (r) tain_unpack(pack, a) ; 11 return r ; 12 }