aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog37
-rw-r--r--Makefile.in2
-rw-r--r--NEWS12
-rw-r--r--README3
-rw-r--r--TODO207
-rw-r--r--awk.h1
-rw-r--r--builtin.c57
-rwxr-xr-xconfigure20
-rw-r--r--configure.ac2
-rw-r--r--doc/ChangeLog6
-rw-r--r--doc/gawk.110
-rw-r--r--doc/gawk.info733
-rw-r--r--doc/gawk.texi30
-rw-r--r--doc/gawktexi.in30
-rw-r--r--main.c4
-rw-r--r--str_array.c79
-rw-r--r--test/ChangeLog6
-rw-r--r--test/Makefile.am10
-rw-r--r--test/Makefile.in9
-rw-r--r--test/rand.ok2
-rw-r--r--test/randtest.ok0
-rwxr-xr-xtest/randtest.sh113
22 files changed, 976 insertions, 397 deletions
diff --git a/ChangeLog b/ChangeLog
index e6b3ea63..8199425d 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -5,6 +5,10 @@
* dfa.h, dfa.c: Sync with GNU grep; comment fix and copyright year.
* NEWS: Updated some, including copyright year.
+2013-12-26 Arnold D. Robbins <arnold@skeeve.com>
+
+ * README: Add John Malmberg for VMS.
+
2013-12-24 Arnold D. Robbins <arnold@skeeve.com>
* getopt.h: Add `defined(__sun)' to list of system that do get to
@@ -127,6 +131,11 @@
* main.c (main): Ignore SIGPIPE. See the comment in the code.
Thanks to Alan Broder for reporting the issue.
+ Unrelated:
+
+ * rand.c (do_rand): Fix computation and loop checking against
+ 1.0 to use do..while.
+
2013-10-16 Arnold D. Robbins <arnold@skeeve.com>
Make -O work again. Turns out that C99 bool variables
@@ -144,6 +153,11 @@
* re.c (resetup): Add a comment about the joy of syntax bits.
+ Unrelated:
+
+ * builtin.c (do_rand): If result is exactly 1.0, keep trying.
+ Thanks to Nelson Beebe.
+
2013-10-10 Arnold D. Robbins <arnold@skeeve.com>
* dfa.c (lex): Sync with GNU grep. Handle multibyte \s and \S.
@@ -163,6 +177,13 @@
* dfa.c: Sync with GNU grep.
+2013-09-25 Arnold D. Robbins <arnold@skeeve.com>
+
+ * builtin.c (do_rand): Make the result more random by calling
+ random() twice. See the comment in the code. Thanks to
+ Bob Jewett <jewett@bill.scs.agilent.com> for the report and
+ the fix.
+
2013-09-24 Arnold D. Robbins <arnold@skeeve.com>
* debug.c (find_rule): Handle case where lineno is zero. Can happen
@@ -244,6 +265,12 @@
* regcomp.c, regex.h, regex_internal.h: Sync with GLIBC.
+2013-08-22 Arnold D. Robbins <arnold@skeeve.com>
+
+ * str_array.c (env_store): If the new value being stored is NULL,
+ pass in "" instead. Avoids core dump on Mac OS X.
+ Thanks to Hermann Peifer for the bug report.
+
2013-08-20 Arnold D. Robbins <arnold@skeeve.com>
* nonposix.h: New file. Contains FAKE_FD_VALUE.
@@ -252,6 +279,16 @@
2013-08-18 Arnold D. Robbins <arnold@skeeve.com>
+ Reflect updates to ENVIRON into the real environment.
+
+ * awk.h (init_env_array): Add declaration.
+ * main.c (load_environ): Call init_env_array.
+ * str_array.c (env_remove, env_store, env_clear, init_env_array):
+ New functions.
+ (env_array_func): New array vtable.
+
+2013-08-18 Arnold D. Robbins <arnold@skeeve.com>
+
* array.c (force_array): Set symbol->xarray to NULL before
initing the array if it was Node_var_new.
(null_array): Restore assert, undoing change of 2013-05-27.
diff --git a/Makefile.in b/Makefile.in
index e87baa6a..25ee0da5 100644
--- a/Makefile.in
+++ b/Makefile.in
@@ -107,7 +107,7 @@ DIST_COMMON = INSTALL NEWS README AUTHORS ChangeLog \
$(srcdir)/Makefile.in $(srcdir)/Makefile.am \
$(top_srcdir)/configure $(am__configure_deps) \
$(srcdir)/configh.in mkinstalldirs ABOUT-NLS awkgram.c \
- command.c depcomp ylwrap $(include_HEADERS) COPYING \
+ command.c depcomp ylwrap $(include_HEADERS) COPYING TODO \
config.guess config.rpath config.sub install-sh missing
ACLOCAL_M4 = $(top_srcdir)/aclocal.m4
am__aclocal_m4_deps = $(top_srcdir)/m4/arch.m4 \
diff --git a/NEWS b/NEWS
index b3f65e7a..d3d002b4 100644
--- a/NEWS
+++ b/NEWS
@@ -4,6 +4,18 @@
are permitted in any medium without royalty provided the copyright
notice and this notice are preserved.
+Changes from 4.1.1 to 4.2.0
+---------------------------
+
+1. If not in POSIX mode, changes to ENVIRON are reflected into
+ gawk's environment, affecting any programs run by system()
+ or for piped redirections.
+
+2. The series of numbers returned by rand() should now be "more
+ random" than previously. Gawk's rand() remains repeatable; you will
+ get the same series of numbers each time you call rand() repeatedly,
+ but this will be a different series than previously.
+
Changes from 4.1.0 to 4.1.1
---------------------------
diff --git a/README b/README
index eaf11a44..56020870 100644
--- a/README
+++ b/README
@@ -89,6 +89,9 @@ VMS:
Pat Rankin
r.pat.rankin@gmail.com
+ John Malmberg
+ wb8tyw@gmail.com
+
z/OS (OS/390):
Dave Pitts
dpitts@cozx.com
diff --git a/TODO b/TODO
new file mode 100644
index 00000000..f7a10ba3
--- /dev/null
+++ b/TODO
@@ -0,0 +1,207 @@
+Thu Oct 24 22:11:44 IDT 2013
+============================
+
+There were too many files tracking different thoughts and ideas for
+things to do, or consider doing. This file merges them into one. As
+tasks are completed, they should be moved to the DONE section, below,
+or simply removed.
+
+Upon creation of a release (major or patch release), items from the
+previous release should be removed.
+
+This file should exist only in the master branch or branches based off
+of it for development, but not in the stable branch. This may require some
+careful work with Git.
+
+TODO
+====
+
+Minor Cleanups and Code Improvements
+------------------------------------
+
+ Review the bash source script for working with shared libraries in
+ order to nuke the use of libtool. [ Partially started in the
+ nolibtool branch. ]
+
+ Enhance profiling to save comments in a byte-code that does nothing
+ but that can be used when pretty printing the program.
+
+ API:
+ ??? #if !defined(GAWK) && !defined(GAWK_OMIT_CONVENIENCE_MACROS)
+
+ ?? Add debugger commands to reference card
+
+ Look at function order within files.
+
+ regex.h - remove underscores in param names
+
+ Consider removing use of and/or need for the protos.h file.
+
+ Recheck if gnulib regex can be dropped in
+
+ Fully synchronize whitespaces tests (for \s, \S in Unicode
+ environment) with those of GNU grep.
+
+Minor New Features
+------------------
+
+ Add a div() function to do integer division result. Needed
+ esp for MPFR with large ints.
+
+ Enhance extension/fork.c waitpid to allow the caller to specify
+ the options. And add an optional array argument to wait and
+ waitpid in which to return exit status information.
+
+ Consider relaxing the strictness of --posix.
+
+ Make it possible to put print/printf + redirections into
+ an expression.
+
+ Have pretty printing not run the program and nuke the
+ undocumented GAWK_NO_PP_RUN env var. Requires test suite
+ adjustments.
+
+ ? Add an optional base to strtonum, allowing 2-36.
+
+ ? Optional third argument for index indicating where to start the
+ search.
+
+Major New Features
+------------------
+
+ Think about how to generalize indirect access. Manuel Collado
+ suggests things like
+
+ foo = 5
+ @"foo" += 4
+
+ Also needed:
+
+ Indirect calls of built-ins
+ Indirect calls of extension functions
+ Indirect through array elements, not just scalar variables
+
+ Some way to make regexp constants first class citizens:
+ - Assign to variables
+ - Pass to functions
+ Tawk has this and it would also make indirect calling of builtins
+ work more reasonably. Probably would use a special syntax like
+ @/.../ for such objects.
+
+ Consider a typeof() function that returns a string (scalar, array,
+ regexp).
+
+ Fix the early chapters in the doc with more up-to-date examples.
+ No-one uses Bulletin Board Systems anymore.
+
+ Add ability to do decimal arithmetic.
+
+ Rework management of array index storage. (Partially DONE.)
+
+ Consider using an atom table for all string array indices.
+
+ DBM storage of awk arrays. Try to allow multiple dbm packages.
+
+ ?? A RECLEN variable for fixed-length record input. PROCINFO["RS"]
+ would be "RS" or "RECLEN" depending upon what's in use.
+ *** Could this be done as an extension?
+
+ ?? Use a new or improved dfa and/or regex library.
+
+ Rewrite in C++.
+
+Things To Think About That May Never Happen
+-------------------------------------------
+
+ Consider making shadowed variables a warning and not
+ a fatal warning when --lint=fatal.
+
+ Similar for extra parameters in a function call.
+
+ Look at code coverage tools, like S2E: https://s2e.epfl.ch/
+
+ Try running with diehard. See http://www.diehard-software.org,
+ https://github.com/emeryberger/DieHard
+
+ Implement namespaces. Arnold suggested the following in an email:
+ - Extend the definition of an 'identifier' to include "." as a valid character
+ although an identifier can't start with it.
+ - Extension libraries install functions and global variables with names
+ that have a "." in them: XML.parse(), XML.name, whatever.
+ - Awk code can read/write such variables and call such functions, but they
+ cannot define such functions
+ function XML.foo() { .. } # error
+ or create a variable with such a name if it doesn't exist. This would
+ be a run-time error, not a parse-time error.
+ - This last rule may be too restrictive.
+ I don't want to get into fancy rules a la perl and file-scope visibility
+ etc, I'd like to keep things simple. But how we design this is going
+ to be very important.
+
+ Include a sample rpm spec file in a new packaging subdirectory.
+
+ Patch lexer for @include and @load to make quotes optional.
+
+ ? Have strftime() pay attention to the value of ENVIRON["TZ"]
+
+ Add a lint check if the return value of a function is used but
+ the function did not supply a value.
+
+ Consider making gawk output +nan for NaN values so that it
+ will accept its own output as input.
+ NOTE: Investigated this. GLIBC formats NaN as '-nan'
+ and -NaN as 'nan'. Dealing with this is not simple.
+
+ Enhance FIELDWIDTHS with some way to indicate "the rest of the record".
+ E.g., a length of 0 or -1 or something. Maybe "n"?
+
+
+DONE
+====
+
+Minor Cleanups and Code Improvements
+------------------------------------
+
+Minor New Features
+------------------
+
+Major New Features
+------------------
+
+Things That We Decided We Will Never Do
+=======================================
+
+ Consider moving var_value info into Node_var itself to reduce
+ memory usage. This would break all uses of get_lhs in the
+ code. It's too sweeping a change.
+
+ Add macros for working with flags instead of using & and |
+ directly.
+
+ FIX regular field splitting to use FPAT algorithm.
+ Note: Looked at this. Not sure it's with the trouble:
+ If it ain't broke...
+
+ Scope IDs for IPv6 addresses
+
+ Gnulib
+
+ Make FIELDWIDTHS be an array?
+
+ "Do an optimization pass over parse tree?"
+ This isn't relevant now that we are using a byte code engine.
+
+ "Consider integrating Fred Fish's DBUG library into gawk."
+ I did this once as an experiment. But I don't see a lot of value
+ to this at this stage of the development. Stepping through things
+ in a debugger is generally enough. Also, I would have to try to
+ track down the latest version of this.
+
+ "Make awk '/foo/' files... run at egrep speeds (how?)"
+ This has been on the list since the early days (gawk 1.x or early
+ 2.x). But I am not sure how to really do this, nor have I done
+ timings, nor does there seem to be any real demand for this.
+
+ Change from dlopen to using the libltdl library (i.e. lt_dlopen).
+ This may support more platforms. If we move off of libtool
+ then this is the wrong direction.
diff --git a/awk.h b/awk.h
index 1414358c..e0964b94 100644
--- a/awk.h
+++ b/awk.h
@@ -1360,6 +1360,7 @@ extern NODE *do_aoption(int nargs);
extern NODE *do_asort(int nargs);
extern NODE *do_asorti(int nargs);
extern unsigned long (*hash)(const char *s, size_t len, unsigned long hsize, size_t *code);
+extern void init_env_array(NODE *env_node);
/* awkgram.c */
extern NODE *variable(int location, char *name, NODETYPE type);
extern int parse_program(INSTRUCTION **pcode);
diff --git a/builtin.c b/builtin.c
index 7a969cbc..b3e2962b 100644
--- a/builtin.c
+++ b/builtin.c
@@ -2377,6 +2377,8 @@ static char *const state = (char *const) istate;
NODE *
do_rand(int nargs ATTRIBUTE_UNUSED)
{
+ double tmprand;
+#define RAND_DIVISOR ((double)GAWK_RANDOM_MAX+1.0)
if (firstrand) {
(void) initstate((unsigned) 1, state, SIZEOF_STATE);
/* don't need to srandom(1), initstate() does it for us. */
@@ -2388,7 +2390,60 @@ do_rand(int nargs ATTRIBUTE_UNUSED)
*
* 0 <= n < 1
*/
- return make_number((AWKNUM) (random() % GAWK_RANDOM_MAX) / GAWK_RANDOM_MAX);
+ /*
+ * Date: Wed, 28 Aug 2013 17:52:46 -0700
+ * From: Bob Jewett <jewett@bill.scs.agilent.com>
+ *
+ * Call random() twice to fill in more bits in the value
+ * of the double. Also, there is a bug in random() such
+ * that when the values of successive values are combined
+ * like (rand1*rand2)^2, (rand3*rand4)^2, ... the
+ * resulting time series is not white noise. The
+ * following also seems to fix that bug.
+ *
+ * The add/subtract 0.5 keeps small bits from filling
+ * below 2^-53 in the double, not that anyone should be
+ * looking down there.
+ *
+ * Date: Wed, 25 Sep 2013 10:45:38 -0600 (MDT)
+ * From: "Nelson H. F. Beebe" <beebe@math.utah.edu>
+ * (4) The code is typical of many published fragments for converting
+ * from integer to floating-point, and I discuss the serious pitfalls
+ * in my book, because it leads to platform-dependent behavior at the
+ * end points of the interval [0,1]
+ *
+ * (5) the documentation in the gawk info node says
+ *
+ * `rand()'
+ * Return a random number. The values of `rand()' are uniformly
+ * distributed between zero and one. The value could be zero but is
+ * never one.(1)
+ *
+ * The division by RAND_DIVISOR may not guarantee that 1.0 is never
+ * returned: the programmer forgot the platform-dependent issue of
+ * rounding.
+ *
+ * For points 4 and 5, the safe way is a loop:
+ *
+ * double
+ * rand(void) // return value in [0.0, 1.0)
+ * {
+ * value = internal_rand();
+ *
+ * while (value == 1.0)
+ * value = internal_rand();
+ *
+ * return (value);
+ * }
+ */
+
+ do {
+ tmprand = 0.5 + ( (random()/RAND_DIVISOR + random())
+ / RAND_DIVISOR);
+ tmprand -= 0.5;
+ } while (tmprand == 1.0);
+
+ return make_number((AWKNUM) tmprand);
}
/* do_srand --- seed the random number generator */
diff --git a/configure b/configure
index 7ee850e6..9cac99cb 100755
--- a/configure
+++ b/configure
@@ -1,6 +1,6 @@
#! /bin/sh
# Guess values for system-dependent variables and create Makefiles.
-# Generated by GNU Autoconf 2.69 for GNU Awk 4.1.0a.
+# Generated by GNU Autoconf 2.69 for GNU Awk 4.1.60.
#
# Report bugs to <bug-gawk@gnu.org>.
#
@@ -580,8 +580,8 @@ MAKEFLAGS=
# Identity of this package.
PACKAGE_NAME='GNU Awk'
PACKAGE_TARNAME='gawk'
-PACKAGE_VERSION='4.1.0a'
-PACKAGE_STRING='GNU Awk 4.1.0a'
+PACKAGE_VERSION='4.1.60'
+PACKAGE_STRING='GNU Awk 4.1.60'
PACKAGE_BUGREPORT='bug-gawk@gnu.org'
PACKAGE_URL='http://www.gnu.org/software/gawk/'
@@ -1324,7 +1324,7 @@ if test "$ac_init_help" = "long"; then
# Omit some internal or obsolete options to make the list less imposing.
# This message is too long to be a string in the A/UX 3.1 sh.
cat <<_ACEOF
-\`configure' configures GNU Awk 4.1.0a to adapt to many kinds of systems.
+\`configure' configures GNU Awk 4.1.60 to adapt to many kinds of systems.
Usage: $0 [OPTION]... [VAR=VALUE]...
@@ -1394,7 +1394,7 @@ fi
if test -n "$ac_init_help"; then
case $ac_init_help in
- short | recursive ) echo "Configuration of GNU Awk 4.1.0a:";;
+ short | recursive ) echo "Configuration of GNU Awk 4.1.60:";;
esac
cat <<\_ACEOF
@@ -1512,7 +1512,7 @@ fi
test -n "$ac_init_help" && exit $ac_status
if $ac_init_version; then
cat <<\_ACEOF
-GNU Awk configure 4.1.0a
+GNU Awk configure 4.1.60
generated by GNU Autoconf 2.69
Copyright (C) 2012 Free Software Foundation, Inc.
@@ -2221,7 +2221,7 @@ cat >config.log <<_ACEOF
This file contains any messages produced by compilers while
running configure, to aid debugging if configure makes a mistake.
-It was created by GNU Awk $as_me 4.1.0a, which was
+It was created by GNU Awk $as_me 4.1.60, which was
generated by GNU Autoconf 2.69. Invocation command line was
$ $0 $@
@@ -3104,7 +3104,7 @@ fi
# Define the identity of the package.
PACKAGE='gawk'
- VERSION='4.1.0a'
+ VERSION='4.1.60'
cat >>confdefs.h <<_ACEOF
@@ -11533,7 +11533,7 @@ cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
# report actual input values of CONFIG_FILES etc. instead of their
# values after options handling.
ac_log="
-This file was extended by GNU Awk $as_me 4.1.0a, which was
+This file was extended by GNU Awk $as_me 4.1.60, which was
generated by GNU Autoconf 2.69. Invocation command line was
CONFIG_FILES = $CONFIG_FILES
@@ -11601,7 +11601,7 @@ _ACEOF
cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
ac_cs_config="`$as_echo "$ac_configure_args" | sed 's/^ //; s/[\\""\`\$]/\\\\&/g'`"
ac_cs_version="\\
-GNU Awk config.status 4.1.0a
+GNU Awk config.status 4.1.60
configured by $0, generated by GNU Autoconf 2.69,
with options \\"\$ac_cs_config\\"
diff --git a/configure.ac b/configure.ac
index e58d9590..8db997a6 100644
--- a/configure.ac
+++ b/configure.ac
@@ -23,7 +23,7 @@ dnl
dnl Process this file with autoconf to produce a configure script.
-AC_INIT([GNU Awk], 4.1.0a, bug-gawk@gnu.org, gawk)
+AC_INIT([GNU Awk], 4.1.60, bug-gawk@gnu.org, gawk)
# This is a hack. Different versions of install on different systems
# are just too different. Chuck it and use install-sh.
diff --git a/doc/ChangeLog b/doc/ChangeLog
index 2eb43766..b953d1b0 100644
--- a/doc/ChangeLog
+++ b/doc/ChangeLog
@@ -6,6 +6,7 @@
2013-12-26 Arnold D. Robbins <arnold@skeeve.com>
* gawktexi.in: More minor additions / fixes.
+ Add John Malmberg for VMS, minor edits.
2013-12-25 Arnold D. Robbins <arnold@skeeve.com>
@@ -71,6 +72,11 @@
* gawktexi.in (FN, FFN, DF,DDF, PVERSION, CTL): Remove macros.
They have no alternate versions and are just in the way.
+2013-08-15 Arnold D. Robbins <arnold@skeeve.com>
+
+ * gawk.1: Document that ENVIRON updates affect the environment.
+ * gawktexi.in: Ditto.
+
2013-06-27 Arnold D. Robbins <arnold@skeeve.com>
* texinfo.tex: Update from Karl, fixes a formating problem.
diff --git a/doc/gawk.1 b/doc/gawk.1
index 7f31c254..8d343024 100644
--- a/doc/gawk.1
+++ b/doc/gawk.1
@@ -13,7 +13,7 @@
. if \w'\(rq' .ds rq "\(rq
. \}
.\}
-.TH GAWK 1 "May 09 2013" "Free Software Foundation" "Utility Commands"
+.TH GAWK 1 "Aug 15 2013" "Free Software Foundation" "Utility Commands"
.SH NAME
gawk \- pattern scanning and processing language
.SH SYNOPSIS
@@ -917,11 +917,17 @@ An array containing the values of the current environment.
The array is indexed by the environment variables, each element being
the value of that variable (e.g., \fBENVIRON["HOME"]\fP might be
\fB"/home/arnold"\fR).
-Changing this array does not affect the environment seen by programs which
+.sp
+In POSIX mode,
+changing this array does not affect the environment seen by programs which
.I gawk
spawns via redirection or the
.B system()
function.
+Otherwise,
+.I gawk
+updates its real environment so that programs it spawns see
+the changes.
.TP
.B ERRNO
If a system error occurs either doing a redirection for
diff --git a/doc/gawk.info b/doc/gawk.info
index b4c90290..91962482 100644
--- a/doc/gawk.info
+++ b/doc/gawk.info
@@ -9708,9 +9708,18 @@ with a pound sign (`#').
An associative array containing the values of the environment.
The array indices are the environment variable names; the elements
are the values of the particular environment variables. For
- example, `ENVIRON["HOME"]' might be `/home/arnold'. Changing this
- array does not affect the environment passed on to any programs
- that `awk' may spawn via redirection or the `system()' function.
+ example, `ENVIRON["HOME"]' might be `/home/arnold'.
+
+ For POSIX `awk', changing this array does not affect the
+ environment passed on to any programs that `awk' may spawn via
+ redirection or the `system()' function.
+
+ However, beginning with version 4.2, if not in POSIX compatibility
+ mode, `gawk' does update its own environment when `ENVIRON' is
+ changed, thus changing the environment seen by programs that it
+ creates. You should therefore be especially careful if you modify
+ `ENVIRON["PATH"]"', which is the search path for finding
+ executable programs.
Some operating systems may not have environment variables. On
such systems, the `ENVIRON' array is empty (except for
@@ -26462,7 +26471,8 @@ considered authoritative if it conflicts with this Info file.
MS-DOS with DJGPP Scott Deifik, <scottd.mail@sbcglobal.net>.
MS-Windows with MINGW Eli Zaretskii, <eliz@gnu.org>.
OS/2 Andreas Buening, <andreas.buening@nexgo.de>.
-VMS Pat Rankin, <r.pat.rankin@gmail.com>
+VMS Pat Rankin, <r.pat.rankin@gmail.com>, and John
+ Malmberg, <wb8tyw@gmail.com>.
z/OS (OS/390) Dave Pitts, <dpitts@cozx.com>.
If your bug is also reproducible under Unix, please send a copy of
@@ -30197,9 +30207,9 @@ Index
* dark corner, exit statement: Exit Statement. (line 30)
* dark corner, field separators: Field Splitting Summary.
(line 46)
-* dark corner, FILENAME variable <1>: Auto-set. (line 93)
+* dark corner, FILENAME variable <1>: Auto-set. (line 102)
* dark corner, FILENAME variable: Getline Notes. (line 19)
-* dark corner, FNR/NR variables: Auto-set. (line 314)
+* dark corner, FNR/NR variables: Auto-set. (line 323)
* dark corner, format-control characters: Control Letters. (line 18)
* dark corner, FS as null string: Single Character Fields.
(line 20)
@@ -30368,12 +30378,12 @@ Index
(line 23)
* differences in awk and gawk, close() function: Close Files And Pipes.
(line 81)
-* differences in awk and gawk, ERRNO variable: Auto-set. (line 73)
+* differences in awk and gawk, ERRNO variable: Auto-set. (line 82)
* differences in awk and gawk, error messages: Special FD. (line 16)
* differences in awk and gawk, FIELDWIDTHS variable: User-modified.
(line 35)
* differences in awk and gawk, FPAT variable: User-modified. (line 45)
-* differences in awk and gawk, FUNCTAB variable: Auto-set. (line 119)
+* differences in awk and gawk, FUNCTAB variable: Auto-set. (line 128)
* differences in awk and gawk, function arguments (gawk): Calling Built-in.
(line 16)
* differences in awk and gawk, getline command: Getline. (line 19)
@@ -30396,14 +30406,14 @@ Index
(line 256)
* differences in awk and gawk, print/printf statements: Format Modifiers.
(line 13)
-* differences in awk and gawk, PROCINFO array: Auto-set. (line 133)
+* differences in awk and gawk, PROCINFO array: Auto-set. (line 142)
* differences in awk and gawk, record separators: Records. (line 117)
* differences in awk and gawk, regexp constants: Using Constant Regexps.
(line 43)
* differences in awk and gawk, regular expressions: Case-sensitivity.
(line 26)
* differences in awk and gawk, RS/RT variables: Records. (line 172)
-* differences in awk and gawk, RT variable: Auto-set. (line 266)
+* differences in awk and gawk, RT variable: Auto-set. (line 275)
* differences in awk and gawk, single-character fields: Single Character Fields.
(line 6)
* differences in awk and gawk, split() function: String Functions.
@@ -30412,7 +30422,7 @@ Index
* differences in awk and gawk, strings, storing: Records. (line 191)
* differences in awk and gawk, strtonum() function (gawk): String Functions.
(line 401)
-* differences in awk and gawk, SYMTAB variable: Auto-set. (line 274)
+* differences in awk and gawk, SYMTAB variable: Auto-set. (line 283)
* differences in awk and gawk, TEXTDOMAIN variable: User-modified.
(line 162)
* differences in awk and gawk, trunc-mod operation: Arithmetic Ops.
@@ -30493,13 +30503,13 @@ Index
(line 11)
* EREs (Extended Regular Expressions): Bracket Expressions. (line 24)
* ERRNO variable <1>: TCP/IP Networking. (line 54)
-* ERRNO variable <2>: Auto-set. (line 73)
+* ERRNO variable <2>: Auto-set. (line 82)
* ERRNO variable <3>: BEGINFILE/ENDFILE. (line 26)
* ERRNO variable <4>: Close Files And Pipes.
(line 138)
* ERRNO variable: Getline. (line 19)
* error handling: Special FD. (line 16)
-* error handling, ERRNO variable and: Auto-set. (line 73)
+* error handling, ERRNO variable and: Auto-set. (line 82)
* error output: Special FD. (line 6)
* escape processing, gsub()/gensub()/sub() functions: Gory Details.
(line 6)
@@ -30611,7 +30621,7 @@ Index
* file names, distinguishing: Auto-set. (line 52)
* file names, in compatibility mode: Special Caveats. (line 9)
* file names, standard streams in gawk: Special FD. (line 46)
-* FILENAME variable <1>: Auto-set. (line 93)
+* FILENAME variable <1>: Auto-set. (line 102)
* FILENAME variable: Reading Files. (line 6)
* FILENAME variable, getline, setting with: Getline Notes. (line 19)
* filenames, assignments as: Ignoring Assigns. (line 6)
@@ -30678,9 +30688,9 @@ Index
* floating-point, numbers: General Arithmetic. (line 6)
* fnmatch extension function: Extension Sample Fnmatch.
(line 6)
-* FNR variable <1>: Auto-set. (line 103)
+* FNR variable <1>: Auto-set. (line 112)
* FNR variable: Records. (line 6)
-* FNR variable, changing: Auto-set. (line 314)
+* FNR variable, changing: Auto-set. (line 323)
* for statement: For Statement. (line 6)
* for statement, looping over arrays: Scanning an Array. (line 20)
* fork extension function: Extension Sample Fork.
@@ -30727,7 +30737,7 @@ Index
* FSF (Free Software Foundation): Manual History. (line 6)
* fts extension function: Extension Sample File Functions.
(line 77)
-* FUNCTAB array: Auto-set. (line 119)
+* FUNCTAB array: Auto-set. (line 128)
* function calls: Function Calls. (line 6)
* function calls, indirect: Indirect Calls. (line 6)
* function pointers: Indirect Calls. (line 6)
@@ -30796,7 +30806,7 @@ Index
* gawk, distribution: Distribution contents.
(line 6)
* gawk, ERRNO variable in <1>: TCP/IP Networking. (line 54)
-* gawk, ERRNO variable in <2>: Auto-set. (line 73)
+* gawk, ERRNO variable in <2>: Auto-set. (line 82)
* gawk, ERRNO variable in <3>: BEGINFILE/ENDFILE. (line 26)
* gawk, ERRNO variable in <4>: Close Files And Pipes.
(line 138)
@@ -30813,7 +30823,7 @@ Index
* gawk, FPAT variable in <1>: User-modified. (line 45)
* gawk, FPAT variable in: Splitting By Content.
(line 26)
-* gawk, FUNCTAB array in: Auto-set. (line 119)
+* gawk, FUNCTAB array in: Auto-set. (line 128)
* gawk, function arguments and: Calling Built-in. (line 16)
* gawk, hexadecimal numbers and: Nondecimal-numbers. (line 42)
* gawk, IGNORECASE variable in <1>: Array Sorting Functions.
@@ -30844,7 +30854,7 @@ Index
* gawk, OS/2 version of: PC Using. (line 11)
* gawk, PROCINFO array in <1>: Two-way I/O. (line 116)
* gawk, PROCINFO array in <2>: Time Functions. (line 47)
-* gawk, PROCINFO array in: Auto-set. (line 133)
+* gawk, PROCINFO array in: Auto-set. (line 142)
* gawk, regexp constants and: Using Constant Regexps.
(line 28)
* gawk, regular expressions, case sensitivity: Case-sensitivity.
@@ -30852,7 +30862,7 @@ Index
* gawk, regular expressions, operators: GNU Regexp Operators.
(line 6)
* gawk, regular expressions, precedence: Regexp Operators. (line 161)
-* gawk, RT variable in <1>: Auto-set. (line 266)
+* gawk, RT variable in <1>: Auto-set. (line 275)
* gawk, RT variable in <2>: Getline/Variable/File.
(line 10)
* gawk, RT variable in <3>: Multiple Line. (line 129)
@@ -30861,7 +30871,7 @@ Index
* gawk, source code, obtaining: Getting. (line 6)
* gawk, splitting fields and: Constant Size. (line 87)
* gawk, string-translation functions: I18N Functions. (line 6)
-* gawk, SYMTAB array in: Auto-set. (line 274)
+* gawk, SYMTAB array in: Auto-set. (line 283)
* gawk, TEXTDOMAIN variable in: User-modified. (line 162)
* gawk, timestamps: Time Functions. (line 6)
* gawk, uses for: Preface. (line 36)
@@ -31190,6 +31200,7 @@ Index
* lvalues/rvalues: Assignment Ops. (line 32)
* mailing labels, printing: Labels Program. (line 6)
* mailing list, GNITS: Acknowledgments. (line 52)
+* Malmberg, John <1>: Bugs. (line 72)
* Malmberg, John: Acknowledgments. (line 60)
* mark parity: Ordinal Functions. (line 45)
* marked string extraction (internationalization): String Extraction.
@@ -31264,16 +31275,16 @@ Index
(line 47)
* nexti debugger command: Debugger Execution Control.
(line 49)
-* NF variable <1>: Auto-set. (line 108)
+* NF variable <1>: Auto-set. (line 117)
* NF variable: Fields. (line 33)
* NF variable, decrementing: Changing Fields. (line 107)
* ni debugger command (alias for nexti): Debugger Execution Control.
(line 49)
* noassign.awk program: Ignoring Assigns. (line 15)
* not Boolean-logic operator: Boolean Ops. (line 6)
-* NR variable <1>: Auto-set. (line 128)
+* NR variable <1>: Auto-set. (line 137)
* NR variable: Records. (line 6)
-* NR variable, changing: Auto-set. (line 314)
+* NR variable, changing: Auto-set. (line 323)
* null strings <1>: Basic Data Typing. (line 26)
* null strings <2>: Truth Values. (line 6)
* null strings <3>: Regexp Field Splitting.
@@ -31553,7 +31564,7 @@ Index
* PROCINFO array <3>: Group Functions. (line 6)
* PROCINFO array <4>: Passwd Functions. (line 6)
* PROCINFO array <5>: Time Functions. (line 47)
-* PROCINFO array <6>: Auto-set. (line 133)
+* PROCINFO array <6>: Auto-set. (line 142)
* PROCINFO array: Obsolete. (line 11)
* profiling awk programs: Profiling. (line 6)
* profiling awk programs, dynamically: Profiling. (line 172)
@@ -31707,7 +31718,7 @@ Index
* right angle bracket (>), >> operator (I/O): Redirection. (line 50)
* right shift, bitwise: Bitwise Functions. (line 32)
* Ritchie, Dennis: Basic Data Typing. (line 55)
-* RLENGTH variable: Auto-set. (line 253)
+* RLENGTH variable: Auto-set. (line 262)
* RLENGTH variable, match() function and: String Functions. (line 220)
* Robbins, Arnold <1>: Future Extensions. (line 6)
* Robbins, Arnold <2>: Bugs. (line 32)
@@ -31734,9 +31745,9 @@ Index
* RS variable: Records. (line 20)
* RS variable, multiline records and: Multiple Line. (line 17)
* rshift() function (gawk): Bitwise Functions. (line 52)
-* RSTART variable: Auto-set. (line 259)
+* RSTART variable: Auto-set. (line 268)
* RSTART variable, match() function and: String Functions. (line 220)
-* RT variable <1>: Auto-set. (line 266)
+* RT variable <1>: Auto-set. (line 275)
* RT variable <2>: Getline/Variable/File.
(line 10)
* RT variable <3>: Multiple Line. (line 129)
@@ -31819,7 +31830,7 @@ Index
(line 110)
* sidebar, Changing FS Does Not Affect the Fields: Field Splitting Summary.
(line 38)
-* sidebar, Changing NR and FNR: Auto-set. (line 312)
+* sidebar, Changing NR and FNR: Auto-set. (line 321)
* sidebar, Controlling Output Buffering with system(): I/O Functions.
(line 135)
* sidebar, Escape Sequences for Metacharacters: Escape Sequences.
@@ -31961,7 +31972,7 @@ Index
* substr() function: String Functions. (line 478)
* Sumner, Andrew: Other Versions. (line 64)
* switch statement: Switch Statement. (line 6)
-* SYMTAB array: Auto-set. (line 274)
+* SYMTAB array: Auto-set. (line 283)
* syntactic ambiguity: /= operator vs. /=.../ regexp constant: Assignment Ops.
(line 147)
* system() function: I/O Functions. (line 72)
@@ -32404,335 +32415,335 @@ Node: Built-in Variables404255
Node: User-modified405350
Ref: User-modified-Footnote-1413708
Node: Auto-set413770
-Ref: Auto-set-Footnote-1426848
-Ref: Auto-set-Footnote-2427053
-Node: ARGC and ARGV427109
-Node: Arrays430960
-Node: Array Basics432465
-Node: Array Intro433291
-Node: Reference to Elements437608
-Node: Assigning Elements439878
-Node: Array Example440369
-Node: Scanning an Array442101
-Node: Controlling Scanning444415
-Ref: Controlling Scanning-Footnote-1449502
-Node: Delete449818
-Ref: Delete-Footnote-1452583
-Node: Numeric Array Subscripts452640
-Node: Uninitialized Subscripts454823
-Node: Multidimensional456450
-Node: Multiscanning459542
-Node: Arrays of Arrays461131
-Node: Functions465771
-Node: Built-in466590
-Node: Calling Built-in467668
-Node: Numeric Functions469656
-Ref: Numeric Functions-Footnote-1473488
-Ref: Numeric Functions-Footnote-2473845
-Ref: Numeric Functions-Footnote-3473893
-Node: String Functions474162
-Ref: String Functions-Footnote-1497082
-Ref: String Functions-Footnote-2497211
-Ref: String Functions-Footnote-3497459
-Node: Gory Details497546
-Ref: table-sub-escapes499225
-Ref: table-sub-posix-92500579
-Ref: table-sub-proposed501930
-Ref: table-posix-sub503284
-Ref: table-gensub-escapes504829
-Ref: Gory Details-Footnote-1506005
-Ref: Gory Details-Footnote-2506056
-Node: I/O Functions506207
-Ref: I/O Functions-Footnote-1513192
-Node: Time Functions513339
-Ref: Time Functions-Footnote-1524272
-Ref: Time Functions-Footnote-2524340
-Ref: Time Functions-Footnote-3524498
-Ref: Time Functions-Footnote-4524609
-Ref: Time Functions-Footnote-5524721
-Ref: Time Functions-Footnote-6524948
-Node: Bitwise Functions525214
-Ref: table-bitwise-ops525776
-Ref: Bitwise Functions-Footnote-1529997
-Node: Type Functions530181
-Node: I18N Functions531332
-Node: User-defined532959
-Node: Definition Syntax533763
-Ref: Definition Syntax-Footnote-1538673
-Node: Function Example538742
-Node: Function Caveats541336
-Node: Calling A Function541757
-Node: Variable Scope542872
-Node: Pass By Value/Reference545835
-Node: Return Statement549343
-Node: Dynamic Typing552324
-Node: Indirect Calls553255
-Node: Library Functions562940
-Ref: Library Functions-Footnote-1566453
-Ref: Library Functions-Footnote-2566596
-Node: Library Names566767
-Ref: Library Names-Footnote-1570238
-Ref: Library Names-Footnote-2570458
-Node: General Functions570544
-Node: Strtonum Function571572
-Node: Assert Function574502
-Node: Round Function577828
-Node: Cliff Random Function579371
-Node: Ordinal Functions580387
-Ref: Ordinal Functions-Footnote-1583457
-Ref: Ordinal Functions-Footnote-2583709
-Node: Join Function583918
-Ref: Join Function-Footnote-1585689
-Node: Getlocaltime Function585889
-Node: Readfile Function589630
-Node: Data File Management591469
-Node: Filetrans Function592101
-Node: Rewind Function596170
-Node: File Checking597557
-Node: Empty Files598651
-Node: Ignoring Assigns600881
-Node: Getopt Function602434
-Ref: Getopt Function-Footnote-1613737
-Node: Passwd Functions613940
-Ref: Passwd Functions-Footnote-1622915
-Node: Group Functions623003
-Node: Walking Arrays631087
-Node: Sample Programs633224
-Node: Running Examples633898
-Node: Clones634626
-Node: Cut Program635850
-Node: Egrep Program645695
-Ref: Egrep Program-Footnote-1653468
-Node: Id Program653578
-Node: Split Program657194
-Ref: Split Program-Footnote-1660713
-Node: Tee Program660841
-Node: Uniq Program663644
-Node: Wc Program671073
-Ref: Wc Program-Footnote-1675339
-Ref: Wc Program-Footnote-2675539
-Node: Miscellaneous Programs675631
-Node: Dupword Program676819
-Node: Alarm Program678850
-Node: Translate Program683603
-Ref: Translate Program-Footnote-1687990
-Ref: Translate Program-Footnote-2688238
-Node: Labels Program688372
-Ref: Labels Program-Footnote-1691743
-Node: Word Sorting691827
-Node: History Sorting695711
-Node: Extract Program697550
-Ref: Extract Program-Footnote-1705053
-Node: Simple Sed705181
-Node: Igawk Program708243
-Ref: Igawk Program-Footnote-1723400
-Ref: Igawk Program-Footnote-2723601
-Node: Anagram Program723739
-Node: Signature Program726807
-Node: Advanced Features727907
-Node: Nondecimal Data729793
-Node: Array Sorting731376
-Node: Controlling Array Traversal732073
-Node: Array Sorting Functions740357
-Ref: Array Sorting Functions-Footnote-1744226
-Node: Two-way I/O744420
-Ref: Two-way I/O-Footnote-1749852
-Node: TCP/IP Networking749922
-Node: Profiling752766
-Node: Internationalization760263
-Node: I18N and L10N761688
-Node: Explaining gettext762374
-Ref: Explaining gettext-Footnote-1767442
-Ref: Explaining gettext-Footnote-2767626
-Node: Programmer i18n767791
-Node: Translator i18n771993
-Node: String Extraction772786
-Ref: String Extraction-Footnote-1773747
-Node: Printf Ordering773833
-Ref: Printf Ordering-Footnote-1776617
-Node: I18N Portability776681
-Ref: I18N Portability-Footnote-1779130
-Node: I18N Example779193
-Ref: I18N Example-Footnote-1781831
-Node: Gawk I18N781903
-Node: Debugger782524
-Node: Debugging783495
-Node: Debugging Concepts783928
-Node: Debugging Terms785784
-Node: Awk Debugging788381
-Node: Sample Debugging Session789273
-Node: Debugger Invocation789793
-Node: Finding The Bug791125
-Node: List of Debugger Commands797613
-Node: Breakpoint Control798947
-Node: Debugger Execution Control802611
-Node: Viewing And Changing Data805971
-Node: Execution Stack809327
-Node: Debugger Info810794
-Node: Miscellaneous Debugger Commands814776
-Node: Readline Support819952
-Node: Limitations820783
-Node: Arbitrary Precision Arithmetic823035
-Ref: Arbitrary Precision Arithmetic-Footnote-1824684
-Node: General Arithmetic824832
-Node: Floating Point Issues826552
-Node: String Conversion Precision827433
-Ref: String Conversion Precision-Footnote-1829138
-Node: Unexpected Results829247
-Node: POSIX Floating Point Problems831400
-Ref: POSIX Floating Point Problems-Footnote-1835225
-Node: Integer Programming835263
-Node: Floating-point Programming837002
-Ref: Floating-point Programming-Footnote-1843333
-Ref: Floating-point Programming-Footnote-2843603
-Node: Floating-point Representation843867
-Node: Floating-point Context845032
-Ref: table-ieee-formats845871
-Node: Rounding Mode847255
-Ref: table-rounding-modes847734
-Ref: Rounding Mode-Footnote-1850749
-Node: Gawk and MPFR850928
-Node: Arbitrary Precision Floats852183
-Ref: Arbitrary Precision Floats-Footnote-1854626
-Node: Setting Precision854942
-Ref: table-predefined-precision-strings855628
-Node: Setting Rounding Mode857773
-Ref: table-gawk-rounding-modes858177
-Node: Floating-point Constants859364
-Node: Changing Precision860793
-Ref: Changing Precision-Footnote-1862190
-Node: Exact Arithmetic862364
-Node: Arbitrary Precision Integers865502
-Ref: Arbitrary Precision Integers-Footnote-1868520
-Node: Dynamic Extensions868667
-Node: Extension Intro870125
-Node: Plugin License871390
-Node: Extension Mechanism Outline872075
-Ref: load-extension872492
-Ref: load-new-function873970
-Ref: call-new-function874965
-Node: Extension API Description876980
-Node: Extension API Functions Introduction878193
-Node: General Data Types883059
-Ref: General Data Types-Footnote-1888664
-Node: Requesting Values888963
-Ref: table-value-types-returned889694
-Node: Constructor Functions890648
-Node: Registration Functions893668
-Node: Extension Functions894353
-Node: Exit Callback Functions896578
-Node: Extension Version String897827
-Node: Input Parsers898477
-Node: Output Wrappers908234
-Node: Two-way processors912744
-Node: Printing Messages914952
-Ref: Printing Messages-Footnote-1916029
-Node: Updating `ERRNO'916181
-Node: Accessing Parameters916920
-Node: Symbol Table Access918150
-Node: Symbol table by name918662
-Node: Symbol table by cookie920409
-Ref: Symbol table by cookie-Footnote-1924539
-Node: Cached values924602
-Ref: Cached values-Footnote-1928051
-Node: Array Manipulation928142
-Ref: Array Manipulation-Footnote-1929240
-Node: Array Data Types929279
-Ref: Array Data Types-Footnote-1931982
-Node: Array Functions932074
-Node: Flattening Arrays935840
-Node: Creating Arrays942692
-Node: Extension API Variables947417
-Node: Extension Versioning948053
-Node: Extension API Informational Variables949954
-Node: Extension API Boilerplate951040
-Node: Finding Extensions954844
-Node: Extension Example955404
-Node: Internal File Description956134
-Node: Internal File Ops960225
-Ref: Internal File Ops-Footnote-1971733
-Node: Using Internal File Ops971873
-Ref: Using Internal File Ops-Footnote-1974226
-Node: Extension Samples974492
-Node: Extension Sample File Functions976016
-Node: Extension Sample Fnmatch984501
-Node: Extension Sample Fork986227
-Node: Extension Sample Inplace987445
-Node: Extension Sample Ord989223
-Node: Extension Sample Readdir990059
-Node: Extension Sample Revout991591
-Node: Extension Sample Rev2way992184
-Node: Extension Sample Read write array992874
-Node: Extension Sample Readfile994757
-Node: Extension Sample API Tests995575
-Node: Extension Sample Time996100
-Node: gawkextlib997464
-Node: Language History1000245
-Node: V7/SVR3.11001767
-Node: SVR41004087
-Node: POSIX1005529
-Node: BTL1006915
-Node: POSIX/GNU1007649
-Node: Common Extensions1013184
-Node: Ranges and Locales1014490
-Ref: Ranges and Locales-Footnote-11019108
-Ref: Ranges and Locales-Footnote-21019135
-Ref: Ranges and Locales-Footnote-31019395
-Node: Contributors1019616
-Node: Installation1024691
-Node: Gawk Distribution1025585
-Node: Getting1026069
-Node: Extracting1026895
-Node: Distribution contents1028587
-Node: Unix Installation1034292
-Node: Quick Installation1034909
-Node: Additional Configuration Options1037353
-Node: Configuration Philosophy1039089
-Node: Non-Unix Installation1041443
-Node: PC Installation1041901
-Node: PC Binary Installation1043200
-Node: PC Compiling1045048
-Node: PC Testing1047992
-Node: PC Using1049168
-Node: Cygwin1053353
-Node: MSYS1054353
-Node: VMS Installation1054867
-Node: VMS Compilation1055470
-Ref: VMS Compilation-Footnote-11056477
-Node: VMS Installation Details1056535
-Node: VMS Running1058170
-Node: VMS Old Gawk1059777
-Node: Bugs1060251
-Node: Other Versions1064107
-Node: Notes1070191
-Node: Compatibility Mode1070991
-Node: Additions1071774
-Node: Accessing The Source1072701
-Node: Adding Code1074141
-Node: New Ports1080186
-Node: Derived Files1084321
-Ref: Derived Files-Footnote-11089642
-Ref: Derived Files-Footnote-21089676
-Ref: Derived Files-Footnote-31090276
-Node: Future Extensions1090374
-Node: Implementation Limitations1090957
-Node: Extension Design1092209
-Node: Old Extension Problems1093363
-Ref: Old Extension Problems-Footnote-11094871
-Node: Extension New Mechanism Goals1094928
-Ref: Extension New Mechanism Goals-Footnote-11098293
-Node: Extension Other Design Decisions1098479
-Node: Extension Future Growth1100585
-Node: Old Extension Mechanism1101421
-Node: Basic Concepts1103161
-Node: Basic High Level1103842
-Ref: figure-general-flow1104113
-Ref: figure-process-flow1104712
-Ref: Basic High Level-Footnote-11107941
-Node: Basic Data Typing1108126
-Node: Glossary1111481
-Node: Copying1136943
-Node: GNU Free Documentation License1174500
-Node: Index1199637
+Ref: Auto-set-Footnote-1427240
+Ref: Auto-set-Footnote-2427445
+Node: ARGC and ARGV427501
+Node: Arrays431352
+Node: Array Basics432857
+Node: Array Intro433683
+Node: Reference to Elements438000
+Node: Assigning Elements440270
+Node: Array Example440761
+Node: Scanning an Array442493
+Node: Controlling Scanning444807
+Ref: Controlling Scanning-Footnote-1449894
+Node: Delete450210
+Ref: Delete-Footnote-1452975
+Node: Numeric Array Subscripts453032
+Node: Uninitialized Subscripts455215
+Node: Multidimensional456842
+Node: Multiscanning459934
+Node: Arrays of Arrays461523
+Node: Functions466163
+Node: Built-in466982
+Node: Calling Built-in468060
+Node: Numeric Functions470048
+Ref: Numeric Functions-Footnote-1473880
+Ref: Numeric Functions-Footnote-2474237
+Ref: Numeric Functions-Footnote-3474285
+Node: String Functions474554
+Ref: String Functions-Footnote-1497474
+Ref: String Functions-Footnote-2497603
+Ref: String Functions-Footnote-3497851
+Node: Gory Details497938
+Ref: table-sub-escapes499617
+Ref: table-sub-posix-92500971
+Ref: table-sub-proposed502322
+Ref: table-posix-sub503676
+Ref: table-gensub-escapes505221
+Ref: Gory Details-Footnote-1506397
+Ref: Gory Details-Footnote-2506448
+Node: I/O Functions506599
+Ref: I/O Functions-Footnote-1513584
+Node: Time Functions513731
+Ref: Time Functions-Footnote-1524664
+Ref: Time Functions-Footnote-2524732
+Ref: Time Functions-Footnote-3524890
+Ref: Time Functions-Footnote-4525001
+Ref: Time Functions-Footnote-5525113
+Ref: Time Functions-Footnote-6525340
+Node: Bitwise Functions525606
+Ref: table-bitwise-ops526168
+Ref: Bitwise Functions-Footnote-1530389
+Node: Type Functions530573
+Node: I18N Functions531724
+Node: User-defined533351
+Node: Definition Syntax534155
+Ref: Definition Syntax-Footnote-1539065
+Node: Function Example539134
+Node: Function Caveats541728
+Node: Calling A Function542149
+Node: Variable Scope543264
+Node: Pass By Value/Reference546227
+Node: Return Statement549735
+Node: Dynamic Typing552716
+Node: Indirect Calls553647
+Node: Library Functions563332
+Ref: Library Functions-Footnote-1566845
+Ref: Library Functions-Footnote-2566988
+Node: Library Names567159
+Ref: Library Names-Footnote-1570630
+Ref: Library Names-Footnote-2570850
+Node: General Functions570936
+Node: Strtonum Function571964
+Node: Assert Function574894
+Node: Round Function578220
+Node: Cliff Random Function579763
+Node: Ordinal Functions580779
+Ref: Ordinal Functions-Footnote-1583849
+Ref: Ordinal Functions-Footnote-2584101
+Node: Join Function584310
+Ref: Join Function-Footnote-1586081
+Node: Getlocaltime Function586281
+Node: Readfile Function590022
+Node: Data File Management591861
+Node: Filetrans Function592493
+Node: Rewind Function596562
+Node: File Checking597949
+Node: Empty Files599043
+Node: Ignoring Assigns601273
+Node: Getopt Function602826
+Ref: Getopt Function-Footnote-1614129
+Node: Passwd Functions614332
+Ref: Passwd Functions-Footnote-1623307
+Node: Group Functions623395
+Node: Walking Arrays631479
+Node: Sample Programs633616
+Node: Running Examples634290
+Node: Clones635018
+Node: Cut Program636242
+Node: Egrep Program646087
+Ref: Egrep Program-Footnote-1653860
+Node: Id Program653970
+Node: Split Program657586
+Ref: Split Program-Footnote-1661105
+Node: Tee Program661233
+Node: Uniq Program664036
+Node: Wc Program671465
+Ref: Wc Program-Footnote-1675731
+Ref: Wc Program-Footnote-2675931
+Node: Miscellaneous Programs676023
+Node: Dupword Program677211
+Node: Alarm Program679242
+Node: Translate Program683995
+Ref: Translate Program-Footnote-1688382
+Ref: Translate Program-Footnote-2688630
+Node: Labels Program688764
+Ref: Labels Program-Footnote-1692135
+Node: Word Sorting692219
+Node: History Sorting696103
+Node: Extract Program697942
+Ref: Extract Program-Footnote-1705445
+Node: Simple Sed705573
+Node: Igawk Program708635
+Ref: Igawk Program-Footnote-1723792
+Ref: Igawk Program-Footnote-2723993
+Node: Anagram Program724131
+Node: Signature Program727199
+Node: Advanced Features728299
+Node: Nondecimal Data730185
+Node: Array Sorting731768
+Node: Controlling Array Traversal732465
+Node: Array Sorting Functions740749
+Ref: Array Sorting Functions-Footnote-1744618
+Node: Two-way I/O744812
+Ref: Two-way I/O-Footnote-1750244
+Node: TCP/IP Networking750314
+Node: Profiling753158
+Node: Internationalization760655
+Node: I18N and L10N762080
+Node: Explaining gettext762766
+Ref: Explaining gettext-Footnote-1767834
+Ref: Explaining gettext-Footnote-2768018
+Node: Programmer i18n768183
+Node: Translator i18n772385
+Node: String Extraction773178
+Ref: String Extraction-Footnote-1774139
+Node: Printf Ordering774225
+Ref: Printf Ordering-Footnote-1777009
+Node: I18N Portability777073
+Ref: I18N Portability-Footnote-1779522
+Node: I18N Example779585
+Ref: I18N Example-Footnote-1782223
+Node: Gawk I18N782295
+Node: Debugger782916
+Node: Debugging783887
+Node: Debugging Concepts784320
+Node: Debugging Terms786176
+Node: Awk Debugging788773
+Node: Sample Debugging Session789665
+Node: Debugger Invocation790185
+Node: Finding The Bug791517
+Node: List of Debugger Commands798005
+Node: Breakpoint Control799339
+Node: Debugger Execution Control803003
+Node: Viewing And Changing Data806363
+Node: Execution Stack809719
+Node: Debugger Info811186
+Node: Miscellaneous Debugger Commands815168
+Node: Readline Support820344
+Node: Limitations821175
+Node: Arbitrary Precision Arithmetic823427
+Ref: Arbitrary Precision Arithmetic-Footnote-1825076
+Node: General Arithmetic825224
+Node: Floating Point Issues826944
+Node: String Conversion Precision827825
+Ref: String Conversion Precision-Footnote-1829530
+Node: Unexpected Results829639
+Node: POSIX Floating Point Problems831792
+Ref: POSIX Floating Point Problems-Footnote-1835617
+Node: Integer Programming835655
+Node: Floating-point Programming837394
+Ref: Floating-point Programming-Footnote-1843725
+Ref: Floating-point Programming-Footnote-2843995
+Node: Floating-point Representation844259
+Node: Floating-point Context845424
+Ref: table-ieee-formats846263
+Node: Rounding Mode847647
+Ref: table-rounding-modes848126
+Ref: Rounding Mode-Footnote-1851141
+Node: Gawk and MPFR851320
+Node: Arbitrary Precision Floats852575
+Ref: Arbitrary Precision Floats-Footnote-1855018
+Node: Setting Precision855334
+Ref: table-predefined-precision-strings856020
+Node: Setting Rounding Mode858165
+Ref: table-gawk-rounding-modes858569
+Node: Floating-point Constants859756
+Node: Changing Precision861185
+Ref: Changing Precision-Footnote-1862582
+Node: Exact Arithmetic862756
+Node: Arbitrary Precision Integers865894
+Ref: Arbitrary Precision Integers-Footnote-1868912
+Node: Dynamic Extensions869059
+Node: Extension Intro870517
+Node: Plugin License871782
+Node: Extension Mechanism Outline872467
+Ref: load-extension872884
+Ref: load-new-function874362
+Ref: call-new-function875357
+Node: Extension API Description877372
+Node: Extension API Functions Introduction878585
+Node: General Data Types883451
+Ref: General Data Types-Footnote-1889056
+Node: Requesting Values889355
+Ref: table-value-types-returned890086
+Node: Constructor Functions891040
+Node: Registration Functions894060
+Node: Extension Functions894745
+Node: Exit Callback Functions896970
+Node: Extension Version String898219
+Node: Input Parsers898869
+Node: Output Wrappers908626
+Node: Two-way processors913136
+Node: Printing Messages915344
+Ref: Printing Messages-Footnote-1916421
+Node: Updating `ERRNO'916573
+Node: Accessing Parameters917312
+Node: Symbol Table Access918542
+Node: Symbol table by name919054
+Node: Symbol table by cookie920801
+Ref: Symbol table by cookie-Footnote-1924931
+Node: Cached values924994
+Ref: Cached values-Footnote-1928443
+Node: Array Manipulation928534
+Ref: Array Manipulation-Footnote-1929632
+Node: Array Data Types929671
+Ref: Array Data Types-Footnote-1932374
+Node: Array Functions932466
+Node: Flattening Arrays936232
+Node: Creating Arrays943084
+Node: Extension API Variables947809
+Node: Extension Versioning948445
+Node: Extension API Informational Variables950346
+Node: Extension API Boilerplate951432
+Node: Finding Extensions955236
+Node: Extension Example955796
+Node: Internal File Description956526
+Node: Internal File Ops960617
+Ref: Internal File Ops-Footnote-1972125
+Node: Using Internal File Ops972265
+Ref: Using Internal File Ops-Footnote-1974618
+Node: Extension Samples974884
+Node: Extension Sample File Functions976408
+Node: Extension Sample Fnmatch984893
+Node: Extension Sample Fork986619
+Node: Extension Sample Inplace987837
+Node: Extension Sample Ord989615
+Node: Extension Sample Readdir990451
+Node: Extension Sample Revout991983
+Node: Extension Sample Rev2way992576
+Node: Extension Sample Read write array993266
+Node: Extension Sample Readfile995149
+Node: Extension Sample API Tests995967
+Node: Extension Sample Time996492
+Node: gawkextlib997856
+Node: Language History1000637
+Node: V7/SVR3.11002159
+Node: SVR41004479
+Node: POSIX1005921
+Node: BTL1007307
+Node: POSIX/GNU1008041
+Node: Common Extensions1013576
+Node: Ranges and Locales1014882
+Ref: Ranges and Locales-Footnote-11019500
+Ref: Ranges and Locales-Footnote-21019527
+Ref: Ranges and Locales-Footnote-31019787
+Node: Contributors1020008
+Node: Installation1025083
+Node: Gawk Distribution1025977
+Node: Getting1026461
+Node: Extracting1027287
+Node: Distribution contents1028979
+Node: Unix Installation1034684
+Node: Quick Installation1035301
+Node: Additional Configuration Options1037745
+Node: Configuration Philosophy1039481
+Node: Non-Unix Installation1041835
+Node: PC Installation1042293
+Node: PC Binary Installation1043592
+Node: PC Compiling1045440
+Node: PC Testing1048384
+Node: PC Using1049560
+Node: Cygwin1053745
+Node: MSYS1054745
+Node: VMS Installation1055259
+Node: VMS Compilation1055862
+Ref: VMS Compilation-Footnote-11056869
+Node: VMS Installation Details1056927
+Node: VMS Running1058562
+Node: VMS Old Gawk1060169
+Node: Bugs1060643
+Node: Other Versions1064563
+Node: Notes1070647
+Node: Compatibility Mode1071447
+Node: Additions1072230
+Node: Accessing The Source1073157
+Node: Adding Code1074597
+Node: New Ports1080642
+Node: Derived Files1084777
+Ref: Derived Files-Footnote-11090098
+Ref: Derived Files-Footnote-21090132
+Ref: Derived Files-Footnote-31090732
+Node: Future Extensions1090830
+Node: Implementation Limitations1091413
+Node: Extension Design1092665
+Node: Old Extension Problems1093819
+Ref: Old Extension Problems-Footnote-11095327
+Node: Extension New Mechanism Goals1095384
+Ref: Extension New Mechanism Goals-Footnote-11098749
+Node: Extension Other Design Decisions1098935
+Node: Extension Future Growth1101041
+Node: Old Extension Mechanism1101877
+Node: Basic Concepts1103617
+Node: Basic High Level1104298
+Ref: figure-general-flow1104569
+Ref: figure-process-flow1105168
+Ref: Basic High Level-Footnote-11108397
+Node: Basic Data Typing1108582
+Node: Glossary1111937
+Node: Copying1137399
+Node: GNU Free Documentation License1174956
+Node: Index1200093

