Mercurial > octave

changeset 158:76926a2d39a6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1993-10-13 20:48:27 by jwe] (npsol): Call error(), not message(), to print error messages. (linear_constraints_ok): Likewise. (nonlinear_constraints_ok): Likewise.
author jwe
date Wed, 13 Oct 1993 20:48:27 +0000
parents 94aa0774c417
children abc5f0a0785f
files src/npsol.cc
diffstat 1 files changed, 12 insertions(+), 12 deletions(-) [+]
line wrap: on
line diff
--- a/src/npsol.cc	Wed Oct 13 20:45:04 1993 +0000
+++ b/src/npsol.cc	Wed Oct 13 20:48:27 1993 +0000
@@ -85,7 +85,7 @@
       else
 	{
 	  delete [] tmp;
-	  message ("npsol", "error evaluating objective function");
+	  error ("npsol: error evaluating objective function");
 	  jump_to_top_level ();
 	}
     }
@@ -153,7 +153,7 @@
       else
 	{
 	  delete [] tmp;
-	  message ("npsol", "error evaluating constraints");
+	  error ("npsol: error evaluating constraints");
 	  jump_to_top_level ();
 	}
     }
@@ -178,14 +178,14 @@
       if (c_rows == 0 || c_cols == 0 || llb_len == 0 || lub_len == 0)
 	{
 	  ok = 0;
-	  message (warn_for,
-		   "linear constraints must have nonzero dimensions");
+	  error ("%s: linear constraints must have nonzero dimensions",
+		 warn_for);
 	}
       else if (x_len != c_cols || llb_len != lub_len || llb_len != c_rows)
 	{
 	  ok = 0;
-	  message (warn_for,
-		   "linear constraints have inconsistent dimensions");
+	  error ("%s: linear constraints have inconsistent dimensions",
+		 warn_for);
 	}
     }
 
@@ -208,14 +208,14 @@
       if (nllb_len == 0 || nlub_len == 0 || c_len == 0)
 	{
 	  ok = 0;
-	  message (warn_for,
-		   "nonlinear constraints have nonzero dimensions");
+	  error ("%s: nonlinear constraints have nonzero dimensions",
+		 warn_for);
 	}
       else if (nllb_len != nlub_len || nllb_len != c_len)
 	{
 	  ok = 0;
-	  message (warn_for,
-		   "nonlinear constraints have inconsistent dimensions");
+	  error ("%s: nonlinear constraints have inconsistent dimensions"
+		 warn_for,);
 	}
     }
   return ok;
@@ -247,7 +247,7 @@
 
   if (x.capacity () == 0)
     {
-      message ("npsol", "expecting vector as first argument");
+      error ("npsol: expecting vector as first argument");
       return retval;
     }
 
@@ -270,7 +270,7 @@
       int ub_len = ub.capacity ();
       if (lb_len != ub_len || lb_len != x.capacity ())
 	{
-	  message ("npsol", "lower and upper bounds and decision variable\n\
+	  error ("npsol: lower and upper bounds and decision variable\n\
        vector must all have the same number of elements");
 	  return retval;
 	}