summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xChangeLog6
-rwxr-xr-xsrc/tre/ltre.c18
2 files changed, 15 insertions, 9 deletions
diff --git a/ChangeLog b/ChangeLog
index 50c0be7..0ed8596 100755
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2009-11-29 Shmuel Zeigerman <shmuz@013net.net>
+
+ * ltre.c: changes to adapt to TRE 0.8
+ 1) #include <tre/tre.h> (was: <tre/regex.h>).
+ 2) added tre_ prefix to all TRE functions.
+
2009-11-08 Shmuel Zeigerman <shmuz@013net.net>
* lpcre_f.c: added flags up to PCRE version 8.00.
diff --git a/src/tre/ltre.c b/src/tre/ltre.c
index d2acce7..d5532bd 100755
--- a/src/tre/ltre.c
+++ b/src/tre/ltre.c
@@ -8,7 +8,7 @@
#include "lauxlib.h"
#include "../common.h"
-#include <tre/regex.h>
+#include <tre/tre.h>
/* These 2 settings may be redefined from the command-line or the makefile.
* They should be kept in sync between themselves and with the target name.
@@ -89,7 +89,7 @@ static void checkarg_atfind (lua_State *L, TArgExec *argE, TPosix **ud,
static int generate_error (lua_State *L, const TPosix *ud, int errcode) {
char errbuf[80];
- regerror (errcode, &ud->r, errbuf, sizeof (errbuf));
+ tre_regerror (errcode, &ud->r, errbuf, sizeof (errbuf));
return luaL_error (L, "%s", errbuf);
}
@@ -100,7 +100,7 @@ static int compile_regex (lua_State *L, const TArgComp *argC, TPosix **pud) {
ud = (TPosix *)lua_newuserdata (L, sizeof (TPosix));
memset (ud, 0, sizeof (TPosix)); /* initialize all members to 0 */
- res = regncomp (&ud->r, argC->pattern, argC->patlen, argC->cflags);
+ res = tre_regncomp (&ud->r, argC->pattern, argC->patlen, argC->cflags);
if (res != 0)
return generate_error (L, ud, res);
@@ -130,7 +130,7 @@ static int generic_atfind (lua_State *L, int tfind) {
res_match.pmatch = ud->match;
/* execute the search */
- res = reganexec (&ud->r, argE.text, argE.textlen - argE.startoffset,
+ res = tre_reganexec (&ud->r, argE.text, argE.textlen - argE.startoffset,
&res_match, argP, argE.eflags);
if (ALG_ISMATCH (res)) {
ALG_PUSHOFFSETS (L, ud, argE.startoffset, 0);
@@ -163,7 +163,7 @@ static int gmatch_exec (TUserdata *ud, TArgExec *argE) {
if (argE->startoffset > 0)
argE->eflags |= REG_NOTBOL;
argE->text += argE->startoffset;
- return regnexec (&ud->r, argE->text, argE->textlen - argE->startoffset,
+ return tre_regnexec (&ud->r, argE->text, argE->textlen - argE->startoffset,
ALG_NSUB(ud) + 1, ud->match, argE->eflags);
}
@@ -173,21 +173,21 @@ static void gmatch_pushsubject (lua_State *L, TArgExec *argE) {
static int findmatch_exec (TPosix *ud, TArgExec *argE) {
argE->text += argE->startoffset;
- return regnexec (&ud->r, argE->text, argE->textlen - argE->startoffset,
+ return tre_regnexec (&ud->r, argE->text, argE->textlen - argE->startoffset,
ALG_NSUB(ud) + 1, ud->match, argE->eflags);
}
static int gsub_exec (TPosix *ud, TArgExec *argE, int st) {
if (st > 0)
argE->eflags |= REG_NOTBOL;
- return regnexec (&ud->r, argE->text+st, argE->textlen-st, ALG_NSUB(ud)+1,
+ return tre_regnexec (&ud->r, argE->text+st, argE->textlen-st, ALG_NSUB(ud)+1,
ud->match, argE->eflags);
}
static int split_exec (TPosix *ud, TArgExec *argE, int offset) {
if (offset > 0)
argE->eflags |= REG_NOTBOL;
- return regnexec (&ud->r, argE->text + offset, argE->textlen - offset,
+ return tre_regnexec (&ud->r, argE->text + offset, argE->textlen - offset,
ALG_NSUB(ud) + 1, ud->match, argE->eflags);
}
@@ -207,7 +207,7 @@ static int Ltre_gc (lua_State *L) {
TPosix *ud = check_ud (L);
if (ud->freed == 0) { /* precaution against "manual" __gc calling */
ud->freed = 1;
- regfree (&ud->r);
+ tre_regfree (&ud->r);
if (ud->match)
free (ud->match);
}