Function regex_compile

v2/engine/subst.c:21–37

regexp * regex_compile( OBJECT * pattern )
{
    int found;
    regex_entry * e ;

    if ( !regex_hash )
        regex_hash = hashinit( sizeof( regex_entry ), "regex" );

    e = (regex_entry *)hash_insert( regex_hash, pattern, &found );
    if ( !found )
    {
        e->pattern = object_copy( pattern );
        e->regex = regcomp( (char *)pattern );
    }

    return e->regex;
}


LIST * builtin_subst( FRAME * frame, int flags )