Changeset 4308 for trunk/psLib/test/dataManip/tst_psVectorFFT.c

Timestamp:

Jun 17, 2005, 1:44:22 PM (21 years ago)

Author:

desonia

Message:

added enhancement to psFree so that it sets the reference being freed to
NULL (thanks Gus).

File:

• trunk/psLib/test/dataManip/tst_psVectorFFT.c (modified) (4 diffs)

trunk/psLib/test/dataManip/tst_psVectorFFT.c

@@ -6 +6 @@
 *  @author Robert DeSonia, MHPCC
 *
-*  @version $Revision: 1.16 $ $Name: not supported by cvs2svn $
-*  @date $Date: 2005-05-11 22:02:16 $
+*  @version $Revision: 1.17 $ $Name: not supported by cvs2svn $
+*  @date $Date: 2005-06-17 23:44:22 $
 *
 *  Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii
@@ -474 +474 @@
 
     psFree( vec );
-    psFree( vec2 );
 
     // Perform conjugate for non-complex number
@@ -509 +508 @@
     for ( psU32 n = 0; n < 100; n++ ) {
         if ( fabsf( crealf(vec->data.C64[n]) - crealf(vec2->data.C64[n])) > FLT_EPSILON ||
-                fabsf( cimagf(vec->data.C64[n]) - cimagf(vec2->data.C64[n])) > FLT_EPSILON ) {
+                fabsf( cimagf(vec->data.C64[n]) + cimagf(vec2->data.C64[n])) > FLT_EPSILON ) {
             psError(PS_ERR_UNKNOWN,true,"psVectorConjugate result is invalid (n=%d)",n);
             return 13;
@@ -516 +515 @@
     psFree(vec);
 
-    // Perform vector conjugate with null input
-    if ( psVectorConjugate(NULL,NULL) != NULL) {
+    // Perform vector conjugate with null input (vec2 should be freed too)
+    if ( psVectorConjugate(vec2,NULL) != NULL) {
         psError(PS_ERR_UNKNOWN,true,"Did not return NULL with null input vector");
         return 61;