Index: trunk/psLib/src/collections/psVector.c
===================================================================
--- trunk/psLib/src/collections/psVector.c	(revision 1920)
+++ trunk/psLib/src/collections/psVector.c	(revision 2006)
@@ -10,6 +10,6 @@
 *  @author Robert DeSonia, MHPCC
 *
-*  @version $Revision: 1.27 $ $Name: not supported by cvs2svn $
-*  @date $Date: 2004-09-28 23:26:48 $
+*  @version $Revision: 1.28 $ $Name: not supported by cvs2svn $
+*  @date $Date: 2004-10-07 19:51:30 $
 *
 *  Copyright 2004 Maui High Performance Computing Center, University of Hawaii
@@ -96,4 +96,13 @@
     }
 
+    if (in->type.dimen !=  PS_DIMEN_VECTOR &&
+            in->type.dimen !=  PS_DIMEN_TRANSV) {
+        psFree(in);
+        psErrorMsg(PS_ERRORNAME_DOMAIN "psVectorRecycle",
+                   PS_ERR_BAD_PARAMETER_TYPE, true,
+                   PS_ERRORTEXT_psVector_NOT_A_VECTOR);
+        return NULL;
+    }
+
     byteSize = n * PSELEMTYPE_SIZEOF(type);
 
@@ -104,7 +113,7 @@
     }
 
+    in->type.dimen = PS_DIMEN_VECTOR;
     in->type.type = type;
     in->n = n;
-
     return in;
 }