void
Perl_sv_taint(pTHX_ SV *sv)
{
- sv_magic((sv), Nullsv, PERL_MAGIC_taint, NULL, 0);
+ sv_magic((sv), NULL, PERL_MAGIC_taint, NULL, 0);
}
/* sv_2iv() is now a macro using Perl_sv_2iv_flags();
NV
Perl_huge(void)
{
-# if defined(USE_LONG_DOUBLE) && defined(HUGE_VALL)
+# if defined(USE_LONG_DOUBLE) && defined(HUGE_VALL)
return HUGE_VALL;
-# endif
+# else
return HUGE_VAL;
+# endif
}
#endif