gozer at apache
Mar 12, 2008, 10:25 PM
Post #1 of 1
(352 views)
Permalink
|
|
svn commit: r636631 - /perl/modperl/trunk/src/modules/perl/modperl_interp.c
|
|
Author: gozer
Date: Wed Mar 12 22:25:22 2008
New Revision: 636631
URL: http://svn.apache.org/viewvc?rev=636631&view=rev
Log:
Fix a subtle typo. return; is mostly undefined, try return NULL instead.
Reviewed-By: gozer
Submitted-By: Niko Tyni <ntyni+modperl[at]mappi.helsinki.fi>
Message-ID: <20080312074100.GA6486[at]rebekka>
Modified:
perl/modperl/trunk/src/modules/perl/modperl_interp.c
Modified: perl/modperl/trunk/src/modules/perl/modperl_interp.c
URL: http://svn.apache.org/viewvc/perl/modperl/trunk/src/modules/perl/modperl_interp.c?rev=636631&r1=636630&r2=636631&view=diff
==============================================================================
--- perl/modperl/trunk/src/modules/perl/modperl_interp.c (original)
+++ perl/modperl/trunk/src/modules/perl/modperl_interp.c Wed Mar 12 22:25:22 2008
@@ -581,7 +581,7 @@
modperl_interp_t *interp;
dTHXa(thx);
SV **svp = hv_fetch(PL_modglobal, MP_THX_INTERP_KEY, strlen(MP_THX_INTERP_KEY), 0);
- if (!svp) return;
+ if (!svp) return NULL;
interp = INT2PTR(modperl_interp_t *, SvIV(*svp));
return interp;
}
|
