fixing build failure for BADVAL_USENAN=>1

PDLPorters · Aug 26, 2015 · e330452 · e330452
1 parent 56f403d
commit e330452
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/Basic/Core/Core.xs b/Basic/Core/Core.xs
@@ -707,8 +707,8 @@ at_bad_c(x,position)
    /* do we have to bother about NaN's? */
    if ( badflag &&
         ( ( x->datatype < PDL_F && ANYVAL_EQ_ANYVAL(result, pdl_get_badvalue(x->datatype)) ) ||
-          ( x->datatype == PDL_F && finite(pdl_val.value.F) == 0 ) ||
-          ( x->datatype == PDL_D && finite(pdl_val.value.D) == 0 ) )
+          ( x->datatype == PDL_F && finite(result.value.F) == 0 ) ||
+          ( x->datatype == PDL_D && finite(result.value.D) == 0 )
         )
       ) {
 	 RETVAL = newSVpvn( "BAD", 3 );