xref: /illumos-gate/usr/src/test/util-tests/tests/awk/gnu/getlnbuf.awk (revision 63f91fbc3c024870d86dc3332a4a0080fb29bc40)
1#Date: Tue, 21 Dec 1999 16:11:07 +0100
2#From: Daniel Schnell <Daniel.Schnell.GP@icn.siemens.de>
3#To: bug-gnu-utils@gnu.org
4#CC: arnold@gnu.org
5#Subject: BUG in gawk (version 3.0.4 linux, windows): Text mangeling in between
6
7# search for "@K@CODE" segment
8
9$0 ~ /@K@CODE/  {
10                # get next record
11                getline temp
12                printf ("@K@CODE\n")
13                printf ("%s\n",temp)
14                }
15
16$0 !~ /@K@CODE/ {
17                printf ("%s\n", $0)
18                }
19