zwgc/character_class.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

#include "character_class.h"

static character_class cache;

character_class *string_to_character_class(str)
     string str;
{
    int i;

    bzero(cache, sizeof(cache));

    for (i=0; i<strlen(str); i++)
      cache[str[i]] = 1;

    return(&cache);
}