X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=vms%2Fconfig.vms;h=203e479016aec018dab0a9c8e5a7307784d0a68b;hb=f8759df64075c9d3934f9e4a040844547b02c0d2;hp=cdf900a9cdd3e2eaf5682802ba79f18dc1e82c15;hpb=c07a80fdfe3926b5eb0585b674aa5d1f57b32ade;p=p5sagit%2Fp5-mst-13.2.git diff --git a/vms/config.vms b/vms/config.vms index cdf900a..203e479 100644 --- a/vms/config.vms +++ b/vms/config.vms @@ -8,10 +8,10 @@ * GenConfig.pl when producing Config.pm. * * config.h for VMS - * Version: 5.2.b1 + * Version: 5.002_01 */ -/* Configuration time: 4-Dec-1995 17:00 +/* Configuration time: 22-Mar-1996 14:45 * Configured by: Charles Bailey bailey@genetics.upenn.edu * Target system: VMS */ @@ -52,6 +52,12 @@ */ #define MEM_ALIGNBYTES 8 /**/ +/* OSNAME: + * This symbol contains the name of the operating system, as determined + * by Configure. + */ +#define OSNAME "VMS" /**/ + /* ARCHLIB_EXP: * This variable, if defined, holds the name of the directory in * which the user wants to put architecture-dependent public @@ -61,11 +67,12 @@ * same as PRIVLIB_EXP, it is not defined, since presumably the * program already searches PRIVLIB_EXP. */ -#ifdef __ALPHA -#define ARCHLIB_EXP "/perl_root/lib/VMS_AXP" /* config-skip */ -#else -#define ARCHLIB_EXP "/perl_root/lib/VMS_VAX" /* config-skip */ -#endif +/* ==> NOTE <== + * This value is automatically updated by FndVers.Com + * when Perl is built. Please do not change it by hand; make + * any changes to FndVers.Com instead. + */ +#define ARCHLIB_EXP "/perl_root/lib/VMS_VAX/5_003" /**/ /* CPPSTDIN: * This symbol contains the first part of the string which will invoke @@ -1305,7 +1312,12 @@ * used in programs that are not prepared to deal with ~ expansion at * run-time. */ -#define OLDARCHLIB_EXP "/perl_root/lib" /**/ +/* ==> NOTE <== + * This value is automatically updated by FndVers.Com + * when Perl is built. Please do not change it by hand; make + * any changes to FndVers.Com instead. + */ +#define OLDARCHLIB_EXP "/perl_root/lib/VMS_VAX" /**/ /* PRIVLIB_EXP: * This symbol contains the name of the private library for this package. @@ -1319,13 +1331,18 @@ * This symbol contains the ~name expanded version of SITELIB, to be used * in programs that are not prepared to deal with ~ expansion at run-time. */ -#undef SITELIB_EXP /**/ +#define SITELIB_EXP "/perl_root/lib/site_perl" /**/ /* SITEARCH_EXP: * This symbol contains the ~name expanded version of SITEARCH, to be used * in programs that are not prepared to deal with ~ expansion at run-time. */ -#undef SITEARCH_EXP /**/ +/* ==> NOTE <== + * This value is automatically updated by FndVers.Com + * when Perl is built. Please do not change it by hand; make + * any changes to FndVers.Com instead. + */ +#define SITEARCH_EXP "/perl_root/lib/site_perl/VMS_VAX" /**/ /* SCRIPTDIR: * This symbol holds the name of the directory in which the user wants @@ -1348,7 +1365,11 @@ * It can be int, ushort, uid_t, etc... It may be necessary to include * to get any typedef'ed information. */ -#define Uid_t unsigned int /* UID type */ +#if defined(__DECC) && defined(__DECC_VER) && (__DECC_VER >= 500000) +# define Uid_t uid_t /* config-skip */ +#else +# define Uid_t unsigned int /* config-skip */ +#endif /* I_SYS_PARAM: * This symbol, if defined, indicates to the C program that it should @@ -1486,6 +1507,28 @@ */ #define Gconvert(x,n,t,b) my_gconvert(x,n,t,b) +/* Sigjmp_buf: + * This is the buffer type to be used with Sigsetjmp and Siglongjmp. + */ +/* Sigsetjmp: + * This macro is used in the same way as sigsetjmp(), but will invoke + * traditional setjmp() if sigsetjmp isn't available. + */ +/* Siglongjmp: + * This macro is used in the same way as siglongjmp(), but will invoke + * traditional longjmp() if siglongjmp isn't available. + */ +#undef HAS_SIGSETJMP /**/ +#ifdef HAS_SIGSETJMP +#define Sigjmp_buf sigjmp_buf /* config-skip */ +#define Sigsetjmp(buf,save_mask) sigsetjmp(buf,save_mask) /* config-skip */ +#define Siglongjmp(buf,retval) siglongjmp(buf,retval) /* config-skip */ +#else +#define Sigjmp_buf jmp_buf /* config-skip */ +#define Sigsetjmp(buf,save_mask) setjmp(buf) /* config-skip */ +#define Siglongjmp(buf,retval) longjmp(buf,retval) /* config-skip */ +#endif + /* USE_DYNAMIC_LOADING: * This symbol, if defined, indicates that dynamic loading of * some sort is available.