diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2005-05-16 20:59:35 +0300 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-05-17 15:15:46 +0000 |
| commit | abb2c24232c1dbd60ae39bdbb7e3cf487e3da996 (patch) | |
| tree | c7620e2c468757b1cc254d2c7137e924d9337c01 /universal.c | |
| parent | 2e7ed132d3ea6a9040a623e3541f25dd0709096b (diff) | |
| download | perl-abb2c24232c1dbd60ae39bdbb7e3cf487e3da996.tar.gz | |
perl 5.9.x (@ 24471): Symbian update
Message-ID: <B356D8F434D20B40A8CEDAEC305A1F2453D793@esebe105.NOE.Nokia.com>
completed by:
Message-ID: <B356D8F434D20B40A8CEDAEC305A1F2453D7A0@esebe105.NOE.Nokia.com>
p4raw-id: //depot/perl@24492
Diffstat (limited to 'universal.c')
| -rw-r--r-- | universal.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/universal.c b/universal.c index fd96ce73c9..9383905fdf 100644 --- a/universal.c +++ b/universal.c @@ -416,7 +416,7 @@ XS(XS_version_stringify) Perl_croak(aTHX_ "Usage: version::stringify(lobj, ...)"); SP -= items; { - SV * lobj; + SV * lobj = Nullsv; if (sv_derived_from(ST(0), "version")) { SV *tmp = SvRV(ST(0)); @@ -439,7 +439,7 @@ XS(XS_version_numify) Perl_croak(aTHX_ "Usage: version::numify(lobj, ...)"); SP -= items; { - SV * lobj; + SV * lobj = Nullsv; if (sv_derived_from(ST(0), "version")) { SV *tmp = SvRV(ST(0)); @@ -462,7 +462,7 @@ XS(XS_version_vcmp) Perl_croak(aTHX_ "Usage: version::vcmp(lobj, ...)"); SP -= items; { - SV * lobj; + SV * lobj = Nullsv; if (sv_derived_from(ST(0), "version")) { SV *tmp = SvRV(ST(0)); @@ -507,7 +507,7 @@ XS(XS_version_boolean) Perl_croak(aTHX_ "Usage: version::boolean(lobj, ...)"); SP -= items; { - SV * lobj; + SV * lobj = Nullsv; if (sv_derived_from(ST(0), "version")) { /* XXX If tmp serves a purpose, explain it. */ @@ -534,7 +534,7 @@ XS(XS_version_noop) if (items < 1) Perl_croak(aTHX_ "Usage: version::noop(lobj, ...)"); { - SV * lobj; + SV * lobj = Nullsv; if (sv_derived_from(ST(0), "version")) { SV *tmp = SvRV(ST(0)); @@ -558,7 +558,7 @@ XS(XS_version_is_alpha) Perl_croak(aTHX_ "Usage: version::is_alpha(lobj)"); SP -= items; { - SV *lobj; + SV * lobj = Nullsv; if (sv_derived_from(ST(0), "version")) { /* XXX If tmp serves a purpose, explain it. */ |