source: trunk/essentials/sys-apps/gawk/test/getlnbuf.awk@ 3174

#Date: Tue, 21 Dec 1999 16:11:07 +0100
#From: Daniel Schnell <[email protected]>
#To: [email protected]
#CC: [email protected]
#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)
                }