Mirror of :pserver:cvs@cvs.fefe.de:/cvs libowfat https://www.fefe.de/libowfat/
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 

21 lines
433 B

#include "byte.h"
#include "stralloc.h"
#include "buffer.h"
#include <errno.h>
int buffer_get_token_sa_pred(buffer* b,stralloc* sa,sa_predicate p) {
for (;;) {
char x;
if (!stralloc_readyplus(sa,1)) return -1;
switch (buffer_getc(b,&x)) {
case -1: return -1;
case 0: return 0;
}
stralloc_append(sa,&x);
switch (p(sa)) {
case -1: return -1;
case 0: break;
case 1: return 0;
}
}
}