Mercurial > hg > octave-jordi

diff src/npsol.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/npsol.cc
+++ b/src/npsol.cc
@@ -729,8 +729,15 @@
 	  if (list->d_set_fcn)
 	    (npsol_opts.*list->d_set_fcn) (val);
 	  else
-	    (npsol_opts.*list->i_set_fcn) (NINT (val));
-
+	    {
+	      if (xisnan (val))
+		{
+		  error ("npsol_options: %s: expecting integer, found NaN",
+			 keyword);
+		}
+	      else
+		(npsol_opts.*list->i_set_fcn) (NINT (val));
+	    }
 	  return;
 	}
       list++;