diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2010-07-16 12:57:07 +0300 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2010-07-16 12:57:07 +0300 |
| commit | 3ca7f0b16d0a5c105380b284a81c6a1b2c210908 (patch) | |
| tree | c2153d226b9cba3ebca0c3556b19bf3e52cd20dd /test/getlnbuf.awk | |
| parent | f20ab7c3039a4023f41372bfe4bde3b16d481df7 (diff) | |
| download | egawk-3ca7f0b16d0a5c105380b284a81c6a1b2c210908.tar.gz egawk-3ca7f0b16d0a5c105380b284a81c6a1b2c210908.tar.bz2 egawk-3ca7f0b16d0a5c105380b284a81c6a1b2c210908.zip | |
Move to gawk-3.0.5.
Diffstat (limited to 'test/getlnbuf.awk')
| -rw-r--r-- | test/getlnbuf.awk | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/test/getlnbuf.awk b/test/getlnbuf.awk new file mode 100644 index 00000000..8a4483ef --- /dev/null +++ b/test/getlnbuf.awk @@ -0,0 +1,18 @@ +#Date: Tue, 21 Dec 1999 16:11:07 +0100 +#From: Daniel Schnell <Daniel.Schnell.GP@icn.siemens.de> +#To: bug-gnu-utils@gnu.org +#CC: arnold@gnu.org +#Subject: BUG in gawk (version 3.0.4 linux, windows): Text mangeling in between + +# search for "@K@CODE" segment + +$0 ~ /@K@CODE/ { + # get next record + getline temp + printf ("@K@CODE\n") + printf ("%s\n",temp) + } + +$0 !~ /@K@CODE/ { + printf ("%s\n", $0) + } |