[SCM] gawk branch, gawk-5.3-stable, updated. gawk-4.1.0-5589-gaae09361

[John Malmberg]

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, gawk-5.3-stable has been updated
       via  aae09361325903b2e4519e81e1218f593eb70792 (commit)
      from  957cd54abf4a5a743235d20f2775d2d8ab507299 (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=aae09361325903b2e4519e81e1218f593eb70792

commit aae09361325903b2e4519e81e1218f593eb70792
Author: John E. Malmberg <wb8tyw@qsl.net>
Date:   Fri Jan 3 19:31:00 2025 -0600

    OpenVMS actutally fix vms_fwrite.c and colontest

diff --git a/vms/ChangeLog b/vms/ChangeLog
index be1a8543..903e10c0 100644
--- a/vms/ChangeLog
+++ b/vms/ChangeLog
@@ -1,3 +1,8 @@
+2025-01-03         John E. Malmberg      <wb8tyw@qsl.net>
+
+    * vms_fwrite: Fix alloca define conflict
+       * vmstest.com: Fix colontest properly.
+
 2025-01-01         John E. Malmberg      <wb8tyw@qsl.net>
 
        First build on OpenVMS 9.2-2 x86_64
@@ -6,7 +11,6 @@
        * pcsi_product_gawk.com: Support MMS if MMK not present
        * make_pcsi_gawk_kit_name.com: Support x86_64 hardware
        * vmstest.com: Fix colontest, skip profile2 for VMS bug.
-       * vms_fwrite: Fix alloca define conflict
 
 2024-12-15         Arnold D. Robbins     <arnold@skeeve.com>
 
diff --git a/vms/vms_fwrite.c b/vms/vms_fwrite.c
index f2e53cdc..059e4d9b 100644
--- a/vms/vms_fwrite.c
+++ b/vms/vms_fwrite.c
@@ -165,6 +165,9 @@ tty_fwrite( const void *buf, size_t size, size_t number, 
FILE *file )
            result = result * number / size;    /*(same as 'result = number')*/
        } else {
 #ifdef NO_ALLOCA
+#ifdef alloca
+#undef alloca
+#endif
 # define alloca(n) ((n) <= abuf_siz ? abuf : \
                    ((abuf_siz > 0 ? (free(abuf),0) : 0), \
                     (abuf = malloc(abuf_siz = (n)+20))))
diff --git a/vms/vmstest.com b/vms/vmstest.com
index 16b8ea30..a042764b 100644
--- a/vms/vmstest.com
+++ b/vms/vmstest.com
@@ -366,7 +366,7 @@ $           return
 $!
 $mpfr:
 $              test_class = "mpfr"
-$              skip_reason = "Not yet implmented on VMS"
+$              skip_reason = "Not yet implemented on VMS"
 $              ! mpfr has not yet been ported to VMS.
 $              gosub junit_report_skip
 $              return
@@ -780,7 +780,7 @@ $   append -
           sys$disk:[]_'test'_2.tmp,sys$disk:[]_'test'_2.err,-
           sys$disk:[]_'test'_3.tmp -
           _'test'_3.err
-$      cmp 'test'.ok sys$disk:[]_'test'.err;1
+$      cmp 'test'.ok sys$disk:[]_'test'_3.err;1
 $      if $status
 $      then
 $          rm _'test'*.tmp;*
@@ -1440,7 +1440,7 @@ $ ! this test could fail on slow machines or on a second 
boundary,
 $      ! so if it does, double check the actual results
 $      ! This test needs SYS$TIMEZONE_NAME and SYS$TIMEZONE_RULE
 $      ! to be properly defined.
-$      ! This test now needs GNV Corutils to work
+$      ! This test now needs GNV Coreutils to work
 $      date_bin = "gnv$gnu:[bin]gnv$date.exe"
 $      if f$search(date_bin) .eqs. ""
 $      then
@@ -3074,7 +3074,7 @@ $rsstart3:
 $      echo "rsstart3"
 $      test_class = "gawk_ext"
 $!      rsstart3 with pipe fails,
-$!     presumeably due to PIPE's use of print file format
+$!     presumably due to PIPE's use of print file format
 $!     if .not.pipeok
 $!     then    echo "Without the PIPE command, ''test' can't be run."
 $!             On warning then  return
@@ -3140,7 +3140,7 @@ $ if test.eqs."rtlenmb" then  GAWKLOCALE = "en_US.UTF-8"
 $      pipe -
        gawk -- "BEGIN {printf ""0\n\n\n1\n\n\n\n\n2\n\n""; exit}" | -
        gawk -- "BEGIN {RS=""""}; {print length(RT)}" >_'test'.tmp
-$      if test.eqs."rtlenmb" then  delet_/Symbol/Local GAWKLOCALE
+$      if test.eqs."rtlenmb" then  delete/Symbol/Local GAWKLOCALE
 $      if test.eqs."rtlenmb" then  f = "rtlen.ok"
 $      if f$search("sys$disk:[]_''test'.tmp;2") .nes. ""
 $      then

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

Summary of changes:
 vms/ChangeLog    |  6 +++++-
 vms/vms_fwrite.c |  3 +++
 vms/vmstest.com  | 10 +++++-----
 3 files changed, 13 insertions(+), 6 deletions(-)


hooks/post-receive
-- 
gawk