End Tag Table
diff --git a/doc/gawk.texi b/doc/gawk.texi
index 2787d4b0..90fa06bd 100644
--- a/doc/gawk.texi
+++ b/doc/gawk.texi
@@ -13677,10 +13677,18 @@ it is not special.
An associative array containing the values of the environment. The array
indices are the environment variable names; the elements are the values of
the particular environment variables. For example,
-@code{ENVIRON["HOME"]} might be @file{/home/arnold}. Changing this array
-does not affect the environment passed on to any programs that
-@command{awk} may spawn via redirection or the @code{system()} function.
-@c (In a future version of @command{gawk}, it may do so.)
+@code{ENVIRON["HOME"]} might be @file{/home/arnold}.
+
+For POSIX @command{awk}, changing this array does not affect the
+environment passed on to any programs that @command{awk} may spawn via
+redirection or the @code{system()} function.
+
+However, beginning with version 4.2, if not in POSIX
+compatibility mode, @command{gawk} does update its own environment when
+@code{ENVIRON} is changed, thus changing the environment seen by programs
+that it creates. You should therefore be especially careful if you
+modify @code{ENVIRON["PATH"]"}, which is the search path for finding
+executable programs.
Some operating systems may not have environment variables.
On such systems, the @code{ENVIRON} array is empty (except for
@@ -35125,9 +35133,10 @@ mail at the Internet address noted previously.
If you find bugs in one of the non-Unix ports of @command{gawk}, please send
an electronic mail message to the person who maintains that port. They
-are named in the following list, as well as in the @file{README} file in the @command{gawk}
-distribution. Information in the @file{README} file should be considered
-authoritative if it conflicts with this @value{DOCUMENT}.
+are named in the following list, as well as in the @file{README} file
+in the @command{gawk} distribution. Information in the @file{README}
+file should be considered authoritative if it conflicts with this
+@value{DOCUMENT}.
The people maintaining the non-Unix ports of @command{gawk} are
as follows:
@@ -35143,14 +35152,17 @@ as follows:
@item OS/2 @tab Andreas Buening, @EMAIL{andreas.buening@@nexgo.de,andreas dot buening at nexgo dot de}.
@cindex Rankin, Pat
-@item VMS @tab Pat Rankin, @EMAIL{r.pat.rankin@@gmail.com,r.pat.rankin at gmail.com}
+@cindex Malmberg, John
+@item VMS @tab Pat Rankin, @EMAIL{r.pat.rankin@@gmail.com,r.pat.rankin at gmail.com}, and
+John Malmberg, @EMAIL{wb8tyw@@gmail.com,wb8tyw at gmail.com}.
@cindex Pitts, Dave
@item z/OS (OS/390) @tab Dave Pitts, @EMAIL{dpitts@@cozx.com,dpitts at cozx dot com}.
@end multitable
If your bug is also reproducible under Unix, please send a copy of your
-report to the @EMAIL{bug-gawk@@gnu.org,bug-gawk at gnu dot org} email list as well.
+report to the @EMAIL{bug-gawk@@gnu.org,bug-gawk at gnu dot org} email
+list as well.
@c ENDOFRANGE dbugg
@c ENDOFRANGE tblgawb
diff --git a/doc/gawktexi.in b/doc/gawktexi.in
index 7e8197d7..8fe83dae 100644
--- a/doc/gawktexi.in
+++ b/doc/gawktexi.in
@@ -13062,10 +13062,18 @@ it is not special.
An associative array containing the values of the environment. The array
indices are the environment variable names; the elements are the values of
the particular environment variables. For example,
-@code{ENVIRON["HOME"]} might be @file{/home/arnold}. Changing this array
-does not affect the environment passed on to any programs that
-@command{awk} may spawn via redirection or the @code{system()} function.
-@c (In a future version of @command{gawk}, it may do so.)
+@code{ENVIRON["HOME"]} might be @file{/home/arnold}.
+
+For POSIX @command{awk}, changing this array does not affect the
+environment passed on to any programs that @command{awk} may spawn via
+redirection or the @code{system()} function.
+
+However, beginning with version 4.2, if not in POSIX
+compatibility mode, @command{gawk} does update its own environment when
+@code{ENVIRON} is changed, thus changing the environment seen by programs
+that it creates. You should therefore be especially careful if you
+modify @code{ENVIRON["PATH"]"}, which is the search path for finding
+executable programs.
Some operating systems may not have environment variables.
On such systems, the @code{ENVIRON} array is empty (except for
@@ -34274,9 +34282,10 @@ mail at the Internet address noted previously.
If you find bugs in one of the non-Unix ports of @command{gawk}, please send
an electronic mail message to the person who maintains that port. They
-are named in the following list, as well as in the @file{README} file in the @command{gawk}
-distribution. Information in the @file{README} file should be considered
-authoritative if it conflicts with this @value{DOCUMENT}.
+are named in the following list, as well as in the @file{README} file
+in the @command{gawk} distribution. Information in the @file{README}
+file should be considered authoritative if it conflicts with this
+@value{DOCUMENT}.
The people maintaining the non-Unix ports of @command{gawk} are
as follows:
@@ -34292,14 +34301,17 @@ as follows:
@item OS/2 @tab Andreas Buening, @EMAIL{andreas.buening@@nexgo.de,andreas dot buening at nexgo dot de}.
@cindex Rankin, Pat
-@item VMS @tab Pat Rankin, @EMAIL{r.pat.rankin@@gmail.com,r.pat.rankin at gmail.com}
+@cindex Malmberg, John
+@item VMS @tab Pat Rankin, @EMAIL{r.pat.rankin@@gmail.com,r.pat.rankin at gmail.com}, and
+John Malmberg, @EMAIL{wb8tyw@@gmail.com,wb8tyw at gmail.com}.
@cindex Pitts, Dave
@item z/OS (OS/390) @tab Dave Pitts, @EMAIL{dpitts@@cozx.com,dpitts at cozx dot com}.
@end multitable
If your bug is also reproducible under Unix, please send a copy of your
-report to the @EMAIL{bug-gawk@@gnu.org,bug-gawk at gnu dot org} email list as well.
+report to the @EMAIL{bug-gawk@@gnu.org,bug-gawk at gnu dot org} email
+list as well.
@c ENDOFRANGE dbugg
@c ENDOFRANGE tblgawb
diff --git a/main.c b/main.c
index e0bc1954..4f8a397d 100644
--- a/main.c
+++ b/main.c
@@ -1121,6 +1121,10 @@ load_environ()
*/
path_environ("AWKPATH", defpath);
path_environ("AWKLIBPATH", deflibpath);
+
+ /* set up array functions */
+ init_env_array(ENVIRON_node);
+
return ENVIRON_node;
}
diff --git a/str_array.c b/str_array.c
index aa82d71b..33c9ddcc 100644
--- a/str_array.c
+++ b/str_array.c
@@ -69,6 +69,25 @@ afunc_t str_array_func[] = {
(afunc_t) 0,
};
+static NODE **env_remove(NODE *symbol, NODE *subs);
+static NODE **env_store(NODE *symbol, NODE *subs);
+static NODE **env_clear(NODE *symbol, NODE *subs);
+
+/* special case for ENVIRON */
+afunc_t env_array_func[] = {
+ str_array_init,
+ (afunc_t) 0,
+ null_length,
+ str_lookup,
+ str_exists,
+ env_clear,
+ env_remove,
+ str_list,
+ str_copy,
+ str_dump,
+ env_store,
+};
+
static inline NODE **str_find(NODE *symbol, NODE *s1, size_t code1, unsigned long hash1);
static void grow_table(NODE *symbol);
@@ -737,3 +756,63 @@ scramble(unsigned long x)
return x;
}
+
+/* env_remove --- for ENVIRON, remove value from real environment */
+
+static NODE **
+env_remove(NODE *symbol, NODE *subs)
+{
+ NODE **val = str_remove(symbol, subs);
+
+ if (val != NULL)
+ (void) unsetenv(subs->stptr);
+
+ return val;
+}
+
+/* env_clear --- clear out the environment when ENVIRON is deleted */
+
+static NODE **
+env_clear(NODE *symbol, NODE *subs)
+{
+ extern char **environ;
+ NODE **val = str_clear(symbol, subs);
+
+ environ = NULL; /* ZAP! */
+
+ /* str_clear zaps the vtable, reset it */
+ symbol->array_funcs = env_array_func;
+
+ return val;
+}
+
+/* env_store --- post assign function for ENVIRON, put new value into env */
+
+static NODE **
+env_store(NODE *symbol, NODE *subs)
+{
+ NODE **val = str_exists(symbol, subs);
+ const char *newval;
+
+ assert(val != NULL);
+
+ newval = (*val)->stptr;
+ if (newval == NULL)
+ newval = "";
+
+ (void) setenv(subs->stptr, newval, 1);
+
+ return val;
+}
+
+/* init_env_array --- set up the pointers for ENVIRON. A bit hacky. */
+
+void
+init_env_array(NODE *env_node)
+{
+ /* If POSIX simply don't reset the vtable and things work as before */
+ if (do_posix)
+ return;
+
+ env_node->array_funcs = env_array_func;
+}
diff --git a/test/ChangeLog b/test/ChangeLog
index c941f51c..5b911fa0 100644
--- a/test/ChangeLog
+++ b/test/ChangeLog
@@ -101,6 +101,12 @@
* Makefile.am (badassign1): New test.
* badassign1.awk, badassign1.ok: New files.
+2013-09-25 Arnold D. Robbins <arnold@skeeve.com>
+
+ * Makfile.am (randtest): New test.
+ * randtest.sh, randtest.ok: New files.
+ * rand.ok: Updated to reflect new results based on code change.
+
2013-09-13 Arnold D. Robbins <arnold@skeeve.com>
* Makefile.am: Fix quoting for generation of Maketests file so
diff --git a/test/Makefile.am b/test/Makefile.am
index 371a13ea..9c00062d 100644
--- a/test/Makefile.am
+++ b/test/Makefile.am
@@ -701,6 +701,8 @@ EXTRA_DIST = \
rand-mpfr.ok \
rand.awk \
rand.ok \
+ randtest.sh \
+ randtest.ok \
range1.awk \
range1.in \
range1.ok \
@@ -963,7 +965,7 @@ BASIC_TESTS = \
paramdup paramres paramtyp paramuninitglobal parse1 parsefld parseme \
pcntplus posix2008sub prdupval prec printf0 printf1 prmarscl prmreuse \
prt1eval prtoeval \
- rand range1 rebt8b1 redfilnm regeq regexprange regrange reindops \
+ rand randtest range1 rebt8b1 redfilnm regeq regexprange regrange reindops \
reparse resplit rri1 rs rsnul1nl rsnulbig rsnulbig2 rstest1 rstest2 \
rstest3 rstest4 rstest5 rswhite \
scalar sclforin sclifin sortempty splitargv splitarr splitdef \
@@ -1873,6 +1875,12 @@ dfamb1:
AWKPATH="$(srcdir)" $(AWK) -f $@.awk "$(srcdir)"/$@.in >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@
@-$(CMP) "$(srcdir)"/$@.ok _$@ && rm -f _$@
+
+randtest::
+ @echo $@
+ @GAWK="$(AWKPROG)" "$(srcdir)"/randtest.sh >_$@
+ @-$(CMP) "$(srcdir)"/$@.ok _$@ && rm -f _$@
+
backbigs1:
@echo $@
@[ -z "$$GAWKLOCALE" ] && GAWKLOCALE=en_US.UTF-8; \
diff --git a/test/Makefile.in b/test/Makefile.in
index c2efe1ed..d1cdb26a 100644
--- a/test/Makefile.in
+++ b/test/Makefile.in
@@ -947,6 +947,8 @@ EXTRA_DIST = \
rand-mpfr.ok \
rand.awk \
rand.ok \
+ randtest.sh \
+ randtest.ok \
range1.awk \
range1.in \
range1.ok \
@@ -1208,7 +1210,7 @@ BASIC_TESTS = \
paramdup paramres paramtyp paramuninitglobal parse1 parsefld parseme \
pcntplus posix2008sub prdupval prec printf0 printf1 prmarscl prmreuse \
prt1eval prtoeval \
- rand range1 rebt8b1 redfilnm regeq regexprange regrange reindops \
+ rand randtest range1 rebt8b1 redfilnm regeq regexprange regrange reindops \
reparse resplit rri1 rs rsnul1nl rsnulbig rsnulbig2 rstest1 rstest2 \
rstest3 rstest4 rstest5 rswhite \
scalar sclforin sclifin sortempty splitargv splitarr splitdef \
@@ -2296,6 +2298,11 @@ dfamb1:
AWKPATH="$(srcdir)" $(AWK) -f $@.awk "$(srcdir)"/$@.in >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@
@-$(CMP) "$(srcdir)"/$@.ok _$@ && rm -f _$@
+randtest::
+ @echo $@
+ @GAWK="$(AWKPROG)" "$(srcdir)"/randtest.sh >_$@
+ @-$(CMP) "$(srcdir)"/$@.ok _$@ && rm -f _$@
+
backbigs1:
@echo $@
@[ -z "$$GAWKLOCALE" ] && GAWKLOCALE=en_US.UTF-8; \
diff --git a/test/rand.ok b/test/rand.ok
index 60432b95..1df4ba39 100644
--- a/test/rand.ok
+++ b/test/rand.ok
@@ -1 +1 @@
- 62 67 88 6 35 77 3 68 30 96 90 26 35 8 88 93 49 53 37
+ 67 6 77 68 96 26 8 93 53 74 53 95 78 74 96 77 33 58 91
diff --git a/test/randtest.ok b/test/randtest.ok
new file mode 100644
index 00000000..e69de29b
--- /dev/null
+++ b/test/randtest.ok
diff --git a/test/randtest.sh b/test/randtest.sh
new file mode 100755
index 00000000..b17fda73
--- /dev/null
+++ b/test/randtest.sh
@@ -0,0 +1,113 @@
+# THIS PURPOSELY DOES NOT HAVE A !# LINE !!!!
+#
+# Date: Mon, 9 Sep 2013 14:49:43 -0700
+# From: Bob Jewett <jewett@bill.scs.agilent.com>
+# Message-Id: <201309092149.r89Lnh94010909@bill.scs.agilent.com>
+# To: arnold@skeeve.com
+# Subject: Re: [bug-gawk] Bug in random() in builtin.c
+#
+# Hi Arnold,
+#
+# Attached below is a script that tests gawk for this particular
+# rand() problem. The pair-wise combinations show a strong
+# autocorrelation for a delay of 31 pairs of rand() samples.
+#
+# The script prints out the measured autocorrelation for a record
+# of NSAMPLES pairs. It also prints a fail message at the end if
+# it fails.
+#
+# If you want to see the autocorrelation values, there is a print
+# statement that if uncommented will save them to a file.
+#
+# Please let me know if the mailer screws up the transfer or
+# if you have any questions about the test.
+#
+# Best regards,
+# Bob
+#
+# -------------- test_pair_power_autocorrelation -----------------------
+#
+#!/bin/ksh
+
+#GAWK=/bin/gawk
+
+# ADR: Get GAWK from the environment.
+# Additional note: This wants ksh/bash for the use of $RANDOM below to
+# seed the generator. However, shells that don't provide it won't be
+# a problem since gawk will then seed the generator with the time of day,
+# as srand() will be called without an argument.
+
+# large NSAMPLES and NRUNS will bring any correlation out of the noise better
+NSAMPLES=1024; MAX_ALLOWED_SIGMA=5; NRUNS=50;
+
+$GAWK 'BEGIN{
+ srand('$RANDOM');
+ nsamples=('$NSAMPLES');
+ max_allowed_sigma=('$MAX_ALLOWED_SIGMA');
+ nruns=('$NRUNS');
+ for(tau=0;tau<nsamples/2;tau++) corr[tau]=0;
+
+ for(run=0;run<nruns;run++) {
+ sum=0;
+
+ # Fill an array with a sequence of samples that are a
+ # function of pairs of rand() values.
+
+ for(i=0;i<nsamples;i++) {
+ samp[i]=((rand()-0.5)*(rand()-0.5))^2;
+ sum=sum+samp[i];
+ }
+
+ # Subtract off the mean of the sequence:
+
+ mean=sum/nsamples;
+ for(i=0;i<nsamples;i++) samp[i]=samp[i]-mean;
+
+ # Calculate an autocorrelation function on the sequence.
+ # Because the values of rand() should be independent, there
+ # should be no peaks in the autocorrelation.
+
+ for(tau=0;tau<nsamples/2;tau++) {
+ sum=0;
+ for(i=0;i<nsamples/2;i++) sum=sum+samp[i]*samp[i+tau];
+ corr[tau]=corr[tau]+sum;
+ }
+
+ }
+ # Normalize the autocorrelation to the tau=0 value.
+
+ max_corr=corr[0];
+ for(tau=0;tau<nsamples/2;tau++) corr[tau]=corr[tau]/max_corr;
+
+ # OPTIONALLY Print out the autocorrelation values:
+
+ # for(tau=0;tau<nsamples/2;tau++) print tau, corr[tau] > "pairpower_corr.data";
+
+ # Calculate the sigma for the non-zero tau values:
+
+ power_sum=0;
+
+ for(tau=1;tau<nsamples/2;tau++) power_sum=power_sum+(corr[tau])^2;
+
+ sigma=sqrt(power_sum/(nsamples/2-1));
+
+ # See if any of the correlations exceed a reasonable number of sigma:
+
+ passed=1;
+ for(tau=1;tau<nsamples/2;tau++) {
+ if ( abs(corr[tau])/sigma > max_allowed_sigma ) {
+ print "Tau=", tau ", Autocorr=", corr[tau]/sigma, "sigma";
+ passed=0;
+ }
+ }
+ if(!passed) {
+ print "Test failed."
+ exit(1);
+ }
+ else exit (0);
+ }
+
+function abs(abs_input) { return(sqrt(abs_input^2)) ; }
+'
+
+exit 0