diff options
| author | Andy Lester <andy@petdance.com> | 2005-12-30 17:05:58 -0600 |
|---|---|---|
| committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2006-01-01 10:42:16 +0000 |
| commit | cbbf89328f29f925842d180c1410e324b297744d (patch) | |
| tree | 6f63c59aeb96d4eaafa9b8f1ee25b94fd72730c3 /toke.c | |
| parent | 359842a5ea25b12844b1a94485cc2aa186d8bdbe (diff) | |
| download | perl-cbbf89328f29f925842d180c1410e324b297744d.tar.gz | |
Making 0 pointers to NULLs
Message-ID: <20051231050558.GA29093@petdance.com>
p4raw-id: //depot/perl@26558
Diffstat (limited to 'toke.c')
| -rw-r--r-- | toke.c | 10 |
1 files changed, 5 insertions, 5 deletions
@@ -4116,8 +4116,8 @@ Perl_yylex(pTHX) keylookup: { I32 tmp; I32 orig_keyword = 0; - GV *gv = Nullgv; - GV **gvp = 0; + GV *gv = NULL; + GV **gvp = NULL; PL_bufptr = s; s = scan_word(s, PL_tokenbuf, sizeof PL_tokenbuf, FALSE, &len); @@ -4159,8 +4159,8 @@ Perl_yylex(pTHX) } if (tmp < 0) { /* second-class keyword? */ - GV *ogv = Nullgv; /* override (winner) */ - GV *hgv = Nullgv; /* hidden (loser) */ + GV *ogv = NULL; /* override (winner) */ + GV *hgv = NULL; /* hidden (loser) */ if (PL_expect != XOPERATOR && (*s != ':' || s[1] != ':')) { CV *cv; if ((gv = gv_fetchpv(PL_tokenbuf, 0, SVt_PVCV)) && @@ -10412,7 +10412,7 @@ Perl_scan_num(pTHX_ const char *start, YYSTYPE* lvalp) NV nv; /* number read, as a double */ SV *sv = Nullsv; /* place to put the converted number */ bool floatit; /* boolean: int or float? */ - const char *lastub = 0; /* position of last underbar */ + const char *lastub = NULL; /* position of last underbar */ static char const number_too_long[] = "Number too long"; /* We use the first character to decide what type of number this is */ |