From c4a6f826b3676d1fdbd9972a9d0a8f11c02d003d Mon Sep 17 00:00:00 2001 From: "Peter J. Acklam) (via RT" Date: Thu, 6 Jan 2011 23:12:42 -0800 Subject: 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. # Signed-off-by: Abigail --- dist/threads-shared/shared.xs | 6 +++--- dist/threads-shared/t/sv_refs.t | 2 +- 2 files changed, 4 insertions(+), 4 deletions(-) (limited to 'dist/threads-shared') 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; -- cgit v1.2.1