diff options
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 */ |