skalibs

Mirror/fork of https://skarnet.org/software/skalibs/
git clone https://ccx.te2000.cz/git/skalibs
Log | Files | Refs | README | LICENSE

genqdyn_clean.c (221B)

      1 /* ISC license. */
      2 
      3 #include <string.h>
      4 #include "genqdyn-internal.h"
      5 
      6 void genqdyn_clean (genqdyn *g)
      7 {
      8   memmove(g->queue.s, g->queue.s + g->head, g->queue.len - g->head) ;
      9   g->queue.len -= g->head ;
     10   g->head = 0 ;
     11 }