diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2015-08-02 20:41:39 +0300 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2015-08-02 20:41:39 +0300 |
| commit | a90865d0db6d60847272d46020a14aad9901f304 (patch) | |
| tree | 10d821fddcfe87ca7ec5f3786fe769234b13f00d /extension/revoutput.c | |
| parent | b64f39e810edd1c9e1884a7a410bfc278ed31eda (diff) | |
| parent | c5137ae530c49765049adb53777c79ebb7607ebe (diff) | |
| download | egawk-a90865d0db6d60847272d46020a14aad9901f304.tar.gz egawk-a90865d0db6d60847272d46020a14aad9901f304.tar.bz2 egawk-a90865d0db6d60847272d46020a14aad9901f304.zip | |
Merge branch 'gawk-4.1-stable'
Diffstat (limited to 'extension/revoutput.c')
| -rw-r--r-- | extension/revoutput.c | 15 |
1 files changed, 9 insertions, 6 deletions
diff --git a/extension/revoutput.c b/extension/revoutput.c index ae4b444a..69257167 100644 --- a/extension/revoutput.c +++ b/extension/revoutput.c @@ -7,7 +7,7 @@ */ /* - * Copyright (C) 2012, 2013 the Free Software Foundation, Inc. + * Copyright (C) 2012, 2013, 2015 the Free Software Foundation, Inc. * * This file is part of GAWK, the GNU implementation of the * AWK Programming Language. @@ -47,7 +47,7 @@ static const gawk_api_t *api; /* for convenience macros to work */ static awk_ext_id_t *ext_id; -static const char *ext_version = "revoutput extension: version 1.0"; +static const char *ext_version = "revoutput extension: version 1.1"; static awk_bool_t init_revoutput(void); static awk_bool_t (*init_func)(void) = init_revoutput; @@ -120,11 +120,14 @@ init_revoutput() register_output_wrapper(& output_wrapper); - make_number(0.0, & value); /* init to false */ - if (! sym_update("REVOUT", & value)) { - warning(ext_id, _("revoutput: could not initialize REVOUT variable")); + if (! sym_lookup("REVOUT", AWK_SCALAR, & value)) { + /* only install it if not there, e.g. -v REVOUT=1 */ + make_number(0.0, & value); /* init to false */ + if (! sym_update("REVOUT", & value)) { + warning(ext_id, _("revoutput: could not initialize REVOUT variable")); - return awk_false; + return awk_false; + } } return awk_true; |