skalibs

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

genqdyn_unpush.c (237B)

      1 /* ISC license. */
      2 
      3 #include <errno.h>
      4 #include <skalibs/stralloc.h>
      5 #include <skalibs/genqdyn.h>
      6 
      7 int genqdyn_unpush (genqdyn *g)
      8 {
      9   if (g->queue.len < g->esize) return (errno = EINVAL, 0) ;
     10   g->queue.len -= g->esize ;
     11   return 1 ;
     12 }