Blame tests/utf8-bracket

Packit 709fb3
#!/bin/sh
Packit 709fb3
# Check bracket expressions in a UTF-8 locale.
Packit 709fb3
Packit 709fb3
# Copyright 2015-2017 Free Software Foundation, Inc.
Packit 709fb3
Packit 709fb3
# This program is free software: you can redistribute it and/or modify
Packit 709fb3
# it under the terms of the GNU General Public License as published by
Packit 709fb3
# the Free Software Foundation, either version 3 of the License, or
Packit 709fb3
# (at your option) any later version.
Packit 709fb3
Packit 709fb3
# This program is distributed in the hope that it will be useful,
Packit 709fb3
# but WITHOUT ANY WARRANTY; without even the implied warranty of
Packit 709fb3
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
Packit 709fb3
# GNU General Public License for more details.
Packit 709fb3
Packit 709fb3
# You should have received a copy of the GNU General Public License
Packit 709fb3
# along with this program.  If not, see <http://www.gnu.org/licenses/>.
Packit 709fb3
Packit 709fb3
. "${srcdir=.}/init.sh"; path_prepend_ ../src
Packit 709fb3
require_en_utf8_locale_
Packit 709fb3
Packit 709fb3
printf '1\n2\n' >in || framework_failure_
Packit 709fb3
Packit 709fb3
fail=0
Packit 709fb3
Packit 709fb3
for locale in C en_US.UTF-8; do
Packit 709fb3
  for options in -qz -qzE; do
Packit 709fb3
    case $options in
Packit 709fb3
      *E*) parens='()';;
Packit 709fb3
      *) parens='\(\)';;
Packit 709fb3
    esac
Packit 709fb3
    for pattern in '1.2' '[12].2' '[1-2].2' '[1-2][^a][1-2]'; do
Packit 709fb3
      for suffix in '' "$parens\\1"; do
Packit 709fb3
        LC_ALL=$locale grep $options "$pattern$suffix" in || fail=1
Packit 709fb3
      done
Packit 709fb3
    done
Packit 709fb3
  done
Packit 709fb3
done
Packit 709fb3
Packit 709fb3
Exit $fail