diff --git a/vvp/vpi_callback.cc b/vvp/vpi_callback.cc
index d3629df04..86b549d87 100644
--- a/vvp/vpi_callback.cc
+++ b/vvp/vpi_callback.cc
@@ -778,7 +778,7 @@ static void real_signal_value(struct t_vpi_value*vp, double rval)
 		  if (rval >= 0.0) rval = floor(rval + 0.5);
 		  else rval = ceil(rval - 0.5);
 	    }
-	    vp->value.integer = rval;
+	    vp->value.integer = (PLI_INT32)rval;
 	    break;
 
 	  case vpiDecStrVal:
diff --git a/vvp/vpi_vthr_vector.cc b/vvp/vpi_vthr_vector.cc
index 477277fce..cfae01cbf 100644
--- a/vvp/vpi_vthr_vector.cc
+++ b/vvp/vpi_vthr_vector.cc
@@ -549,7 +549,7 @@ static void vthr_real_get_value(vpiHandle ref, s_vpi_value*vp)
 		  if (val >= 0.0) val = floor(val + 0.5);
 		  else val = ceil(val - 0.5);
 	    }
-	    vp->value.integer = val;
+	    vp->value.integer = (PLI_INT32)val;
 	    break;
 
 	  case vpiDecStrVal: