Changeset 1947 for trunk/psLib/src/dataManip/psFunctions.c

Timestamp:

Oct 3, 2004, 2:40:23 PM (22 years ago)

Author:

gusciora

Message:

Added a spline deallocator.

File:

• trunk/psLib/src/dataManip/psFunctions.c (modified) (2 diffs)

trunk/psLib/src/dataManip/psFunctions.c

@@ -7 +7 @@
  *  polynomials.  It also contains a Gaussian functions.
  *
- *  @version $Revision: 1.44 $ $Name: not supported by cvs2svn $
- *  @date $Date: 2004-10-03 23:35:47 $
+ *  @version $Revision: 1.45 $ $Name: not supported by cvs2svn $
+ *  @date $Date: 2004-10-04 00:40:23 $
  *
  *  Copyright 2004 Maui High Performance Computing Center, University of Hawaii
@@ -1685 +1685 @@
 }
 
+// XXX: Have Robert put the dealocator in the memory file.
+int p_psSpline1DFree(psSpline1D *tmpSpline)
+{
+    int i;
+
+    if (tmpSpline == NULL) {
+        return(0);
+    }
+
+    if (tmpSpline->spline != NULL) {
+        for (i=0;i<tmpSpline->n;i++) {
+            psFree((tmpSpline->spline)[i]);
+        }
+        psFree(tmpSpline->spline);
+    }
+
+    if (tmpSpline->p_psDeriv2 != NULL) {
+        psFree(tmpSpline->p_psDeriv2);
+    }
+    psFree(tmpSpline->domains);
+    psFree(tmpSpline);
+
+    return(0);
+}
+
 /*****************************************************************************
  *****************************************************************************/