Jarkko Hietaniemi wrote in response to my query:

!> Which way is this headed?  Thanks.
!
!(U8*).

Here is the corresponding patch that lets the build
go through on VMS and all expected tests to pass
(on my tcp/ip stack I fail on one of the hostent
tests):

--- vms/vms.c;1   Mon May 13 13:58:59 2002
+++ vms/vms.c     Mon May 13 17:31:06 2002
@@ -587,7 +587,7 @@
         Perl_warner(aTHX_ packWARN(WARN_INTERNAL),"Ill-formed message in
prime_env_iter: |%s|",buf);
         continue;
       }
-      PERL_HASH(hash,key,keylen);
+      PERL_HASH(hash,(U8*)key,keylen);
       sv = newSVpvn(cp2,cp1 - cp2 + 1);
       SvTAINTED_on(sv);
       hv_store(envhv,key,keylen,sv,hash);
End of Patch.

(It _should_ apply cleanly despite change # 16574)

Peter Prymmer

Reply via email to