Mercurial > octave

diff src/ifft2.cc @ 1086:75fc98220389

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1995-01-31 04:17:15 by jwe]
author jwe
date Tue, 31 Jan 1995 04:17:15 +0000
parents dfe01093f657
children b6360f2d4fa6
line wrap: on
line diff
--- a/src/ifft2.cc	Tue Jan 31 04:17:15 1995 +0000
+++ b/src/ifft2.cc	Tue Jan 31 04:17:15 1995 +0000
@@ -57,14 +57,26 @@
 
   int n_rows = arg.rows ();
   if (nargin > 1)
-    n_rows = NINT (args(1).double_value ());
+    {
+      double dval = args(1).double_value ();
+      if (xisnan (dval))
+	error ("fft2: NaN is invalid as N_ROWS");
+      else
+	n_rows = NINT (dval);
+    }
 
   if (error_state)
     return retval;
 
   int n_cols = arg.columns ();
   if (nargin > 2)
-    n_cols = NINT (args(2).double_value ());
+    {
+      double dval = args(2).double_value ();
+      if (xisnan (dval))
+	error ("fft2: NaN is invalid as N_COLS");
+      else
+	n_cols = NINT (dval);
+    }
 
   if (error_state)
     return retval;