From 3b7ebf6aa2bcbd10c1119064f4481095b3e4d186 Mon Sep 17 00:00:00 2001
From: Cary R <cygcary@yahoo.com>
Date: Sun, 20 Dec 2015 12:27:41 -0800
Subject: [PATCH] If ret is already defined then don't overwrite it.

---
 pform.cc | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/pform.cc b/pform.cc
index 2f3431589..2b9e2f9a9 100644
--- a/pform.cc
+++ b/pform.cc
@@ -2777,7 +2777,9 @@ vector<pform_tf_port_t>*pform_make_task_ports(const struct vlltype&loc,
 	    ret = do_make_task_ports(loc, pt, IVL_VT_CLASS, class_type, names);
       }
 
-      ret = do_make_task_ports(loc, pt, IVL_VT_NO_TYPE, vtype, names);
+      if (! ret) {
+	    ret = do_make_task_ports(loc, pt, IVL_VT_NO_TYPE, vtype, names);
+      }
 
       if (unpacked_dims) {
 	    for (list<perm_string>::iterator cur = names->begin()