diff --git a/parse.y b/parse.y
index 646db0715..d8ec3cc94 100644
--- a/parse.y
+++ b/parse.y
@@ -959,7 +959,7 @@ data_type /* IEEE1800-2005: A.2.2.1 */
       }
   | K_time
       { list<pform_range_t>*pd = make_range_from_width(64);
-	vector_type_t*tmp = new vector_type_t(IVL_VT_LOGIC, true, pd);
+	vector_type_t*tmp = new vector_type_t(IVL_VT_LOGIC, false, pd);
 	tmp->reg_flag = true;
 	$$ = tmp;
       }
diff --git a/pform.cc b/pform.cc
index 432321af0..6accb14d8 100644
--- a/pform.cc
+++ b/pform.cc
@@ -2500,7 +2500,7 @@ vector<PWire*>*pform_make_task_ports(const struct vlltype&loc,
 	    return pform_make_task_ports(loc, pt, vec_type->base_type,
 					 vec_type->signed_flag,
 					 copy_range(vec_type->pdims.get()),
-					 names);
+					 names, vec_type->integer_flag);
       }
 
       if (/*real_type_t*real_type = */ dynamic_cast<real_type_t*> (vtype)) {