60 lines
1.8 KiB
Bash
60 lines
1.8 KiB
Bash
|
#!/bin/bash
|
||
|
|
# vim: dict=/usr/share/beakerlib/dictionary.vim cpt=.,w,b,u,t,i,k
|
||
|
|
# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
||
|
|
#
|
||
|
|
# runtest.sh of /CoreOS/gawk/Regression/awk-syntax-support
|
||
|
|
# Description: tests awk 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 "Beth 4.00 0" > file
|
||
|
|
cat << "EOF" > prog
|
||
|
|
{
|
||
|
|
B["c","a"] = 2
|
||
|
|
A[1] = 4
|
||
|
|
print ("c","a") in B in A, C in B in A
|
||
|
|
}
|
||
|
|
EOF
|
||
|
|
rlPhaseEnd
|
||
|
|
|
||
|
|
rlPhaseStartTest
|
||
|
|
rlRun "awk -f prog file > awk.stdout"
|
||
|
|
rlAssertEquals "Correct output from awk" "1 0" "$(cat awk.stdout)"
|
||
|
|
rlPhaseEnd
|
||
|
|
|
||
|
|
rlPhaseStartCleanup
|
||
|
|
rlRun "popd"
|
||
|
|
rlRun "rm -r $TmpDir" 0 "Removing tmp directory"
|
||
|
|
rlPhaseEnd
|
||
|
|
rlJournalPrintText
|
||
|
|
rlJournalEnd
|