--- a/liboctave/DASSL.cc	Tue Jul 16 23:57:09 2002 +0000
+++ b/liboctave/DASSL.cc	Wed Jul 17 04:32:42 2002 +0000
@@ -56,9 +56,6 @@
 
 DASSL::DASSL (void) : DAE ()
 {
-  stop_time_set = false;
-  stop_time = 0.0;
-
   liw = 0;
   lrw = 0;
 
@@ -75,9 +72,6 @@
 {
   n = size ();
 
-  stop_time_set = false;
-  stop_time = 0.0;
-
   liw = 20 + n;
   lrw = 40 + 9*n + n*n;
 
@@ -92,9 +86,6 @@
 {
   n = size ();
 
-  stop_time_set = false;
-  stop_time = 0.0;
-
   DAEFunc::set_function (f.function ());
   DAEFunc::set_jacobian_function (f.jacobian_function ());
 
@@ -109,26 +100,6 @@
     info.elem (i) = 0;
 }
 
-void
-DASSL::force_restart (void)
-{
-  restart = 1;
-  integration_error = false;
-}
-
-void
-DASSL::set_stop_time (double tt)
-{
-  stop_time_set = true;
-  stop_time = tt;
-}
-
-void
-DASSL::clear_stop_time (void)
-{
-  stop_time_set = false;
-}
-
 int
 ddassl_f (const double& time, const double *state, const double *deriv,
 	  double *delta, int& ires, double *, int *)
@@ -192,7 +163,7 @@
 
   if (restart)
     {
-      restart = 0;
+      restart = false;
       info.elem (0) = 0;
     }
 
@@ -477,6 +448,21 @@
   return retval;
 }
 
+std::string
+DASSL::error_message (void) const
+{
+  std::string retval;
+
+  switch (idid)
+    {
+    default:
+      retval = "unknown error state";
+      break;
+    }
+
+  return retval;
+}
+
 /*
 ;;; Local Variables: ***
 ;;; mode: C++ ***