diff options
Diffstat (limited to 'Master/tlpkg/tlperl/lib/CORE/INTERN.h')
-rw-r--r-- | Master/tlpkg/tlperl/lib/CORE/INTERN.h | 27 |
1 files changed, 12 insertions, 15 deletions
diff --git a/Master/tlpkg/tlperl/lib/CORE/INTERN.h b/Master/tlpkg/tlperl/lib/CORE/INTERN.h index da3057a83c6..e6e06026576 100644 --- a/Master/tlpkg/tlperl/lib/CORE/INTERN.h +++ b/Master/tlpkg/tlperl/lib/CORE/INTERN.h @@ -18,21 +18,19 @@ #undef dEXT #undef EXTCONST #undef dEXTCONST -#if defined(VMS) && !defined(__GNUC__) - /* Suppress portability warnings from DECC for VMS-specific extensions */ -# ifdef __DECC -# pragma message disable (GLOBALEXT,NOSHAREEXT,READONLYEXT) -# endif -# define EXT globaldef {"$GLOBAL_RW_VARS"} noshare -# define dEXT globaldef {"$GLOBAL_RW_VARS"} noshare -# define EXTCONST globaldef {"$GLOBAL_RO_VARS"} readonly -# define dEXTCONST globaldef {"$GLOBAL_RO_VARS"} readonly -#else + # if (defined(WIN32) && defined(__MINGW32__)) || defined(__SYMBIAN32__) -# define EXT __declspec(dllexport) -# define dEXT -# define EXTCONST __declspec(dllexport) const -# define dEXTCONST const +# ifdef __cplusplus +# define EXT __declspec(dllexport) +# define dEXT +# define EXTCONST __declspec(dllexport) extern const +# define dEXTCONST const +# else +# define EXT __declspec(dllexport) +# define dEXT +# define EXTCONST __declspec(dllexport) const +# define dEXTCONST const +# endif # else # ifdef __cplusplus # define EXT @@ -46,7 +44,6 @@ # define dEXTCONST const # endif # endif -#endif #undef INIT #define INIT(x) = x |