diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1998-05-17 22:37:20 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-05-17 22:37:20 +0000 |
commit | 3c78fafa1650432985234f9821e053d8f64c6224 (patch) | |
tree | 89a1d4674609fc0f94f96d80171f80318435c725 /gv.c | |
parent | a216c6457aac819cebe41e876f67540ee6db1e22 (diff) | |
download | perl-3c78fafa1650432985234f9821e053d8f64c6224.tar.gz |
[win32] sundry whitespace cleanups from maintbranch
p4raw-id: //depot/win32/perl@1008
Diffstat (limited to 'gv.c')
-rw-r--r-- | gv.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -443,11 +443,11 @@ gv_fetchpv(char *nambeg, I32 add, I32 sv_type) len = namend - name; if (len > 0) { + char smallbuf[256]; char *tmpbuf; - char autobuf[64]; - if (len < sizeof(autobuf) - 2) - tmpbuf = autobuf; + if (len + 3 < sizeof smallbuf) + tmpbuf = smallbuf; else New(601, tmpbuf, len+3, char); Copy(name, tmpbuf, len, char); @@ -462,7 +462,7 @@ gv_fetchpv(char *nambeg, I32 add, I32 sv_type) else GvMULTI_on(gv); } - if (tmpbuf != autobuf) + if (tmpbuf != smallbuf) Safefree(tmpbuf); if (!gv || gv == (GV*)&sv_undef) return Nullgv; |