libowfat/stralloc/stralloc_catm_internal.c
2007-10-17 16:23:01 +00:00

23 lines
405 B
C

#include <stdarg.h>
#include "stralloc.h"
int stralloc_catm_internal(stralloc* sa, ...) {
va_list a;
const char* s;
size_t n=0;
va_start(a,sa);
while ((s=va_arg(a,const char*)))
n += strlen(s);
va_end(a);
stralloc_readyplus(sa,n);
va_start(a,sa);
while ((s=va_arg(a,const char*)))
if (stralloc_cats(sa,s)==0) {
va_end(a);
return 0;
}
va_end(a);
return 1;
}