# HG changeset patch
# User John W. Eaton <jwe@octave.org>
# Date 1673652444 18000
# Node ID 1c9143a5b5d602f4d084e7f1aed887cb9c935d75
# Parent  06bd4e4d4a92aa0cae0b638ef77044ae6dc4894f
delete unused function cleanup_statement_list

* parse.h, oct-parse.yy (cleanup_statement_list):
Delete unused function and declaration.

diff -r 06bd4e4d4a92 -r 1c9143a5b5d6 libinterp/parse-tree/oct-parse.yy
--- a/libinterp/parse-tree/oct-parse.yy	Fri Jan 13 18:24:51 2023 -0500
+++ b/libinterp/parse-tree/oct-parse.yy	Fri Jan 13 18:27:24 2023 -0500
@@ -6406,16 +6406,6 @@
   return retval;
 }
 
-  void
-  cleanup_statement_list (tree_statement_list **lst)
-  {
-    if (*lst)
-      {
-        delete *lst;
-        *lst = nullptr;
-      }
-  }
-
 DEFMETHOD (eval, interp, args, nargout,
            doc: /* -*- texinfo -*-
 @deftypefn  {} {} eval (@var{try})
diff -r 06bd4e4d4a92 -r 1c9143a5b5d6 libinterp/parse-tree/parse.h
--- a/libinterp/parse-tree/parse.h	Fri Jan 13 18:24:51 2023 -0500
+++ b/libinterp/parse-tree/parse.h	Fri Jan 13 18:27:24 2023 -0500
@@ -950,9 +950,6 @@
 extern OCTINTERP_API octave_value_list
 feval (const octave_value_list& args, int nargout = 0);
 
-extern OCTINTERP_API void
-cleanup_statement_list (tree_statement_list **lst);
-
 OCTAVE_END_NAMESPACE(octave)
 
 #endif