Revert "Revert "infnan: more tests.""

[perl5.git] / perl.h

diff --git a/perl.h b/perl.h
index d711b20..5615b96 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -2663,6 +2663,10 @@ typedef SV PADNAME;
 # define PERL_SAWAMPERSAND
 #endif
 
+#if defined(PERL_DEBUG_READONLY_OPS) && !defined(USE_ITHREADS)
+# error PERL_DEBUG_READONLY_OPS only works with ithreads
+#endif
+
 #include "handy.h"
 
 #if defined(USE_LARGE_FILES) && !defined(NO_64_BIT_RAWIO)