diff options
| author | Jim Cromie <jcromie@cpan.org> | 2005-07-06 08:19:53 -0600 |
|---|---|---|
| committer | Steve Hay <SteveHay@planit.com> | 2005-07-08 16:35:10 +0000 |
| commit | a02a5408b2f199007c4dcb74559cc79066307ada (patch) | |
| tree | b5456b7513dec78b81e08371fbd59138e2edfe72 /ext/File | |
| parent | bdf3085f9fca00a6148ef3f26060d442844b64bd (diff) | |
| download | perl-a02a5408b2f199007c4dcb74559cc79066307ada.tar.gz | |
Re: janitorial work ? [patch]
Message-ID: <42CC3CE9.5050606@divsol.com>
(reverted all dual-lived modules since they must work with older
perls too so must wait for a new Devel::PPPort)
p4raw-id: //depot/perl@25101
Diffstat (limited to 'ext/File')
| -rw-r--r-- | ext/File/Glob/bsd_glob.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/ext/File/Glob/bsd_glob.c b/ext/File/Glob/bsd_glob.c index 31d3aa45ac..78a8c647ec 100644 --- a/ext/File/Glob/bsd_glob.c +++ b/ext/File/Glob/bsd_glob.c @@ -332,7 +332,7 @@ bsd_glob(const char *pattern, int flags, /* We operate on a copy of the pattern */ len = strlen(pattern); - New(0, new_pat, len + 1, char); + Newx(new_pat, len + 1, char); if (new_pat == NULL) return (GLOB_NOSPACE); @@ -1009,7 +1009,7 @@ globextend(const Char *path, glob_t *pglob, size_t *limitp) if (pglob->gl_pathv) pathv = Renew(pglob->gl_pathv,newsize,char*); else - New(0,pathv,newsize,char*); + Newx(pathv,newsize,char*); if (pathv == NULL) { if (pglob->gl_pathv) { Safefree(pglob->gl_pathv); @@ -1030,7 +1030,7 @@ globextend(const Char *path, glob_t *pglob, size_t *limitp) ; len = (STRLEN)(p - path); *limitp += len; - New(0, copy, p-path, char); + Newx(copy, p-path, char); if (copy != NULL) { if (g_Ctoc(path, copy, len)) { Safefree(copy); |