2 files changed, 4 insertions, 4 deletions
diff --git a/ext/ByteLoader/bytecode.h b/ext/ByteLoader/bytecode.h
index 9d597fbed2..04a05e4251 100644
--- a/ext/ByteLoader/bytecode.h
+++ b/ext/ByteLoader/bytecode.h
@@ -70,10 +70,10 @@ typedef IV IV64;
 	arg = PL_tokenbuf;			\
     } STMT_END
 
-#define BGET_double(arg) STMT_START {	\
+#define BGET_NV(arg) STMT_START {	\
 	char *str;			\
 	BGET_strconst(str);		\
-	arg = atof(str);		\
+	arg = Perl_atonv(str);		\
     } STMT_END
 
 #define BGET_objindex(arg, type) STMT_START {	\
diff --git a/ext/ByteLoader/byterun.c b/ext/ByteLoader/byterun.c
index 544a59f042..035578f424 100644
--- a/ext/ByteLoader/byterun.c
+++ b/ext/ByteLoader/byterun.c
@@ -221,8 +221,8 @@ byterun(pTHXo_ struct bytestream bs)
 	    }
 	  case INSN_XNV:		/* 21 */
 	    {
-		double arg;
-		BGET_double(arg);
+		NV arg;
+		BGET_NV(arg);
 		SvNVX(bytecode_sv) = arg;
 		break;
 	    }