diff options
| author | Clint Adams <clint@users.sourceforge.net> | 2001-07-04 15:13:33 +0000 |
|---|---|---|
| committer | Clint Adams <clint@users.sourceforge.net> | 2001-07-04 15:13:33 +0000 |
| commit | b65dcc197bf5e44071f9391a2b45224d2935d571 (patch) | |
| tree | 9a72575b645bb07f54be32be90b6918035d5a316 /Src | |
| parent | b79484dc40535d7c0f653a6cfb913668c5df609c (diff) | |
| download | zsh-b65dcc197bf5e44071f9391a2b45224d2935d571.tar.gz zsh-b65dcc197bf5e44071f9391a2b45224d2935d571.tar.xz zsh-b65dcc197bf5e44071f9391a2b45224d2935d571.zip | |
15242: pcre_match -a and $match instead of pparams
Diffstat (limited to 'Src')
| -rw-r--r-- | Src/Modules/pcre.c | 21 |
1 files changed, 16 insertions, 5 deletions
diff --git a/Src/Modules/pcre.c b/Src/Modules/pcre.c index 899056c6f..334522130 100644 --- a/Src/Modules/pcre.c +++ b/Src/Modules/pcre.c @@ -90,7 +90,15 @@ static int bin_pcre_match(char *nam, char **args, char *ops, int func) { int ret, capcount, *ovec, ovecsize; - char **captures; + char **captures, **matches, *receptacle = NULL; + + if(ops['a']) { + receptacle = *args++; + if(!*args) { + zwarnnam(nam, "not enough arguments", NULL, 0); + return 1; + } + } if (pcre_fullinfo(pcre_pattern, pcre_hints, PCRE_INFO_CAPTURECOUNT, &capcount)) { @@ -107,9 +115,12 @@ bin_pcre_match(char *nam, char **args, char *ops, int func) else if (ret==PCRE_ERROR_NOMATCH) return 1; /* no match */ else if (ret>0) { if(!pcre_get_substring_list(*args, ovec, ret, (const char ***)&captures)) { - - freearray(pparams); - pparams = zarrdup(&captures[1]); /* first one would be entire string */ + + matches = zarrdup(&captures[1]); /* first one would be entire string */ + if (receptacle == NULL) + setaparam("match", matches); + else + setaparam(receptacle, matches); pcre_free_substring_list((const char **)captures); return 0; @@ -128,7 +139,7 @@ static struct builtin bintab[] = { #ifdef HAVE_PCRE_STUDY BUILTIN("pcre_study", 0, bin_pcre_study, 0, 0, 0, NULL, NULL), #endif - BUILTIN("pcre_match", 0, bin_pcre_match, 1, 1, 0, NULL, NULL) + BUILTIN("pcre_match", 0, bin_pcre_match, 1, 2, 0, "a", NULL) }; /**/ |