Index: /trunk/psLib/src/collections/psSort.c
===================================================================
--- /trunk/psLib/src/collections/psSort.c	(revision 667)
+++ /trunk/psLib/src/collections/psSort.c	(revision 668)
@@ -14,6 +14,6 @@
  *  @author Ross Harman, MHPCC
  *   
- *  @version $Revision: 1.7 $ $Name: not supported by cvs2svn $
- *  @date $Date: 2004-05-12 18:07:22 $
+ *  @version $Revision: 1.8 $ $Name: not supported by cvs2svn $
+ *  @date $Date: 2004-05-13 20:25:00 $
  *
  *  Copyright 2004 Maui High Performance Computing Center, University of Hawaii
@@ -174,5 +174,4 @@
     float diff = 0.0f;
     psVector *tmpFloatVector = NULL;
-    psType tempType;
 
     if(outVector == NULL) {
@@ -198,6 +197,5 @@
     }
 
-    tempType.type = PS_TYPE_FLOAT;
-    tmpFloatVector = psVectorAlloc(tempType, inN);
+    tmpFloatVector = psVectorAlloc(PS_TYPE_FLOAT, inN);
     tmpFloatVector->n = inN;
     tmpFloatVector = psSort(tmpFloatVector, inVector);
Index: /trunk/psLib/src/collections/psVector.c
===================================================================
--- /trunk/psLib/src/collections/psVector.c	(revision 667)
+++ /trunk/psLib/src/collections/psVector.c	(revision 668)
@@ -19,6 +19,6 @@
  *  @author Ross Harman, MHPCC
  *   
- *  @version $Revision: 1.1 $ $Name: not supported by cvs2svn $
- *  @date $Date: 2004-05-12 18:07:22 $
+ *  @version $Revision: 1.2 $ $Name: not supported by cvs2svn $
+ *  @date $Date: 2004-05-13 20:25:00 $
  *
  *  Copyright 2004 Maui High Performance Computing Center, University of Hawaii
@@ -91,12 +91,10 @@
 /* FUNCTION IMPLEMENTATION - PUBLIC                                          */
 /*****************************************************************************/
-psVector* psVectorAlloc(psType type, int nalloc)
-{
+psVector* psVectorAlloc(psElemType elemType, int nalloc)
+{
+    psVector *psVec = NULL;
     psElemType vecType = 0;
-    psDimen vecDim = 0;
-    psVector *psVec = NULL;
-
-    vecType = type.type;
-    vecDim =  type.dimen;
+
+    vecType = elemType;
 
     // Invalid nalloc
@@ -159,6 +157,12 @@
     vecType = psVec->type.type;
 
+    // Invalid nalloc
+    if(nalloc < 0) {
+        psError(__func__, " : Line %d - Invalid value for nalloc. nalloc: %d\n", __LINE__, nalloc);
+        return NULL;
+    }
+
     if(psVec == NULL) {                                 // For creating new psVector
-        psVec = psVectorAlloc(psVec->type, nalloc);
+        psVec = psVectorAlloc(psVec->type.type, nalloc);
     } else if(psVec->nalloc != nalloc) {                // No need to realloc to same size
         switch (vecType) {
Index: /trunk/psLib/src/mathtypes/psVector.c
===================================================================
--- /trunk/psLib/src/mathtypes/psVector.c	(revision 667)
+++ /trunk/psLib/src/mathtypes/psVector.c	(revision 668)
@@ -19,6 +19,6 @@
  *  @author Ross Harman, MHPCC
  *   
- *  @version $Revision: 1.1 $ $Name: not supported by cvs2svn $
- *  @date $Date: 2004-05-12 18:07:22 $
+ *  @version $Revision: 1.2 $ $Name: not supported by cvs2svn $
+ *  @date $Date: 2004-05-13 20:25:00 $
  *
  *  Copyright 2004 Maui High Performance Computing Center, University of Hawaii
@@ -91,12 +91,10 @@
 /* FUNCTION IMPLEMENTATION - PUBLIC                                          */
 /*****************************************************************************/
-psVector* psVectorAlloc(psType type, int nalloc)
-{
+psVector* psVectorAlloc(psElemType elemType, int nalloc)
+{
+    psVector *psVec = NULL;
     psElemType vecType = 0;
-    psDimen vecDim = 0;
-    psVector *psVec = NULL;
-
-    vecType = type.type;
-    vecDim =  type.dimen;
+
+    vecType = elemType;
 
     // Invalid nalloc
@@ -159,6 +157,12 @@
     vecType = psVec->type.type;
 
+    // Invalid nalloc
+    if(nalloc < 0) {
+        psError(__func__, " : Line %d - Invalid value for nalloc. nalloc: %d\n", __LINE__, nalloc);
+        return NULL;
+    }
+
     if(psVec == NULL) {                                 // For creating new psVector
-        psVec = psVectorAlloc(psVec->type, nalloc);
+        psVec = psVectorAlloc(psVec->type.type, nalloc);
     } else if(psVec->nalloc != nalloc) {                // No need to realloc to same size
         switch (vecType) {