diff options
| author | Andy Lester <andy@petdance.com> | 2005-12-22 04:57:17 -0600 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-12-22 17:09:59 +0000 |
| commit | c445ea15829fa1ef23c4453a817f9c096a56a192 (patch) | |
| tree | b82a090e6005af218bbc846b84e47ce12b81d39e /universal.c | |
| parent | efa32bb49fad39e670c055d4b6f557a0d2e1a8a2 (diff) | |
| download | perl-c445ea15829fa1ef23c4453a817f9c096a56a192.tar.gz | |
Ho! Ho! Ho! Santa brings consting!
Message-ID: <20051222165717.GA2874@petdance.com>
p4raw-id: //depot/perl@26450
Diffstat (limited to 'universal.c')
| -rw-r--r-- | universal.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/universal.c b/universal.c index 784fe5378a..097cc64e07 100644 --- a/universal.c +++ b/universal.c @@ -39,7 +39,7 @@ S_isa_lookup(pTHX_ HV *stash, const char *name, HV* name_stash, GV* gv; GV** gvp; HV* hv = NULL; - SV* subgen = Nullsv; + SV* subgen = NULL; const char *hvname; /* A stash/class can go by many names (ie. User == main::User), so @@ -140,7 +140,7 @@ for class names as well as for objects. bool Perl_sv_derived_from(pTHX_ SV *sv, const char *name) { - const char *type = Nullch; + const char *type = NULL; HV *stash = NULL; HV *name_stash; @@ -341,7 +341,7 @@ XS(XS_UNIVERSAL_VERSION) sv = nsv; if ( !sv_derived_from(sv, "version")) upg_version(sv); - undef = Nullch; + undef = NULL; } else { sv = (SV*)&PL_sv_undef; |