[SCM] gawk branch, feature/mdim-start-again, updated. gawk-4.1.0-4761-g4585a0b3

[Arnold Robbins]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "gawk".

The branch, feature/mdim-start-again has been updated
       via  4585a0b3090e686493f6f74df9224a5dd36a15e8 (commit)
      from  72aee849f9ea9b979118a17b7cddb6d3eff85027 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
http://git.sv.gnu.org/cgit/gawk.git/commit/?id=4585a0b3090e686493f6f74df9224a5dd36a15e8

commit 4585a0b3090e686493f6f74df9224a5dd36a15e8
Author: Arnold D. Robbins <arnold@skeeve.com>
Date:   Sun Jul 3 21:11:54 2022 +0300

    Additional fix.

diff --git a/ChangeLog b/ChangeLog
index 51e5f56f..e144cfd4 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2022-07-03         Arnold D. Robbins     <arnold@skeeve.com>
+
+       * awk.h (TOP_SCALAR): Put converted value back on the stack
+       for any subsequent use.
+
 2022-06-30         Arnold D. Robbins     <arnold@skeeve.com>
 
        * awk.h (POP_SCALAR): Convert Node_elem_new into a scalar.
diff --git a/awk.h b/awk.h
index 19da68fa..74d8e996 100644
--- a/awk.h
+++ b/awk.h
@@ -1895,8 +1895,10 @@ TOP_SCALAR()
 
        if (t->type == Node_var_array)
                fatal(_("attempt to use array `%s' in a scalar context"), 
array_vname(t));
-       else if (t->type == Node_elem_new)
-               t = elem_new_to_scalar(t);
+       else if (t->type == Node_elem_new) {
+               t = elem_new_to_scalar(t);      // fix it up
+               REPLACE(t);                     // put it back on the stack
+       }
 
        return t;
 }

-----------------------------------------------------------------------

Summary of changes:
 ChangeLog | 5 +++++
 awk.h     | 6 ++++--
 2 files changed, 9 insertions(+), 2 deletions(-)


hooks/post-receive
-- 
gawk