patchlevel up to 5.004_70, various tweaks

 * fix taint problems due to maintbranch regression
 * PERL_OBJECT now builds again
 * deal with C++ strong-typing problems in hv.c
 * fix mismatch in "reserved word" diagnostic

p4raw-id: //depot/perl@1311

1 files changed, 2 insertions, 1 deletions

diff --git a/av.c b/av.c
index 2e460536ed..b69dcf2a45 100644
--- a/av.c
+++ b/av.c
@@ -596,7 +596,7 @@ av_fill(register AV *av, I32 fill)
  * hash keys to array indices.
  */
 
-static I32
+STATIC I32
 avhv_index_sv(SV* sv)
 {
     I32 index = SvIV(sv);
@@ -620,6 +620,7 @@ avhv_keys(AV *av)
 	}
     }
     croak("Can't coerce array into hash");
+    return Nullhv;
 }
 
 SV**