# HG changeset patch
# User John W. Eaton <jwe@octave.org>
# Date 1629263332 14400
# Node ID c4bc77a90fb52bcf22f5108192f88ada26916ba2
# Parent  4628ae890642e42c0f1b5996f472342842510b9e
move lsode functions to octave namespace and make local functions static

There is no public header file for the functions defined in
lsode.cc so making all local functions in that file static should
not affect users.

* lsode.cc: Move all functions inside octave namespace.  Declare
all local functions static.

diff -r 4628ae890642 -r c4bc77a90fb5 libinterp/corefcn/lsode.cc
--- a/libinterp/corefcn/lsode.cc	Wed Aug 18 01:06:35 2021 -0400
+++ b/libinterp/corefcn/lsode.cc	Wed Aug 18 01:08:52 2021 -0400
@@ -49,6 +49,8 @@
 
 #include "LSODE-opts.cc"
 
+OCTAVE_NAMESPACE_BEGIN
+
 // Global pointer for user defined function required by lsode.
 static octave_value lsode_fcn;
 
@@ -62,7 +64,7 @@
 // Is this a recursive call?
 static int call_depth = 0;
 
-ColumnVector
+static ColumnVector
 lsode_user_function (const ColumnVector& x, double t)
 {
   ColumnVector retval;
@@ -102,7 +104,7 @@
   return retval;
 }
 
-Matrix
+static Matrix
 lsode_user_jacobian (const ColumnVector& x, double t)
 {
   Matrix retval;
@@ -142,8 +144,6 @@
   return retval;
 }
 
-OCTAVE_NAMESPACE_BEGIN
-
 DEFMETHOD (lsode, interp, args, nargout,
            doc: /* -*- texinfo -*-
 @deftypefn  {} {[@var{x}, @var{istate}, @var{msg}] =} lsode (@var{fcn}, @var{x_0}, @var{t})