commit 48497d85e3b839b65d3376fcb8d345680ba68926
author Tom Tromey <tromey@adacore.com> Thu Mar 14 12:13:30 2024 -0600
committer Tom Tromey <tromey@adacore.com> Tue Apr 02 11:24:27 2024 -0600
tree cda19cf37192c5054285b31cf88fdaf17696b2ec
parent b64e3e1c36eec33cd535cee7ff65de0e3e826e31

Move "int_storage" global into ada_parse_state

This patch moves the "int_storage" global into ada_parse_state.

gdb/ada-exp.y

diff --git a/gdb/ada-exp.y b/gdb/ada-exp.y
index 80c1edc..cb0618c 100644
--- a/gdb/ada-exp.y
+++ b/gdb/ada-exp.y
@@ -75,8 +75,19 @@
 
   std::string find_completion_bounds ();
 
+  const gdb_mpz *push_integer (gdb_mpz &&val)
+  {
+    auto &result = m_int_storage.emplace_back (new gdb_mpz (std::move (val)));
+    return result.get ();
+  }
+
 private:
 
+  /* We don't have a good way to manage non-POD data in Yacc, so store
+     values here.  The storage here is only valid for the duration of
+     the parse.  */
+  std::vector<std::unique_ptr<gdb_mpz>> m_int_storage;
+
   /* The original expression string.  */
   const char *m_original_expr;
 };
@@ -85,11 +96,6 @@
 
 static ada_parse_state *ada_parser;
 
-/* We don't have a good way to manage non-POD data in Yacc, so store
-   values here.  The storage here is only valid for the duration of
-   the parse.  */
-static std::vector<std::unique_ptr<gdb_mpz>> int_storage;
-
 int yyparse (void);
 
 static int yylex (void);
@@ -1252,7 +1258,6 @@
   obstack_init (&temp_parse_space);
   components.clear ();
   associations.clear ();
-  int_storage.clear ();
   assignments.clear ();
   iterated_associations.clear ();
 

gdb/ada-lex.l

diff --git a/gdb/ada-lex.l b/gdb/ada-lex.l
index e1abf9a..109b95c 100644
--- a/gdb/ada-lex.l
+++ b/gdb/ada-lex.l
@@ -465,8 +465,7 @@
       return FLOAT;
     }
 
-  const gdb_mpz *value
-    = int_storage.emplace_back (new gdb_mpz (std::move (result))).get ();
+  const gdb_mpz *value = ada_parser->push_integer (std::move (result));
 
   int int_bits = gdbarch_int_bit (par_state->gdbarch ());
   int long_bits = gdbarch_long_bit (par_state->gdbarch ());