[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[gawk-diffs] [SCM] gawk branch, gawk-4.2-stable, updated. gawk-4.1.0-297
|
From: |
Arnold Robbins |
|
Subject: |
[gawk-diffs] [SCM] gawk branch, gawk-4.2-stable, updated. gawk-4.1.0-2974-g29f1563 |
|
Date: |
Sun, 27 May 2018 11:43:38 -0400 (EDT) |
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-4.2-stable has been updated
via 29f1563294ac1ab19aa252f3fd5fca94c4f88516 (commit)
from 58cc32a6d4a179b3005f8e4fecbff932da681fba (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=29f1563294ac1ab19aa252f3fd5fca94c4f88516
commit 29f1563294ac1ab19aa252f3fd5fca94c4f88516
Author: Arnold D. Robbins <address@hidden>
Date: Sun May 27 18:43:20 2018 +0300
Bug fix to extract.awk. Rerun and update files.
diff --git a/awklib/ChangeLog b/awklib/ChangeLog
index 4fdcb8b..acc0d20 100644
--- a/awklib/ChangeLog
+++ b/awklib/ChangeLog
@@ -1,3 +1,7 @@
+2018-05-27 Arnold D. Robbins <address@hidden>
+
+ * extract.awk: Updated after changes.
+
2018-04-11 Arnold D. Robbins <address@hidden>
* .gitignore: Add pwcat.c and grcat.c. Remove igawk. Sort the list.
diff --git a/awklib/eg/network/stoxpred.awk b/awklib/eg/network/stoxpred.awk
index 62744c1..aa1fbe9 100644
--- a/awklib/eg/network/stoxpred.awk
+++ b/awklib/eg/network/stoxpred.awk
@@ -1,3 +1,32 @@
+BEGIN {
+ Init()
+ ReadQuotes()
+ CleanUp()
+ Prediction()
+ Report()
+ SendMail()
+}
+function Init() {
+ if (ARGC != 1) {
+ print "STOXPRED - daily stock share prediction"
+ print "IN:\n no parameters, nothing on stdin"
+ print "PARAM:\n -v Proxy=MyProxy -v ProxyPort=80"
+ print "OUT:\n commented predictions as email"
+ print "JK 09.10.2000"
+ exit
+ }
+ # Remember ticker symbols from Dow Jones Industrial Index
+ StockCount = split("AA GE JNJ MSFT AXP GM JPM PG BA HD KO \
+ SBC C HON MCD T CAT HWP MMM UTX DD IBM MO WMT DIS INTC \
+ MRK XOM EK IP", name);
+ # Remember the current date as the end of the time series
+ day = strftime("%d")
+ month = strftime("%m")
+ year = strftime("%Y")
+ if (Proxy == "") Proxy = "chart.yahoo.com"
+ if (ProxyPort == 0) ProxyPort = 80
+ YahooData = "/inet/tcp/0/" Proxy "/" ProxyPort
+}
function ReadQuotes() {
# Retrieve historical data for each ticker symbol
FS = ","
diff --git a/awklib/eg/prog/extract.awk b/awklib/eg/prog/extract.awk
index f5dfcf4..ff598e8 100644
--- a/awklib/eg/prog/extract.awk
+++ b/awklib/eg/prog/extract.awk
@@ -30,7 +30,7 @@ BEGIN { IGNORECASE = 1 }
}
if ($3 != curfile) {
if (curfile != "")
- close(curfile)
+ filelist[curfile]++ # save to close later
curfile = $3
}
@@ -60,14 +60,13 @@ BEGIN { IGNORECASE = 1 }
print join(a, 1, n, SUBSEP) > curfile
}
}
+END {
+ for (f in filelist)
+ close(filelist[f])
+}
function unexpected_eof()
{
printf("extract: %s:%d: unexpected EOF or error\n",
FILENAME, FNR) > "/dev/stderr"
exit 1
}
-
-END {
- if (curfile)
- close(curfile)
-}
diff --git a/awklib/eg/prog/indirectcall.awk b/awklib/eg/prog/indirectcall.awk
index 165b022..b2b8268 100644
--- a/awklib/eg/prog/indirectcall.awk
+++ b/awklib/eg/prog/indirectcall.awk
@@ -1,3 +1,48 @@
+# indirectcall.awk --- Demonstrate indirect function calls
+#
+# Arnold Robbins, address@hidden, Public Domain
+# January 2009
+# average --- return the average of the values in fields $first - $last
+
+function average(first, last, sum, i)
+{
+ sum = 0;
+ for (i = first; i <= last; i++)
+ sum += $i
+
+ return sum / (last - first + 1)
+}
+
+# sum --- return the sum of the values in fields $first - $last
+
+function sum(first, last, ret, i)
+{
+ ret = 0;
+ for (i = first; i <= last; i++)
+ ret += $i
+
+ return ret
+}
+# For each record, print the class name and the requested statistics
+{
+ class_name = $1
+ gsub(/_/, " ", class_name) # Replace _ with spaces
+
+ # find start
+ for (i = 1; i <= NF; i++) {
+ if ($i == "data:") {
+ start = i + 1
+ break
+ }
+ }
+
+ printf("%s:\n", class_name)
+ for (i = 2; $i != "data:"; i++) {
+ the_function = $i
+ printf("\t%s: <%s>\n", $i, @the_function(start, NF) "")
+ }
+ print ""
+}
# num_lt --- do a numeric less than comparison
function num_lt(left, right)
diff --git a/awklib/extract.awk b/awklib/extract.awk
index 2662574..96fc949 100644
--- a/awklib/extract.awk
+++ b/awklib/extract.awk
@@ -30,7 +30,7 @@ BEGIN { IGNORECASE = 1 }
}
if ($3 != curfile) {
if (curfile != "")
- close(curfile)
+ filelist[curfile]++ # save to close later
curfile = $3
}
@@ -60,6 +60,10 @@ BEGIN { IGNORECASE = 1 }
print join(a, 1, n, SUBSEP) > curfile
}
}
+END {
+ for (f in filelist)
+ close(filelist[f])
+}
function unexpected_eof()
{
printf("extract: %s:%d: unexpected EOF or error\n",
@@ -67,10 +71,6 @@ function unexpected_eof()
exit 1
}
-END {
- if (curfile)
- close(curfile)
-}
# join.awk --- join an array into a string
#
# Arnold Robbins, address@hidden, Public Domain
diff --git a/doc/ChangeLog b/doc/ChangeLog
index d7b2d85..f4008f0 100644
--- a/doc/ChangeLog
+++ b/doc/ChangeLog
@@ -1,3 +1,11 @@
+2018-05-27 Arnold D. Robbins <address@hidden>
+
+ * gawktexi.in (Extract Program): Bug fix. Keep the files open
+ in case one program's bits are intermixed with another's.
+ Then close them all at the end. Bug report was about
+ indirectcall.awk but affected another file as well. Thanks
+ to Ramasahayam Reddy <address@hidden> for the report.
+
2018-05-23 Arnold D. Robbins <address@hidden>
* gawktexi.in (Auto-Set): For PROCINFO["sorted_in"], make the xref
diff --git a/doc/gawk.info b/doc/gawk.info
index 1e3133a..eb35cef 100644
--- a/doc/gawk.info
+++ b/doc/gawk.info
@@ -19003,7 +19003,7 @@ back into a single line. That line is then printed to
the output file:
}
if ($3 != curfile) {
if (curfile != "")
- close(curfile)
+ filelist[curfile]++ # save to close later
curfile = $3
}
@@ -19042,6 +19042,19 @@ source file (as has been done here!) without any
hassle. The file is
only closed when a new data file name is encountered or at the end of
the input file.
+ When a new file name is encountered, instead of closing the file, the
+program saves the name of the current file in 'filelist'. This makes it
+possible to interleave the code for more than one file in the Texinfo
+input file. (Previous versions of this program _did_ close the file.
+But because of the '>' redirection, a file whose parts were not all one
+after the other ended up getting clobbered.) An 'END' rule then closes
+all the open files when processing is finished:
+
+ END {
+ for (f in filelist)
+ close(filelist[f])
+ }
+
Finally, the function 'unexpected_eof()' prints an appropriate error
message and then exits. The 'END' rule handles the final cleanup,
closing the open file:
@@ -19053,11 +19066,6 @@ closing the open file:
exit 1
}
- END {
- if (curfile)
- close(curfile)
- }
-
File: gawk.info, Node: Simple Sed, Next: Igawk Program, Prev: Extract
Program, Up: Miscellaneous Programs
@@ -36363,241 +36371,241 @@ Ref: Labels Program-Footnote-1764674
Node: Word Sorting764758
Node: History Sorting768830
Node: Extract Program770665
-Node: Simple Sed778195
-Node: Igawk Program781269
-Ref: Igawk Program-Footnote-1795600
-Ref: Igawk Program-Footnote-2795802
-Ref: Igawk Program-Footnote-3795924
-Node: Anagram Program796039
-Node: Signature Program799101
-Node: Programs Summary800348
-Node: Programs Exercises801562
-Ref: Programs Exercises-Footnote-1805691
-Node: Advanced Features805782
-Node: Nondecimal Data807772
-Node: Array Sorting809363
-Node: Controlling Array Traversal810063
-Ref: Controlling Array Traversal-Footnote-1818431
-Node: Array Sorting Functions818549
-Ref: Array Sorting Functions-Footnote-1823640
-Node: Two-way I/O823836
-Ref: Two-way I/O-Footnote-1830388
-Ref: Two-way I/O-Footnote-2830575
-Node: TCP/IP Networking830657
-Node: Profiling833775
-Ref: Profiling-Footnote-1842447
-Node: Advanced Features Summary842770
-Node: Internationalization844614
-Node: I18N and L10N846094
-Node: Explaining gettext846781
-Ref: Explaining gettext-Footnote-1852673
-Ref: Explaining gettext-Footnote-2852858
-Node: Programmer i18n853023
-Ref: Programmer i18n-Footnote-1857972
-Node: Translator i18n858021
-Node: String Extraction858815
-Ref: String Extraction-Footnote-1859947
-Node: Printf Ordering860033
-Ref: Printf Ordering-Footnote-1862819
-Node: I18N Portability862883
-Ref: I18N Portability-Footnote-1865339
-Node: I18N Example865402
-Ref: I18N Example-Footnote-1868208
-Node: Gawk I18N868281
-Node: I18N Summary868926
-Node: Debugger870267
-Node: Debugging871290
-Node: Debugging Concepts871731
-Node: Debugging Terms873540
-Node: Awk Debugging876115
-Node: Sample Debugging Session877021
-Node: Debugger Invocation877555
-Node: Finding The Bug878941
-Node: List of Debugger Commands885419
-Node: Breakpoint Control886752
-Node: Debugger Execution Control890446
-Node: Viewing And Changing Data893808
-Node: Execution Stack897182
-Node: Debugger Info898819
-Node: Miscellaneous Debugger Commands902890
-Node: Readline Support907952
-Node: Limitations908848
-Node: Debugging Summary910957
-Node: Arbitrary Precision Arithmetic912236
-Node: Computer Arithmetic913721
-Ref: table-numeric-ranges917487
-Ref: table-floating-point-ranges917980
-Ref: Computer Arithmetic-Footnote-1918638
-Node: Math Definitions918695
-Ref: table-ieee-formats922011
-Ref: Math Definitions-Footnote-1922614
-Node: MPFR features922719
-Node: FP Math Caution924437
-Ref: FP Math Caution-Footnote-1925509
-Node: Inexactness of computations925878
-Node: Inexact representation926838
-Node: Comparing FP Values928198
-Node: Errors accumulate929280
-Node: Getting Accuracy930713
-Node: Try To Round933423
-Node: Setting precision934322
-Ref: table-predefined-precision-strings935019
-Node: Setting the rounding mode936849
-Ref: table-gawk-rounding-modes937223
-Ref: Setting the rounding mode-Footnote-1941154
-Node: Arbitrary Precision Integers941333
-Ref: Arbitrary Precision Integers-Footnote-1944508
-Node: Checking for MPFR944657
-Node: POSIX Floating Point Problems946131
-Ref: POSIX Floating Point Problems-Footnote-1950002
-Node: Floating point summary950040
-Node: Dynamic Extensions952230
-Node: Extension Intro953783
-Node: Plugin License955049
-Node: Extension Mechanism Outline955846
-Ref: figure-load-extension956285
-Ref: figure-register-new-function957850
-Ref: figure-call-new-function958942
-Node: Extension API Description961004
-Node: Extension API Functions Introduction962646
-Node: General Data Types968186
-Ref: General Data Types-Footnote-1976547
-Node: Memory Allocation Functions976846
-Ref: Memory Allocation Functions-Footnote-1981056
-Node: Constructor Functions981155
-Node: Registration Functions984741
-Node: Extension Functions985426
-Node: Exit Callback Functions990641
-Node: Extension Version String991891
-Node: Input Parsers992554
-Node: Output Wrappers1005275
-Node: Two-way processors1009787
-Node: Printing Messages1012052
-Ref: Printing Messages-Footnote-11013223
-Node: Updating ERRNO1013376
-Node: Requesting Values1014115
-Ref: table-value-types-returned1014852
-Node: Accessing Parameters1015788
-Node: Symbol Table Access1017023
-Node: Symbol table by name1017535
-Node: Symbol table by cookie1019324
-Ref: Symbol table by cookie-Footnote-11023509
-Node: Cached values1023573
-Ref: Cached values-Footnote-11027109
-Node: Array Manipulation1027262
-Ref: Array Manipulation-Footnote-11028353
-Node: Array Data Types1028390
-Ref: Array Data Types-Footnote-11031048
-Node: Array Functions1031140
-Node: Flattening Arrays1035638
-Node: Creating Arrays1042614
-Node: Redirection API1047381
-Node: Extension API Variables1050214
-Node: Extension Versioning1050925
-Ref: gawk-api-version1051354
-Node: Extension GMP/MPFR Versioning1053085
-Node: Extension API Informational Variables1054713
-Node: Extension API Boilerplate1055786
-Node: Changes from API V11059760
-Node: Finding Extensions1061332
-Node: Extension Example1061891
-Node: Internal File Description1062689
-Node: Internal File Ops1066769
-Ref: Internal File Ops-Footnote-11078119
-Node: Using Internal File Ops1078259
-Ref: Using Internal File Ops-Footnote-11080642
-Node: Extension Samples1080916
-Node: Extension Sample File Functions1082445
-Node: Extension Sample Fnmatch1090094
-Node: Extension Sample Fork1091581
-Node: Extension Sample Inplace1092799
-Node: Extension Sample Ord1096016
-Node: Extension Sample Readdir1096852
-Ref: table-readdir-file-types1097741
-Node: Extension Sample Revout1098546
-Node: Extension Sample Rev2way1099135
-Node: Extension Sample Read write array1099875
-Node: Extension Sample Readfile1101817
-Node: Extension Sample Time1102912
-Node: Extension Sample API Tests1104260
-Node: gawkextlib1104752
-Node: Extension summary1107670
-Node: Extension Exercises1111372
-Node: Language History1112870
-Node: V7/SVR3.11114526
-Node: SVR41116678
-Node: POSIX1118112
-Node: BTL1119492
-Node: POSIX/GNU1120221
-Node: Feature History1125999
-Node: Common Extensions1141858
-Node: Ranges and Locales1143141
-Ref: Ranges and Locales-Footnote-11147757
-Ref: Ranges and Locales-Footnote-21147784
-Ref: Ranges and Locales-Footnote-31148019
-Node: Contributors1148240
-Node: History summary1154185
-Node: Installation1155565
-Node: Gawk Distribution1156509
-Node: Getting1156993
-Node: Extracting1157956
-Node: Distribution contents1159594
-Node: Unix Installation1166074
-Node: Quick Installation1166756
-Node: Shell Startup Files1169170
-Node: Additional Configuration Options1170259
-Node: Configuration Philosophy1172552
-Node: Non-Unix Installation1174921
-Node: PC Installation1175381
-Node: PC Binary Installation1176219
-Node: PC Compiling1176654
-Node: PC Using1177771
-Node: Cygwin1180986
-Node: MSYS1182085
-Node: VMS Installation1182586
-Node: VMS Compilation1183377
-Ref: VMS Compilation-Footnote-11184606
-Node: VMS Dynamic Extensions1184664
-Node: VMS Installation Details1186349
-Node: VMS Running1188602
-Node: VMS GNV1192881
-Node: VMS Old Gawk1193616
-Node: Bugs1194087
-Node: Bug address1194750
-Node: Usenet1197542
-Node: Maintainers1198319
-Node: Other Versions1199580
-Node: Installation summary1206342
-Node: Notes1207544
-Node: Compatibility Mode1208409
-Node: Additions1209191
-Node: Accessing The Source1210116
-Node: Adding Code1211553
-Node: New Ports1217772
-Node: Derived Files1222260
-Ref: Derived Files-Footnote-11227906
-Ref: Derived Files-Footnote-21227941
-Ref: Derived Files-Footnote-31228539
-Node: Future Extensions1228653
-Node: Implementation Limitations1229311
-Node: Extension Design1230494
-Node: Old Extension Problems1231648
-Ref: Old Extension Problems-Footnote-11233166
-Node: Extension New Mechanism Goals1233223
-Ref: Extension New Mechanism Goals-Footnote-11236587
-Node: Extension Other Design Decisions1236776
-Node: Extension Future Growth1238889
-Node: Old Extension Mechanism1239725
-Node: Notes summary1241488
-Node: Basic Concepts1242670
-Node: Basic High Level1243351
-Ref: figure-general-flow1243633
-Ref: figure-process-flow1244318
-Ref: Basic High Level-Footnote-11247619
-Node: Basic Data Typing1247804
-Node: Glossary1251132
-Node: Copying1282970
-Node: GNU Free Documentation License1320513
-Node: Index1345633
+Node: Simple Sed778716
+Node: Igawk Program781790
+Ref: Igawk Program-Footnote-1796121
+Ref: Igawk Program-Footnote-2796323
+Ref: Igawk Program-Footnote-3796445
+Node: Anagram Program796560
+Node: Signature Program799622
+Node: Programs Summary800869
+Node: Programs Exercises802083
+Ref: Programs Exercises-Footnote-1806212
+Node: Advanced Features806303
+Node: Nondecimal Data808293
+Node: Array Sorting809884
+Node: Controlling Array Traversal810584
+Ref: Controlling Array Traversal-Footnote-1818952
+Node: Array Sorting Functions819070
+Ref: Array Sorting Functions-Footnote-1824161
+Node: Two-way I/O824357
+Ref: Two-way I/O-Footnote-1830909
+Ref: Two-way I/O-Footnote-2831096
+Node: TCP/IP Networking831178
+Node: Profiling834296
+Ref: Profiling-Footnote-1842968
+Node: Advanced Features Summary843291
+Node: Internationalization845135
+Node: I18N and L10N846615
+Node: Explaining gettext847302
+Ref: Explaining gettext-Footnote-1853194
+Ref: Explaining gettext-Footnote-2853379
+Node: Programmer i18n853544
+Ref: Programmer i18n-Footnote-1858493
+Node: Translator i18n858542
+Node: String Extraction859336
+Ref: String Extraction-Footnote-1860468
+Node: Printf Ordering860554
+Ref: Printf Ordering-Footnote-1863340
+Node: I18N Portability863404
+Ref: I18N Portability-Footnote-1865860
+Node: I18N Example865923
+Ref: I18N Example-Footnote-1868729
+Node: Gawk I18N868802
+Node: I18N Summary869447
+Node: Debugger870788
+Node: Debugging871811
+Node: Debugging Concepts872252
+Node: Debugging Terms874061
+Node: Awk Debugging876636
+Node: Sample Debugging Session877542
+Node: Debugger Invocation878076
+Node: Finding The Bug879462
+Node: List of Debugger Commands885940
+Node: Breakpoint Control887273
+Node: Debugger Execution Control890967
+Node: Viewing And Changing Data894329
+Node: Execution Stack897703
+Node: Debugger Info899340
+Node: Miscellaneous Debugger Commands903411
+Node: Readline Support908473
+Node: Limitations909369
+Node: Debugging Summary911478
+Node: Arbitrary Precision Arithmetic912757
+Node: Computer Arithmetic914242
+Ref: table-numeric-ranges918008
+Ref: table-floating-point-ranges918501
+Ref: Computer Arithmetic-Footnote-1919159
+Node: Math Definitions919216
+Ref: table-ieee-formats922532
+Ref: Math Definitions-Footnote-1923135
+Node: MPFR features923240
+Node: FP Math Caution924958
+Ref: FP Math Caution-Footnote-1926030
+Node: Inexactness of computations926399
+Node: Inexact representation927359
+Node: Comparing FP Values928719
+Node: Errors accumulate929801
+Node: Getting Accuracy931234
+Node: Try To Round933944
+Node: Setting precision934843
+Ref: table-predefined-precision-strings935540
+Node: Setting the rounding mode937370
+Ref: table-gawk-rounding-modes937744
+Ref: Setting the rounding mode-Footnote-1941675
+Node: Arbitrary Precision Integers941854
+Ref: Arbitrary Precision Integers-Footnote-1945029
+Node: Checking for MPFR945178
+Node: POSIX Floating Point Problems946652
+Ref: POSIX Floating Point Problems-Footnote-1950523
+Node: Floating point summary950561
+Node: Dynamic Extensions952751
+Node: Extension Intro954304
+Node: Plugin License955570
+Node: Extension Mechanism Outline956367
+Ref: figure-load-extension956806
+Ref: figure-register-new-function958371
+Ref: figure-call-new-function959463
+Node: Extension API Description961525
+Node: Extension API Functions Introduction963167
+Node: General Data Types968707
+Ref: General Data Types-Footnote-1977068
+Node: Memory Allocation Functions977367
+Ref: Memory Allocation Functions-Footnote-1981577
+Node: Constructor Functions981676
+Node: Registration Functions985262
+Node: Extension Functions985947
+Node: Exit Callback Functions991162
+Node: Extension Version String992412
+Node: Input Parsers993075
+Node: Output Wrappers1005796
+Node: Two-way processors1010308
+Node: Printing Messages1012573
+Ref: Printing Messages-Footnote-11013744
+Node: Updating ERRNO1013897
+Node: Requesting Values1014636
+Ref: table-value-types-returned1015373
+Node: Accessing Parameters1016309
+Node: Symbol Table Access1017544
+Node: Symbol table by name1018056
+Node: Symbol table by cookie1019845
+Ref: Symbol table by cookie-Footnote-11024030
+Node: Cached values1024094
+Ref: Cached values-Footnote-11027630
+Node: Array Manipulation1027783
+Ref: Array Manipulation-Footnote-11028874
+Node: Array Data Types1028911
+Ref: Array Data Types-Footnote-11031569
+Node: Array Functions1031661
+Node: Flattening Arrays1036159
+Node: Creating Arrays1043135
+Node: Redirection API1047902
+Node: Extension API Variables1050735
+Node: Extension Versioning1051446
+Ref: gawk-api-version1051875
+Node: Extension GMP/MPFR Versioning1053606
+Node: Extension API Informational Variables1055234
+Node: Extension API Boilerplate1056307
+Node: Changes from API V11060281
+Node: Finding Extensions1061853
+Node: Extension Example1062412
+Node: Internal File Description1063210
+Node: Internal File Ops1067290
+Ref: Internal File Ops-Footnote-11078640
+Node: Using Internal File Ops1078780
+Ref: Using Internal File Ops-Footnote-11081163
+Node: Extension Samples1081437
+Node: Extension Sample File Functions1082966
+Node: Extension Sample Fnmatch1090615
+Node: Extension Sample Fork1092102
+Node: Extension Sample Inplace1093320
+Node: Extension Sample Ord1096537
+Node: Extension Sample Readdir1097373
+Ref: table-readdir-file-types1098262
+Node: Extension Sample Revout1099067
+Node: Extension Sample Rev2way1099656
+Node: Extension Sample Read write array1100396
+Node: Extension Sample Readfile1102338
+Node: Extension Sample Time1103433
+Node: Extension Sample API Tests1104781
+Node: gawkextlib1105273
+Node: Extension summary1108191
+Node: Extension Exercises1111893
+Node: Language History1113391
+Node: V7/SVR3.11115047
+Node: SVR41117199
+Node: POSIX1118633
+Node: BTL1120013
+Node: POSIX/GNU1120742
+Node: Feature History1126520
+Node: Common Extensions1142379
+Node: Ranges and Locales1143662
+Ref: Ranges and Locales-Footnote-11148278
+Ref: Ranges and Locales-Footnote-21148305
+Ref: Ranges and Locales-Footnote-31148540
+Node: Contributors1148761
+Node: History summary1154706
+Node: Installation1156086
+Node: Gawk Distribution1157030
+Node: Getting1157514
+Node: Extracting1158477
+Node: Distribution contents1160115
+Node: Unix Installation1166595
+Node: Quick Installation1167277
+Node: Shell Startup Files1169691
+Node: Additional Configuration Options1170780
+Node: Configuration Philosophy1173073
+Node: Non-Unix Installation1175442
+Node: PC Installation1175902
+Node: PC Binary Installation1176740
+Node: PC Compiling1177175
+Node: PC Using1178292
+Node: Cygwin1181507
+Node: MSYS1182606
+Node: VMS Installation1183107
+Node: VMS Compilation1183898
+Ref: VMS Compilation-Footnote-11185127
+Node: VMS Dynamic Extensions1185185
+Node: VMS Installation Details1186870
+Node: VMS Running1189123
+Node: VMS GNV1193402
+Node: VMS Old Gawk1194137
+Node: Bugs1194608
+Node: Bug address1195271
+Node: Usenet1198063
+Node: Maintainers1198840
+Node: Other Versions1200101
+Node: Installation summary1206863
+Node: Notes1208065
+Node: Compatibility Mode1208930
+Node: Additions1209712
+Node: Accessing The Source1210637
+Node: Adding Code1212074
+Node: New Ports1218293
+Node: Derived Files1222781
+Ref: Derived Files-Footnote-11228427
+Ref: Derived Files-Footnote-21228462
+Ref: Derived Files-Footnote-31229060
+Node: Future Extensions1229174
+Node: Implementation Limitations1229832
+Node: Extension Design1231015
+Node: Old Extension Problems1232169
+Ref: Old Extension Problems-Footnote-11233687
+Node: Extension New Mechanism Goals1233744
+Ref: Extension New Mechanism Goals-Footnote-11237108
+Node: Extension Other Design Decisions1237297
+Node: Extension Future Growth1239410
+Node: Old Extension Mechanism1240246
+Node: Notes summary1242009
+Node: Basic Concepts1243191
+Node: Basic High Level1243872
+Ref: figure-general-flow1244154
+Ref: figure-process-flow1244839
+Ref: Basic High Level-Footnote-11248140
+Node: Basic Data Typing1248325
+Node: Glossary1251653
+Node: Copying1283491
+Node: GNU Free Documentation License1321034
+Node: Index1346154
End Tag Table
diff --git a/doc/gawk.texi b/doc/gawk.texi
index b668595..9a3c75f 100644
--- a/doc/gawk.texi
+++ b/doc/gawk.texi
@@ -21081,7 +21081,7 @@ using indirect function calls:
@ignore
@c file eg/prog/indirectcall.awk
#
-# Arnold Robbins, address@hidden, Public Domain
+# Arnold Robbins, arnold@@skeeve.com, Public Domain
# January 2009
@c endfile
@end ignore
@@ -26728,7 +26728,7 @@ line. That line is then printed to the output file:
@}
if ($3 != curfile) @{
if (curfile != "")
- close(curfile)
+ filelist[curfile]++ # save to close later
curfile = $3
@}
@@ -26772,6 +26772,26 @@ sample source file (as has been done here!) without
any hassle. The file is
only closed when a new @value{DF} name is encountered or at the end of the
input file.
+When a new @value{FN} is encountered, instead of closing the file,
+the program saves the name of the current file in @code{filelist}.
+This makes it possible to interleave the code for more than one file in
+the Texinfo input file. (Previous versions of this program @emph{did}
+close the file. But because of the @samp{>} redirection, a file whose
+parts were not all one after the other ended up getting clobbered.)
+An @code{END} rule then closes all the open files when processing
+is finished:
+
address@hidden
address@hidden file eg/prog/extract.awk
address@hidden
+END @{
+ for (f in filelist)
+ close(filelist[f])
address@hidden
address@hidden group
address@hidden endfile
address@hidden example
+
Finally, the function @address@hidden()}} prints an appropriate
error message and then exits.
The @code{END} rule handles the final cleanup, closing the open file:
@@ -26786,11 +26806,6 @@ function unexpected_eof()
exit 1
@}
@end group
-
-END @{
- if (curfile)
- close(curfile)
address@hidden
@c endfile
@end example
diff --git a/doc/gawktexi.in b/doc/gawktexi.in
index b62d12c..c645a8e 100644
--- a/doc/gawktexi.in
+++ b/doc/gawktexi.in
@@ -20124,7 +20124,7 @@ using indirect function calls:
@ignore
@c file eg/prog/indirectcall.awk
#
-# Arnold Robbins, address@hidden, Public Domain
+# Arnold Robbins, arnold@@skeeve.com, Public Domain
# January 2009
@c endfile
@end ignore
@@ -25741,7 +25741,7 @@ line. That line is then printed to the output file:
@}
if ($3 != curfile) @{
if (curfile != "")
- close(curfile)
+ filelist[curfile]++ # save to close later
curfile = $3
@}
@@ -25785,6 +25785,26 @@ sample source file (as has been done here!) without
any hassle. The file is
only closed when a new @value{DF} name is encountered or at the end of the
input file.
+When a new @value{FN} is encountered, instead of closing the file,
+the program saves the name of the current file in @code{filelist}.
+This makes it possible to interleave the code for more than one file in
+the Texinfo input file. (Previous versions of this program @emph{did}
+close the file. But because of the @samp{>} redirection, a file whose
+parts were not all one after the other ended up getting clobbered.)
+An @code{END} rule then closes all the open files when processing
+is finished:
+
address@hidden
address@hidden file eg/prog/extract.awk
address@hidden
+END @{
+ for (f in filelist)
+ close(filelist[f])
address@hidden
address@hidden group
address@hidden endfile
address@hidden example
+
Finally, the function @address@hidden()}} prints an appropriate
error message and then exits.
The @code{END} rule handles the final cleanup, closing the open file:
@@ -25799,11 +25819,6 @@ function unexpected_eof()
exit 1
@}
@end group
-
-END @{
- if (curfile)
- close(curfile)
address@hidden
@c endfile
@end example
-----------------------------------------------------------------------
Summary of changes:
awklib/ChangeLog | 4 +
awklib/eg/network/stoxpred.awk | 29 +++
awklib/eg/prog/extract.awk | 11 +-
awklib/eg/prog/indirectcall.awk | 45 ++++
awklib/extract.awk | 10 +-
doc/ChangeLog | 8 +
doc/gawk.info | 492 ++++++++++++++++++++--------------------
doc/gawk.texi | 29 ++-
doc/gawktexi.in | 29 ++-
9 files changed, 390 insertions(+), 267 deletions(-)
hooks/post-receive
--
gawk
| [Prev in Thread] |
Current Thread |
[Next in Thread] |
- [gawk-diffs] [SCM] gawk branch, gawk-4.2-stable, updated. gawk-4.1.0-2974-g29f1563,
Arnold Robbins <=