Index: trunk/psLib/src/collections/psScalar.c
===================================================================
--- trunk/psLib/src/collections/psScalar.c	(revision 3264)
+++ trunk/psLib/src/collections/psScalar.c	(revision 4330)
@@ -8,6 +8,6 @@
  *  @author Ross Harman, MHPCC
  *
- *  @version $Revision: 1.14 $ $Name: not supported by cvs2svn $
- *  @date $Date: 2005-02-17 19:26:23 $
+ *  @version $Revision: 1.15 $ $Name: not supported by cvs2svn $
+ *  @date $Date: 2005-06-21 03:01:37 $
  *
  *  Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii
@@ -80,10 +80,10 @@
 }
 
-psScalar* psScalarCopy(psScalar *scalar)
+psScalar* psScalarCopy(const psScalar *value)
 {
     psElemType dataType;
     psScalar *newScalar = NULL;
 
-    if (scalar == NULL) {
+    if (value == NULL) {
         psError(PS_ERR_BAD_PARAMETER_NULL, true,
                 PS_ERRORTEXT_psScalar_COPY_NULL);
@@ -91,41 +91,41 @@
     }
 
-    dataType = scalar->type.type;
+    dataType = value->type.type;
     switch (dataType) {
     case PS_TYPE_S8:
-        newScalar =  psScalarAlloc(scalar->data.S8, dataType);
+        newScalar =  psScalarAlloc(value->data.S8, dataType);
         break;
     case PS_TYPE_U8:
-        newScalar =  psScalarAlloc(scalar->data.U8, dataType);
+        newScalar =  psScalarAlloc(value->data.U8, dataType);
         break;
     case PS_TYPE_S16:
-        newScalar =  psScalarAlloc(scalar->data.S16, dataType);
+        newScalar =  psScalarAlloc(value->data.S16, dataType);
         break;
     case PS_TYPE_U16:
-        newScalar =  psScalarAlloc(scalar->data.U16, dataType);
+        newScalar =  psScalarAlloc(value->data.U16, dataType);
         break;
     case PS_TYPE_S32:
-        newScalar =  psScalarAlloc(scalar->data.S32, dataType);
+        newScalar =  psScalarAlloc(value->data.S32, dataType);
         break;
     case PS_TYPE_U32:
-        newScalar =  psScalarAlloc(scalar->data.U32, dataType);
+        newScalar =  psScalarAlloc(value->data.U32, dataType);
         break;
     case PS_TYPE_S64:
-        newScalar =  psScalarAlloc(scalar->data.S64, dataType);
+        newScalar =  psScalarAlloc(value->data.S64, dataType);
         break;
     case PS_TYPE_U64:
-        newScalar =  psScalarAlloc(scalar->data.U64, dataType);
+        newScalar =  psScalarAlloc(value->data.U64, dataType);
         break;
     case PS_TYPE_F32:
-        newScalar =  psScalarAlloc(scalar->data.F32, dataType);
+        newScalar =  psScalarAlloc(value->data.F32, dataType);
         break;
     case PS_TYPE_F64:
-        newScalar =  psScalarAlloc(scalar->data.F64, dataType);
+        newScalar =  psScalarAlloc(value->data.F64, dataType);
         break;
     case PS_TYPE_C32:
-        newScalar =  psScalarAlloc(scalar->data.C32, dataType);
+        newScalar =  psScalarAlloc(value->data.C32, dataType);
         break;
     case PS_TYPE_C64:
-        newScalar =  psScalarAlloc(scalar->data.C64, dataType);
+        newScalar =  psScalarAlloc(value->data.C64, dataType);
         break;
     default:
