# HG changeset patch # User jwe # Date 940532140 0 # Node ID 2396decd33de4b8c1a3c6545bcadec9f68af8e8a # Parent 48872c196664b8c4acef38775e8ce8c4eaac0f50 [project @ 1999-10-21 18:55:36 by jwe] diff --git a/doc/interpreter/Makefile.in b/doc/interpreter/Makefile.in --- a/doc/interpreter/Makefile.in +++ b/doc/interpreter/Makefile.in @@ -40,7 +40,8 @@ FORMATTED = octave.dvi octave.ps octave.info octave.info-[0-9]* octave_*.html -DISTFILES = Makefile.in dir octave.1 $(SOURCES) $(TEXINFO) $(FORMATTED) +DISTFILES = Makefile.in dir munge-texi.cc octave.1 \ + $(SOURCES) $(TEXINFO) $(FORMATTED) ifeq ($(wildcard octave.info), ) BINDISTFILES = $(addprefix $(srcdir)/, octave.1 $(FORMATTED)) diff --git a/liboctave/ChangeLog b/liboctave/ChangeLog --- a/liboctave/ChangeLog +++ b/liboctave/ChangeLog @@ -1,3 +1,9 @@ +1999-10-21 John W. Eaton + + * DASSL.cc (DASSL::do_integrate (double)): If we have a function + to evaluate the Jacobian, set info(4), not iwork(4). + Set rwork(1) to the maximum step size, not rwork(2). + 1999-10-14 John W. Eaton * oct-time.cc: Include . diff --git a/liboctave/DASSL.cc b/liboctave/DASSL.cc --- a/liboctave/DASSL.cc +++ b/liboctave/DASSL.cc @@ -208,9 +208,9 @@ integration_error = 0; if (DAEFunc::jacobian_function ()) - iwork.elem (4) = 1; + info.elem (4) = 1; else - iwork.elem (4) = 0; + info.elem (4) = 0; double *px = x.fortran_vec (); double *pxdot = xdot.fortran_vec (); @@ -237,8 +237,8 @@ if (stop_time_set) { + rwork.elem (0) = stop_time; info.elem (3) = 1; - rwork.elem (0) = stop_time; } else info.elem (3) = 0; @@ -256,7 +256,7 @@ if (maximum_step_size () >= 0.0) { - rwork.elem (2) = maximum_step_size (); + rwork.elem (1) = maximum_step_size (); info.elem (6) = 1; } else