diff options
Diffstat (limited to 'Master/tlpkg/tlperl/lib/CORE/win32.h')
-rw-r--r-- | Master/tlpkg/tlperl/lib/CORE/win32.h | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Master/tlpkg/tlperl/lib/CORE/win32.h b/Master/tlpkg/tlperl/lib/CORE/win32.h index 26c3ac254f3..73aa67a3bef 100644 --- a/Master/tlpkg/tlperl/lib/CORE/win32.h +++ b/Master/tlpkg/tlperl/lib/CORE/win32.h @@ -85,7 +85,7 @@ /* now even GCC supports __declspec() */ /* miniperl has no reason to export anything */ -#if defined(PERL_IS_MINIPERL) && !defined(UNDER_CE) && defined(_MSC_VER) +#if defined(PERL_IS_MINIPERL) && !defined(UNDER_CE) # define DllExport #else # if defined(PERLDLL) @@ -285,8 +285,7 @@ typedef unsigned short mode_t; # pragma intrinsic(_rotl64,_rotr64) #endif -#pragma warning(push) -#pragma warning(disable:4756;disable:4056) +MSVC_DIAG_IGNORE(4756 4056) PERL_STATIC_INLINE double S_Infinity() { /* this is a real C literal which can get further constant folded @@ -295,7 +294,8 @@ double S_Infinity() { folding INF is creating -INF */ return (DBL_MAX+DBL_MAX); } -#pragma warning(pop) +MSVC_DIAG_RESTORE + #define NV_INF S_Infinity() /* selectany allows duplicate and unused data symbols to be removed by |