File: scan_to_sa.c

package info (click to toggle)
libowfat 0.22-1
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 3,148 kB
  • ctags: 976
  • sloc: ansic: 10,424; makefile: 42
file content (13 lines) | stat: -rw-r--r-- 352 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
 
#include "str.h"
#include "stralloc.h"
#include "textcode.h"

unsigned long scan_to_sa(unsigned long (*func)(const char*,char*,unsigned long*),
			 const char* src,stralloc* sa) {
  unsigned long scanned;
  unsigned long r;
  if (!stralloc_readyplus(sa,str_len(src))) return 0;
  if ((r=func(src,sa->s+sa->len,&scanned)))
    sa->len+=r;
  return r;
}