gnulib: define the path to gnulib's parent dir
[binutils-gdb.git] / gdb / ada-exp.h
index 0b6f1f22e79caef649756e30e587ccdb0fd5c195..598dc7072ad788915439af914dcee09e09f47569 100644 (file)
@@ -1,6 +1,6 @@
 /* Definitions for Ada expressions
 
-   Copyright (C) 2020 Free Software Foundation, Inc.
+   Copyright (C) 2020, 2021 Free Software Foundation, Inc.
 
    This file is part of GDB.
 
@@ -352,7 +352,7 @@ public:
                            enum noside noside) override;
 
   const block *get_block () const
-  { return std::get<1> (m_storage); }
+  { return std::get<0> (m_storage).block; }
 
   bool resolve (struct expression *exp,
                bool deprocedure_p,
@@ -510,11 +510,12 @@ public:
      type, evaluate an assignment of this aggregate's value to LHS.
      CONTAINER is an lvalue containing LHS (possibly LHS itself).
      Does not modify the inferior's memory, nor does it modify the
-     contents of LHS (unless == CONTAINER).  */
+     contents of LHS (unless == CONTAINER).  Returns the modified
+     CONTAINER.  */
 
-  void assign_aggregate (struct value *container,
-                        struct value *lhs,
-                        struct expression *exp);
+  value *assign_aggregate (struct value *container,
+                          struct value *lhs,
+                          struct expression *exp);
 
   value *evaluate (struct type *expect_type,
                   struct expression *exp,