summaryrefslogtreecommitdiff
path: root/ext
diff options
context:
space:
mode:
Diffstat (limited to 'ext')
-rw-r--r--ext/B/B.pm2
-rw-r--r--ext/B/B/Deparse.pm2
-rw-r--r--ext/Data/Dumper/Dumper.pm2
-rw-r--r--ext/Digest/MD5/MD5.pm2
-rw-r--r--ext/Digest/MD5/t/files.t2
-rw-r--r--ext/DynaLoader/dl_dyld.xs2
-rw-r--r--ext/DynaLoader/dl_next.xs2
-rw-r--r--ext/Encode/Encode.pm2
-rw-r--r--ext/IO/lib/IO/Dir.pm2
-rw-r--r--ext/IO/lib/IO/File.pm4
-rw-r--r--ext/IO/lib/IO/Handle.pm6
-rw-r--r--ext/IO/lib/IO/Pipe.pm2
-rw-r--r--ext/IO/lib/IO/Select.pm2
-rw-r--r--ext/IO/lib/IO/Socket.pm2
-rw-r--r--ext/Storable/Storable.xs12
-rw-r--r--ext/XS/Typemap/Typemap.xs4
-rw-r--r--ext/threads/shared/shared.pm2
-rw-r--r--ext/threads/shared/shared.xs6
18 files changed, 29 insertions, 29 deletions
diff --git a/ext/B/B.pm b/ext/B/B.pm
index 97dd0c7e4c..534182fe4b 100644
--- a/ext/B/B.pm
+++ b/ext/B/B.pm
@@ -867,7 +867,7 @@ print_subs() is a B::GV method you have declared.
Takes any Perl variable and turns it into an object in the
appropriate B::OP-derived or B::SV-derived class. Apart from functions
such as C<main_root>, this is the primary way to get an initial
-"handle" on a internal perl data structure which can then be followed
+"handle" on an internal perl data structure which can then be followed
with the other access methods.
=item ppname(OPNUM)
diff --git a/ext/B/B/Deparse.pm b/ext/B/B/Deparse.pm
index b02b9e1b97..b84e8ea540 100644
--- a/ext/B/B/Deparse.pm
+++ b/ext/B/B/Deparse.pm
@@ -2957,7 +2957,7 @@ sub pp_entersub {
}
} else {
# glob() invocations can be translated into calls of
- # CORE::GLOBAL::glob with an second parameter, a number.
+ # CORE::GLOBAL::glob with a second parameter, a number.
# Reverse this.
if ($kid eq "CORE::GLOBAL::glob") {
$kid = "glob";
diff --git a/ext/Data/Dumper/Dumper.pm b/ext/Data/Dumper/Dumper.pm
index 30d6142410..83271cfcec 100644
--- a/ext/Data/Dumper/Dumper.pm
+++ b/ext/Data/Dumper/Dumper.pm
@@ -747,7 +747,7 @@ references are not dumped; instead, their names are inserted wherever they
are encountered subsequently. This is useful especially for properly
dumping subroutine references.
-Expects a anonymous hash of name => value pairs. Same rules apply for names
+Expects an anonymous hash of name => value pairs. Same rules apply for names
as in C<new>. If no argument is supplied, will return the "seen" list of
name => value pairs, in a list context. Otherwise, returns the object
itself.
diff --git a/ext/Digest/MD5/MD5.pm b/ext/Digest/MD5/MD5.pm
index 9a109b34e5..8de2416f9c 100644
--- a/ext/Digest/MD5/MD5.pm
+++ b/ext/Digest/MD5/MD5.pm
@@ -113,7 +113,7 @@ The constructor returns a new C<Digest::MD5> object which encapsulate
the state of the MD5 message-digest algorithm. You can add data to
the object and finally ask for the digest.
-If called as a instance method (i.e. $md5->new) it will just reset the
+If called as an instance method (i.e. $md5->new) it will just reset the
state the object to the state of a newly created object. No new
object is created in this case.
diff --git a/ext/Digest/MD5/t/files.t b/ext/Digest/MD5/t/files.t
index 4ea3fec69f..bf95950558 100644
--- a/ext/Digest/MD5/t/files.t
+++ b/ext/Digest/MD5/t/files.t
@@ -20,7 +20,7 @@ $EXPECT = <<EOT;
EOT
} else { # ASCII
$EXPECT = <<EOT;
-bf8c3c72d071d1c0303fc9e311820708 ext/Digest/MD5/MD5.pm
+665ddc08b12d6b1bf85ac6dc5aae68b3 ext/Digest/MD5/MD5.pm
95444a9c6ad17e443e4606c6c7fd9e28 ext/Digest/MD5/MD5.xs
EOT
}
diff --git a/ext/DynaLoader/dl_dyld.xs b/ext/DynaLoader/dl_dyld.xs
index 87642ee9b4..752ac364bb 100644
--- a/ext/DynaLoader/dl_dyld.xs
+++ b/ext/DynaLoader/dl_dyld.xs
@@ -76,7 +76,7 @@ static void TranslateError
{
"%s(%d): Object Image Load Failure\n",
"%s(%d): Object Image Load Success\n",
- "%s(%d): Not an recognisable object file\n",
+ "%s(%d): Not a recognisable object file\n",
"%s(%d): No valid architecture\n",
"%s(%d): Object image has an invalid format\n",
"%s(%d): Invalid access (permissions?)\n",
diff --git a/ext/DynaLoader/dl_next.xs b/ext/DynaLoader/dl_next.xs
index 8fa84404ea..078d92c8e3 100644
--- a/ext/DynaLoader/dl_next.xs
+++ b/ext/DynaLoader/dl_next.xs
@@ -85,7 +85,7 @@ static void TranslateError
{
"%s(%d): Object Image Load Failure\n",
"%s(%d): Object Image Load Success\n",
- "%s(%d): Not an recognisable object file\n",
+ "%s(%d): Not a recognisable object file\n",
"%s(%d): No valid architecture\n",
"%s(%d): Object image has an invalid format\n",
"%s(%d): Invalid access (permissions?)\n",
diff --git a/ext/Encode/Encode.pm b/ext/Encode/Encode.pm
index bae93893e7..c852bd1d71 100644
--- a/ext/Encode/Encode.pm
+++ b/ext/Encode/Encode.pm
@@ -597,7 +597,7 @@ the encoding by picking the first in the following sequence:
=item * The name in the IANA registry.
-=item * The name used by the the organization that defined it.
+=item * The name used by the organization that defined it.
=back
diff --git a/ext/IO/lib/IO/Dir.pm b/ext/IO/lib/IO/Dir.pm
index 0a083ef9aa..4ac2638066 100644
--- a/ext/IO/lib/IO/Dir.pm
+++ b/ext/IO/lib/IO/Dir.pm
@@ -201,7 +201,7 @@ for details of these functions.
=back
-C<IO::Dir> also provides a interface to reading directories via a tied
+C<IO::Dir> also provides an interface to reading directories via a tied
HASH. The tied HASH extends the interface beyond just the directory
reading routines by the use of C<lstat>, from the C<File::stat> package,
C<unlink>, C<rmdir> and C<utime>.
diff --git a/ext/IO/lib/IO/File.pm b/ext/IO/lib/IO/File.pm
index 240033f304..d5520cbd93 100644
--- a/ext/IO/lib/IO/File.pm
+++ b/ext/IO/lib/IO/File.pm
@@ -51,7 +51,7 @@ these classes with methods that are specific to file handles.
=item new ( FILENAME [,MODE [,PERMS]] )
-Creates a C<IO::File>. If it receives any parameters, they are passed to
+Creates an C<IO::File>. If it receives any parameters, they are passed to
the method C<open>; if the open fails, the object is destroyed. Otherwise,
it is returned to the caller.
@@ -78,7 +78,7 @@ whitespace or other special characters, and the second parameter is
the open mode, optionally followed by a file permission value.
If C<IO::File::open> receives a Perl mode string ("E<gt>", "+E<lt>", etc.)
-or a ANSI C fopen() mode string ("w", "r+", etc.), it uses the basic
+or an ANSI C fopen() mode string ("w", "r+", etc.), it uses the basic
Perl C<open> operator (but protects any special characters).
If C<IO::File::open> is given a numeric mode, it passes that mode
diff --git a/ext/IO/lib/IO/Handle.pm b/ext/IO/lib/IO/Handle.pm
index 6fdba17304..74f9b21edd 100644
--- a/ext/IO/lib/IO/Handle.pm
+++ b/ext/IO/lib/IO/Handle.pm
@@ -48,7 +48,7 @@ Creates a new C<IO::Handle> object.
=item new_from_fd ( FD, MODE )
-Creates a C<IO::Handle> like C<new> does.
+Creates an C<IO::Handle> like C<new> does.
It requires two parameters, which are passed to the method C<fdopen>;
if the fdopen fails, the object is destroyed. Otherwise, it is returned
to the caller.
@@ -105,7 +105,7 @@ Furthermore, for doing normal I/O you might need these:
=item $io->fdopen ( FD, MODE )
C<fdopen> is like an ordinary C<open> except that its first parameter
-is not a filename but rather a file handle name, a IO::Handle object,
+is not a filename but rather a file handle name, an IO::Handle object,
or a file descriptor number.
=item $io->opened
@@ -220,7 +220,7 @@ the taint-clean flag failed. (eg invalid handle)
=head1 NOTE
-A C<IO::Handle> object is a reference to a symbol/GLOB reference (see
+An C<IO::Handle> object is a reference to a symbol/GLOB reference (see
the C<Symbol> package). Some modules that
inherit from C<IO::Handle> may want to keep object related variables
in the hash table part of the GLOB. In an attempt to prevent modules
diff --git a/ext/IO/lib/IO/Pipe.pm b/ext/IO/lib/IO/Pipe.pm
index a500f29280..0aaa2d79cb 100644
--- a/ext/IO/lib/IO/Pipe.pm
+++ b/ext/IO/lib/IO/Pipe.pm
@@ -198,7 +198,7 @@ processes.
=item new ( [READER, WRITER] )
-Creates a C<IO::Pipe>, which is a reference to a newly created symbol
+Creates an C<IO::Pipe>, which is a reference to a newly created symbol
(see the C<Symbol> package). C<IO::Pipe::new> optionally takes two
arguments, which should be objects blessed into C<IO::Handle>, or a
subclass thereof. These two objects will be used for the system call
diff --git a/ext/IO/lib/IO/Select.pm b/ext/IO/lib/IO/Select.pm
index f556b024a8..7e5d8bd819 100644
--- a/ext/IO/lib/IO/Select.pm
+++ b/ext/IO/lib/IO/Select.pm
@@ -281,7 +281,7 @@ cache which is indexed by the C<fileno> of the handle, so if more than one
handle with the same C<fileno> is specified then only the last one is cached.
Each handle can be an C<IO::Handle> object, an integer or an array
-reference where the first element is a C<IO::Handle> or an integer.
+reference where the first element is an C<IO::Handle> or an integer.
=item remove ( HANDLES )
diff --git a/ext/IO/lib/IO/Socket.pm b/ext/IO/lib/IO/Socket.pm
index d670fe5996..2b4c9d7998 100644
--- a/ext/IO/lib/IO/Socket.pm
+++ b/ext/IO/lib/IO/Socket.pm
@@ -432,7 +432,7 @@ is returned.
=item sockdomain
Returns the numerical number for the socket domain type. For example, for
-a AF_INET socket the value of &AF_INET will be returned.
+an AF_INET socket the value of &AF_INET will be returned.
=item sockopt(OPT [, VAL])
diff --git a/ext/Storable/Storable.xs b/ext/Storable/Storable.xs
index f2c0e2bca0..6e1dec9803 100644
--- a/ext/Storable/Storable.xs
+++ b/ext/Storable/Storable.xs
@@ -191,8 +191,8 @@ typedef double NV; /* Older perls lack the NV type */
*/
#define SX_ITEM 'i' /* An array item introducer */
#define SX_IT_UNDEF 'I' /* Undefined array item */
-#define SX_KEY 'k' /* An hash key introducer */
-#define SX_VALUE 'v' /* An hash value introducer */
+#define SX_KEY 'k' /* A hash key introducer */
+#define SX_VALUE 'v' /* A hash value introducer */
#define SX_VL_UNDEF 'V' /* Undefined hash value */
/*
@@ -238,7 +238,7 @@ struct extendable {
/*
* At store time:
- * An hash table records the objects which have already been stored.
+ * A hash table records the objects which have already been stored.
* Those are referred to as SX_OBJECT in the file, and their "tag" (i.e.
* an arbitrary sequence number) is used to identify them.
*
@@ -1853,7 +1853,7 @@ sortcmp(const void *a, const void *b)
/*
* store_hash
*
- * Store an hash table.
+ * Store a hash table.
*
* Layout is SX_HASH <size> followed by each key/value pair, in random order.
* Values are stored as <object>.
@@ -2796,7 +2796,7 @@ static int store(stcxt_t *cxt, SV *sv)
* stored, before recursing...
*
* In order to avoid creating new SvIVs to hold the tagnum we just
- * cast the tagnum to a SV pointer and store that in the hash. This
+ * cast the tagnum to an SV pointer and store that in the hash. This
* means that we must clean up the hash manually afterwards, but gives
* us a 15% throughput increase.
*
@@ -3377,7 +3377,7 @@ static SV *retrieve_hook(stcxt_t *cxt, char *cname)
TRACEME(("class name: %s", class));
/*
- * Decode user-frozen string length and read it in a SV.
+ * Decode user-frozen string length and read it in an SV.
*
* For efficiency reasons, we read data directly into the SV buffer.
* To understand that code, read retrieve_scalar()
diff --git a/ext/XS/Typemap/Typemap.xs b/ext/XS/Typemap/Typemap.xs
index 1901549489..feed61b904 100644
--- a/ext/XS/Typemap/Typemap.xs
+++ b/ext/XS/Typemap/Typemap.xs
@@ -120,7 +120,7 @@ T_AVREF( av )
=item T_HVREF
From the perl level this is a reference to a perl hash.
-From the C level this is a pointer to a HV.
+From the C level this is a pointer to an HV.
=cut
@@ -201,7 +201,7 @@ T_UV( uv )
=item T_IV
A signed integer. This is cast to the required integer type when
-passed to C and converted to a IV when passed back to Perl.
+passed to C and converted to an IV when passed back to Perl.
=cut
diff --git a/ext/threads/shared/shared.pm b/ext/threads/shared/shared.pm
index 10d2af9df8..f8d04e22ff 100644
--- a/ext/threads/shared/shared.pm
+++ b/ext/threads/shared/shared.pm
@@ -141,7 +141,7 @@ C<share>, C<lock>, C<unlock>, C<cond_wait>, C<cond_signal>, C<cond_broadcast>
=item share VARIABLE
-C<share> takes a value and marks it as shared, you can share an scalar, array, hash
+C<share> takes a value and marks it as shared, you can share a scalar, array, hash
scalar ref, array ref and hash ref, C<share> will return the shared value.
C<share> will traverse up references exactly I<one> level.
diff --git a/ext/threads/shared/shared.xs b/ext/threads/shared/shared.xs
index 92e24d4e4b..cf655cbc58 100644
--- a/ext/threads/shared/shared.xs
+++ b/ext/threads/shared/shared.xs
@@ -323,7 +323,7 @@ STORE(self, index, value)
if(SvROK(value)) {
shared_sv* target = Perl_sharedsv_find(aTHX_ SvRV(value));
if(!target) {
- Perl_croak(aTHX_ "You cannot assign a non shared reference to an shared array");
+ Perl_croak(aTHX_ "You cannot assign a non shared reference to a shared array");
}
value = newRV_noinc(newSViv(PTR2IV(target)));
}
@@ -396,7 +396,7 @@ PUSH(self, ...)
if(SvROK(tmp)) {
shared_sv* target = Perl_sharedsv_find(aTHX_ SvRV(tmp));
if(!target) {
- Perl_croak(aTHX_ "You cannot assign a non shared reference to an shared array");
+ Perl_croak(aTHX_ "You cannot assign a non shared reference to a shared array");
}
tmp = newRV_noinc(newSViv(PTR2IV(target)));
}
@@ -425,7 +425,7 @@ UNSHIFT(self, ...)
if(SvROK(tmp)) {
shared_sv* target = Perl_sharedsv_find(aTHX_ SvRV(tmp));
if(!target) {
- Perl_croak(aTHX_ "You cannot assign a non shared reference to an shared array");
+ Perl_croak(aTHX_ "You cannot assign a non shared reference to a shared array");
}
tmp = newRV_noinc(newSViv(PTR2IV(target)));
}
View Lorry Controller Status