diff options
| author | Peter J. Acklam) (via RT <perlbug-followup@perl.org> | 2011-01-06 23:13:56 -0800 |
|---|---|---|
| committer | Abigail <abigail@abigail.be> | 2011-01-07 11:14:22 +0100 |
| commit | 486ec47ab73770ab60bf9cfb6d398a4371463266 (patch) | |
| tree | 74fc7e7969e5c694ddafafe589afec7694b69dc3 /toke.c | |
| parent | 7237a61d0477f17adcfed2690643e9c4b2dccaae (diff) | |
| download | perl-486ec47ab73770ab60bf9cfb6d398a4371463266.tar.gz | |
Fix typos (spelling errors) in Perl sources.
# New Ticket Created by (Peter J. Acklam)
# Please include the string: [perl #81904]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=81904 >
Signed-off-by: Abigail <abigail@abigail.be>
Diffstat (limited to 'toke.c')
| -rw-r--r-- | toke.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -3747,7 +3747,7 @@ S_intuit_method(pTHX_ char *start, GV *gv, CV *cv) #endif s = PEEKSPACE(s); if ((PL_bufend - s) >= 2 && *s == '=' && *(s+1) == '>') - return 0; /* no assumptions -- "=>" quotes bearword */ + return 0; /* no assumptions -- "=>" quotes bareword */ bare_package: start_force(PL_curforce); NEXTVAL_NEXTTOKE.opval = (OP*)newSVOP(OP_CONST, 0, @@ -3966,7 +3966,7 @@ S_find_in_my_stash(pTHX_ const char *pkgname, STRLEN len) /* * S_readpipe_override - * Check whether readpipe() is overriden, and generates the appropriate + * Check whether readpipe() is overridden, and generates the appropriate * optree, provided sublex_start() is called afterwards. */ STATIC void @@ -6512,7 +6512,7 @@ Perl_yylex(pTHX) } /* Look for a subroutine with this name in current package, - unless name is "Foo::", in which case Foo is a bearword + unless name is "Foo::", in which case Foo is a bareword (and a package name). */ if (len > 2 && !PL_madskills && @@ -7661,7 +7661,7 @@ Perl_yylex(pTHX) missingterm(NULL); pl_yylval.ival = OP_STRINGIFY; if (SvIVX(PL_lex_stuff) == '\'') - SvIV_set(PL_lex_stuff, 0); /* qq'$foo' should intepolate */ + SvIV_set(PL_lex_stuff, 0); /* qq'$foo' should interpolate */ TERM(sublex_start()); case KEY_qr: |