The content of this branch was automatically imported from Fedora ELN with the following as its source: https://src.fedoraproject.org/rpms/gawk#bff1660de19e4198458d9c101564ba7f54091547
		
			
				
	
	
		
			60 lines
		
	
	
		
			1.9 KiB
		
	
	
	
		
			Bash
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			60 lines
		
	
	
		
			1.9 KiB
		
	
	
	
		
			Bash
		
	
	
		
			Executable File
		
	
	
	
	
| #!/bin/bash
 | |
| # vim: dict=/usr/share/beakerlib/dictionary.vim cpt=.,w,b,u,t,i,k
 | |
| # ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 | |
| #
 | |
| #   runtest.sh of /CoreOS/gawk/Regression/awk-assign-syntax-support
 | |
| #   Description: tests awk assign syntax support
 | |
| #   Author: Michal Nowak <mnowak@redhat.com>
 | |
| #
 | |
| # ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 | |
| #
 | |
| #   Copyright (c) 2010 Red Hat, Inc. All rights reserved.
 | |
| #
 | |
| #   This program is free software: you can redistribute it and/or
 | |
| #   modify it under the terms of the GNU General Public License as
 | |
| #   published by the Free Software Foundation, either version 3 of
 | |
| #   the License, or (at your option) any later version.
 | |
| #
 | |
| #   This program is distributed in the hope that it will be
 | |
| #   useful, but WITHOUT ANY WARRANTY; without even the implied
 | |
| #   warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
 | |
| #   PURPOSE.  See the GNU General Public License for more details.
 | |
| #
 | |
| #   You should have received a copy of the GNU General Public License
 | |
| #   along with this program. If not, see http://www.gnu.org/licenses/.
 | |
| #
 | |
| # ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 | |
| 
 | |
| # Include rhts environment
 | |
| . /usr/bin/rhts-environment.sh
 | |
| . /usr/lib/beakerlib/beakerlib.sh
 | |
| 
 | |
| PACKAGE="gawk"
 | |
| 
 | |
| rlJournalStart
 | |
|     rlPhaseStartSetup
 | |
|         rlAssertRpm $PACKAGE
 | |
|         rlRun "TmpDir=\`mktemp -d\`" 0 "Creating tmp directory"
 | |
|         rlRun "pushd $TmpDir"
 | |
| 	echo "0 1 2" > file
 | |
| 	cat << "EOF" > prog
 | |
| {
 | |
|   y = $1 !~ /Get/ ~ /1/
 | |
|   z = $2 ~ /a/ !~ /[0-9]/
 | |
|   print y z
 | |
| }
 | |
| EOF
 | |
|     rlPhaseEnd
 | |
| 
 | |
|     rlPhaseStartTest
 | |
| 	rlRun "awk -f prog file > awk.stdout" 0 "Process data with awk program"
 | |
| 	rlAssertEquals "awk processed program according to POSIX" "10" "$(cat awk.stdout)"
 | |
|     rlPhaseEnd
 | |
| 
 | |
|     rlPhaseStartCleanup
 | |
|         rlRun "popd"
 | |
|         rlRun "rm -r $TmpDir" 0 "Removing tmp directory"
 | |
|     rlPhaseEnd
 | |
| rlJournalPrintText
 | |
| rlJournalEnd
 |