Mercurial > hg > octave-nkf

diff liboctave/DASSL.cc @ 4429:c1f6200b5f0e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2003-06-17 04:36:08 by jwe]
author jwe
date Tue, 17 Jun 2003 04:36:08 +0000
parents 5719210fff4c
children 6f3382e08a52
line wrap: on
line diff
--- a/liboctave/DASSL.cc
+++ b/liboctave/DASSL.cc
@@ -140,7 +140,7 @@
 
       int n = size ();
 
-      liw = 20 + n;
+      liw = 21 + n;
       lrw = 40 + 9*n + n*n;
 
       nn = n;
@@ -219,6 +219,14 @@
       else
 	info(7) = 0;
 
+      if (step_limit () >= 0)
+	{
+	  info(11) = 1;
+	  iwork(20) = step_limit ();
+	}
+      else
+	info(11) = 0;
+
       int maxord = maximum_order ();
       if (maxord >= 0)
 	{