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 /pad.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 'pad.c')
-rw-r--r-- | pad.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -868,7 +868,7 @@ S_pad_findlex(pTHX_ const char *name, const CV* cv, U32 seq, int warn, * instances. For now, we just test !CvUNIQUE(cv), but * ideally, we should detect my's declared within loops * etc - this would allow a wider range of 'not stayed - * shared' warnings. We also treated alreadly-compiled + * shared' warnings. We also treated already-compiled * lexes as not multi as viewed from evals. */ *out_flags = CvANON(cv) ? @@ -993,7 +993,7 @@ S_pad_findlex(pTHX_ const char *name, const CV* cv, U32 seq, int warn, { /* This relies on sv_setsv_flags() upgrading the destination to the same - type as the source, independant of the flags set, and on it being + type as the source, independent of the flags set, and on it being "good" and only copying flag bits and pointers that it understands. */ SV *new_namesv = newSVsv(*out_name_sv); @@ -1339,7 +1339,7 @@ Perl_pad_tidy(pTHX_ padtidy_type type) * so that for example the eval's CV in C<< sub { eval '$x' } >> gets * the right CvOUTSIDE. * If running with -d, *any* sub may potentially have an eval - * excuted within it. + * executed within it. */ if (PL_cv_has_eval || PL_perldb) { |