2 files changed, 3 insertions, 3 deletions
diff --git a/vms/vms.c b/vms/vms.c
index 4eaa470e76..445b183bcc 100644
--- a/vms/vms.c
+++ b/vms/vms.c
@@ -7251,8 +7251,8 @@ Perl_sys_intern_clear(pTHX)
 void  
 Perl_sys_intern_init(pTHX)
 {
-    int ix = RAND_MAX;
-    float x;
+    unsigned int ix = RAND_MAX;
+    double x;
 
     VMSISH_HUSHED = 0;
 
diff --git a/vms/vmsish.h b/vms/vmsish.h
index 093ea69dff..ddc8b96749 100644
--- a/vms/vmsish.h
+++ b/vms/vmsish.h
@@ -298,7 +298,7 @@
 #define HAVE_INTERP_INTERN
 struct interp_intern {
     int    hushed;
-    float  inv_rand_max;
+    double inv_rand_max;
 };
 #define VMSISH_HUSHED     (PL_sys_intern.hushed)
 #define MY_INV_RAND_MAX   (PL_sys_intern.inv_rand_max)