From 985fb6886d58a6f0dabfa0417bacb4be2890e0bd Mon Sep 17 00:00:00 2001
From: gdiso <gdiso>
Date: Tue, 1 May 2007 03:41:09 +0000
Subject: [PATCH] bug fix

---
 src/ciderlib/oned/onedest.c | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/src/ciderlib/oned/onedest.c b/src/ciderlib/oned/onedest.c
index 02227e912..9b24ed76c 100644
--- a/src/ciderlib/oned/onedest.c
+++ b/src/ciderlib/oned/onedest.c
@@ -53,15 +53,15 @@ ONEdestroy(ONEdevice *pDevice)
 
   /* destroy the mesh */
   if (pDevice->elemArray) {
-    for (eIndex = 1; eIndex < pDevice->numNodes; eIndex++) {
+    for (eIndex = 1; eIndex < pDevice->numNodes-1; eIndex++) {
       pElem = pDevice->elemArray[eIndex];
-      for (index = 0; index <= 2; index++) {
+      pEdge = pElem->pEdge;
+      FREE(pEdge);
+      for (index = 0; index <= 1; index++) {
 	if (pElem->evalNodes[index]) {
 	  pNode = pElem->pNodes[index];
 	  FREE(pNode);
 	}
-	pEdge = pElem->pEdge;
-	FREE(pEdge);
       }
       FREE(pElem);
     }