diff options
| author | Peter J. Acklam) (via RT <perlbug-followup@perl.org> | 2011-01-06 23:12:42 -0800 |
|---|---|---|
| committer | Abigail <abigail@abigail.be> | 2011-01-07 11:29:08 +0100 |
| commit | c4a6f826b3676d1fdbd9972a9d0a8f11c02d003d (patch) | |
| tree | f246b362bc76c9dac721de18db8432c7b4bdc937 /dist/threads-shared | |
| parent | 2a467c83e2ce01bdf8cdda501e2e3df4b188134f (diff) | |
| download | perl-c4a6f826b3676d1fdbd9972a9d0a8f11c02d003d.tar.gz | |
Fix typos (spelling errors) in dist/*
# New Ticket Created by (Peter J. Acklam)
# Please include the string: [perl #81888]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=81888 >
Signed-off-by: Abigail <abigail@abigail.be>
Diffstat (limited to 'dist/threads-shared')
| -rw-r--r-- | dist/threads-shared/shared.xs | 6 | ||||
| -rw-r--r-- | dist/threads-shared/t/sv_refs.t | 2 |
2 files changed, 4 insertions, 4 deletions
diff --git a/dist/threads-shared/shared.xs b/dist/threads-shared/shared.xs index e92d33d06e..7f1cd06715 100644 --- a/dist/threads-shared/shared.xs +++ b/dist/threads-shared/shared.xs @@ -134,7 +134,7 @@ #define UL_MAGIC_SIG 0x554C /* UL = user lock */ /* - * The shared things need an intepreter to live in ... + * The shared things need an interpreter to live in ... */ PerlInterpreter *PL_sharedsv_space; /* The shared sv space */ /* To access shared space we fake aTHX in this scope and thread's context */ @@ -1163,7 +1163,7 @@ Perl_sharedsv_locksv(pTHX_ SV *sv) /* Can a shared object be destroyed? * True if not a shared, - * or if detroying last proxy on a shared object + * or if destroying last proxy on a shared object */ #ifdef PL_destroyhook bool @@ -1178,7 +1178,7 @@ Perl_shared_object_destroy(pTHX_ SV *sv) } #endif -/* veto signal despatch if we have the lock */ +/* veto signal dispatch if we have the lock */ #ifdef PL_signalhook diff --git a/dist/threads-shared/t/sv_refs.t b/dist/threads-shared/t/sv_refs.t index 5cc6a22ecd..55cfb093d4 100644 --- a/dist/threads-shared/t/sv_refs.t +++ b/dist/threads-shared/t/sv_refs.t @@ -51,7 +51,7 @@ ok(5, $$foo eq "yeah", "Check that assignment works"); $$foo = "yeah2"; ok(6, $$foo eq "yeah2", "Check that deref assignment works"); threads->create(sub {$bar = "yeah3"})->join(); -ok(7, $$foo eq "yeah3", "Check that other thread assignemtn works"); +ok(7, $$foo eq "yeah3", "Check that other thread assignment works"); threads->create(sub {$foo = "artur"})->join(); ok(8, $foo eq "artur", "Check that uncopupling the ref works"); my $baz; |