At 8:17 PM +0300 2/8/07, Saku Setälä wrote:
>Todays rsynced code compiles a little better but still fails.
>
>Copy/Log/Noconfirm [.vms]vms.c []
>%COPY-S-COPIED, DISK$HAWK1:[PERL58X.VMS]VMS.C;1 copied to
>DISK$HAWK1:[PERL58X]VMS.C;1 (568 blocks)
>CC/DECC
>/Include=[]/Standard=Relaxed_ANSI/Prefix=All/Obj=VMS.obj/NoList/FLOAT=G_FLOAT/Define=PERL_CORE
> VM
>S.C
> const unsigned long int jpicode1 = JPI$_CASE_LOOKUP_PERM;
> .......................................^
>%CC-E-UNDECLARED, In the initializer for jpicode1, "JPI$_CASE_LOOKUP_PERM" is
> not declared.
> At line number 9102 in DISK$HAWK1:[PERL58X]VMS.C;1.
Try this:
--- vms/vms.c;-0 Wed Feb 7 19:51:26 2007
+++ vms/vms.c Thu Feb 8 11:52:15 2007
@@ -9099,10 +9099,12 @@ static int set_features
int dflt;
char* str;
char val_str[10];
+#ifndef __VAX
const unsigned long int jpicode1 = JPI$_CASE_LOOKUP_PERM;
const unsigned long int jpicode2 = JPI$_CASE_LOOKUP_IMAGE;
unsigned long case_perm;
unsigned long case_image;
+#endif
/* Allow an exception to bring Perl into the VMS debugger */
vms_debug_on_exception = 0;
[end of patch]
--
________________________________________
Craig A. Berry
mailto:[EMAIL PROTECTED]
"... getting out of a sonnet is much more
difficult than getting in."
Brad Leithauser
