summaryrefslogtreecommitdiff
path: root/stralloc_arts.c
blob: 1ccb5a4a569de0a147132ae5b18790e0f7157fe5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
#include "byte.h"
#include "str.h"
#include "stralloc.h"

int stralloc_starts(sa,s)
stralloc *sa;
char *s;
{
  int len;
  len = str_len(s);
  return (sa->len >= len) && byte_equal(s,len,sa->s);
}