Henry,
I think (hope) this will take care of the compilation problems you are
having. For the GNU-impaired, I supply the patch as the result of a
DIFFERENCES/SLP command. To apply, set default to the [.vms] directory,
create the file vms_c_patch.upd from what I've included below, and execute
this command:
$ edit/sum vms.c/update=vms_c_patch
To quickly check whether this helps, go up one level to the main source
directory and type
$ MMS VMS.OBJ
And here's the patch. Let us know how it goes.
======= begin vms_c_patch.upd =======
- 3343
STRLEN trnlen;
- 3357, 3357
trnlen = strlen(trndir);
- 6639, 6639
* UAF and might give false positives or negatives. This only works on
* VMS versions v6.0 and later since that's when sys$create_user_profile
* became available.
- 6645
#if defined(__VMS_VER) && __VMS_VER >= 60000000
- 6658
#else
retsts = sys$check_access(&objtyp,&namdsc,&usrdsc,armlst);
#endif
/
======= end vms_c_patch.upd =======
At 12:25 PM 6/12/2002 -0400, Henry A. Frystak - System Manager wrote:
>CC/DECC/Include=[]/Standard=Relaxed_ANSI/Prefix=All/Obj=VMS.obj/NoList/Define=PERL_CORE
>
>VMS.C
> STRLEN trnlen = strlen(trndir);
> .............^
>%CC-E-NOSEMI, Missing ";".
> At line number 3357 in $41$DKA400:[SYSSOFT.PERL.PERL5_8_0_RC1]VMS.C;1.
> _ckvmssts(sys$create_user_profile(&usrdsc,&usrprolst,0,0,
> ..^
>%CC-I-IMPLICITFUNC, In this statement, the identifier
>"sys$create_user_profile" is implicitly declared as a function.
> At line number 6647 in $41$DKA400:[SYSSOFT.PERL.PERL5_8_0_RC1]VMS.C;1.
