[SCM] gawk branch, egtests, updated. gawk-4.1.0-4330-g2b08d4d

[Antonio Giovanni Colombo]

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, egtests has been updated
       via  2b08d4d72f5c3eda133e6a6948b6b1c77f4cc011 (commit)
      from  2f1591328da7d908dba7d83497cc3f4554200d41 (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=2b08d4d72f5c3eda133e6a6948b6b1c77f4cc011

commit 2b08d4d72f5c3eda133e6a6948b6b1c77f4cc011
Author: Antonio Giovanni Colombo <azc100@gmail.com>
Date:   Thu Jun 24 10:54:27 2021 +0200

    Added test for isnumeric

diff --git a/egtests/ChangeLog b/egtests/ChangeLog
index 1eb1763..4369e99 100644
--- a/egtests/ChangeLog
+++ b/egtests/ChangeLog
@@ -1,3 +1,7 @@
+2021-06-24         Antonio Giovanni Colombo   <azc100@gmail.com>
+       * egtest: Updated for isnumeric.
+
+
 2021-05-19         Antonio Giovanni Colombo   <azc100@gmail.com>
        * info.txt: Updated.
        * info.html: Updated.
diff --git a/egtests/egtest b/egtests/egtest
index 6c3ddfc..9d5e3e4 100755
--- a/egtests/egtest
+++ b/egtests/egtest
@@ -402,6 +402,17 @@ do_inventory_shipped() {
        echo "*"
 }
 
+do_isnumeric() {
+       echo "*"
+       echo "* input file:"
+       echo "printf 
\"42\na.1\n123.456,78\n123,456.78\n12345678\nstring\n11\n011\n0x11\n0011\n42e4\n42E4\n0xf\nxg\n1xg\n\"
 > $testdata"
+             printf  
"42\na.1\n123.456,78\n123,456.78\n12345678\nstring\n11\n011\n0x11\n0011\n42e4\n42E4\n0xf\nxg\n1xg\n"
  > $testdata
+       echo "*"
+             echo '{ a=$0; result=isnumeric(a) ; if ( result==1 ) { print 
"#",a,"      is numeric" } else { print "#",a,"      is not numeric"} }' > 
$testpgm
+       echo "gawk -f $testpgm -f isnumeric.awk $testdata"
+             gawk -f $testpgm -f isnumeric.awk $testdata
+}
+
 do_join() {
        echo 'BEGIN {  for ( i=1; i<=9; i++ ) a[i]=i ; for ( i in a ) print 
a[i] ; print "* joining only from 2 to 8"; joined=join(a,2,8,"_|_"); print 
joined; exit; }' > $testpgm
        echo "*"

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

Summary of changes:
 egtests/ChangeLog |  4 ++++
 egtests/egtest    | 11 +++++++++++
 2 files changed, 15 insertions(+)


hooks/post-receive
-- 
gawk