diff options
| author | Steve Peters <steve@fisharerojo.org> | 2006-08-16 13:11:15 +0000 |
|---|---|---|
| committer | Steve Peters <steve@fisharerojo.org> | 2006-08-16 13:11:15 +0000 |
| commit | 87d46f97c572fcb76df491a3f99f2a7106164f04 (patch) | |
| tree | 96e36fd06c388250302dcbfeb11bc3513d60bd9c /ext/Hash | |
| parent | 383f9357ddd20f0f467e21ca2ed7c8bc462aa3b6 (diff) | |
| download | perl-87d46f97c572fcb76df491a3f99f2a7106164f04.tar.gz | |
Additional changes to get C++ a little closer to a clean compile
of Perl.
p4raw-id: //depot/perl@28729
Diffstat (limited to 'ext/Hash')
| -rw-r--r-- | ext/Hash/Util/FieldHash/FieldHash.xs | 4 | ||||
| -rw-r--r-- | ext/Hash/Util/FieldHash/lib/Hash/Util/FieldHash.pm | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/ext/Hash/Util/FieldHash/FieldHash.xs b/ext/Hash/Util/FieldHash/FieldHash.xs index 8aa8c9c705..6bc07cc37b 100644 --- a/ext/Hash/Util/FieldHash/FieldHash.xs +++ b/ext/Hash/Util/FieldHash/FieldHash.xs @@ -307,9 +307,9 @@ OUTPUT: RETVAL void -CLONE(char* class) +CLONE(char* classname) CODE: - if (0 == strcmp(class, "Hash::Util::FieldHash")) { + if (0 == strcmp(classname, "Hash::Util::FieldHash")) { HUF_global(HUF_CLONE); HUF_fix_objects(); } diff --git a/ext/Hash/Util/FieldHash/lib/Hash/Util/FieldHash.pm b/ext/Hash/Util/FieldHash/lib/Hash/Util/FieldHash.pm index 6575022efa..824873aad1 100644 --- a/ext/Hash/Util/FieldHash/lib/Hash/Util/FieldHash.pm +++ b/ext/Hash/Util/FieldHash/lib/Hash/Util/FieldHash.pm @@ -15,7 +15,7 @@ our %EXPORT_TAGS = ( ); our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } ); -our $VERSION = '0.01'; +our $VERSION = '0.01_01'; { require XSLoader; |