1 /* ISC license. */
2 
3 #include <string.h>
4 #include <skalibs/bufalloc.h>
5 
bufalloc_clean(bufalloc * ba)6 void bufalloc_clean (bufalloc *ba)
7 {
8   if (ba->p)
9   {
10     memmove(ba->x.s, ba->x.s + ba->p, ba->x.len - ba->p) ;
11     ba->x.len -= ba->p ;
12     ba->p = 0 ;
13   }
14 }
15