1 /* ISC license. */
2 
3 #include <skalibs/functypes.h>
4 #include <skalibs/gensetdyn.h>
5 
freeiter(char * s,void * aux)6 static int freeiter (char *s, void *aux)
7 {
8   freefunc_t_ref f = aux ;
9   (*f)((void *)s) ;
10   return 1 ;
11 }
12 
gensetdyn_deepfree(gensetdyn * g,freefunc_t_ref f)13 void gensetdyn_deepfree (gensetdyn *g, freefunc_t_ref f)
14 {
15   gensetdyn_iter(g, &freeiter, f) ;
16   gensetdyn_free(g) ;
17 }
18