The R Project SVN R

Rev

Rev 54706 | Rev 75562 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 54706 Rev 56370
Line 46... Line 46...
46 
 
 46 
 
47 
#include "tre-internal.h"
 47 
#include "tre-internal.h"
48 
#include "tre.h"
 48 
#include "tre.h"
49 
#include "xmalloc.h"
 49 
#include "xmalloc.h"
50 
 
 50 
 
51 
/* fake definition */
 - 
 
52 
extern void Rf_error(const char *str);
 - 
 
53 
#define assert(a) R_assert(a)
 51 
#define assert(a) R_assert(a)
54 
 
 52 
 
55 
static void assert(int expr)
 - 
 
56 
{
 - 
 
57 
    if(expr == 0)
 - 
 
58 
	Rf_error("internal error in executing regexp");
 - 
 
59 
}
 - 
 
60 
 
 - 
 
61 
/* Fills the POSIX.2 regmatch_t array according to the TNFA tag and match
 53 
/* Fills the POSIX.2 regmatch_t array according to the TNFA tag and match
62 
   endpoint values. */
 54 
   endpoint values. */
63 
void
 55 
void
64 
tre_fill_pmatch(size_t nmatch, regmatch_t pmatch[], int cflags,
 56 
tre_fill_pmatch(size_t nmatch, regmatch_t pmatch[], int cflags,
65 
		const tre_tnfa_t *tnfa, int *tags, int match_eo)
 57 
		const tre_tnfa_t *tnfa, int *tags, int match_eo)