Blame tests/unibyte-bracket-expr

Packit 709fb3
#!/bin/sh
Packit 709fb3
# Exercise a DFA range bug that arises only with a unibyte encoding
Packit 709fb3
# for which the wide-char-to-single-byte mapping is nontrivial.
Packit 709fb3
# E.g., the regexp, [C] would fail to match C in a unibyte locale like
Packit 709fb3
# ru_RU.KOI8-R for any C whose wide-char representation differed from
Packit 709fb3
# its single-byte equivalent.
Packit 709fb3
Packit 709fb3
# Copyright (C) 2011-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_ru_RU_koi8_r
Packit 709fb3
LC_ALL=ru_RU.KOI8-R
Packit 709fb3
export LC_ALL
Packit 709fb3
Packit 709fb3
fail=0
Packit 709fb3
Packit 709fb3
i=128
Packit 709fb3
while :; do
Packit 709fb3
  in=in-$i
Packit 709fb3
  octal=$(printf '%03o' $i)
Packit 709fb3
  b=$(printf "\\$octal")
Packit 709fb3
  echo "$b" > $in || framework_failure_
Packit 709fb3
  grep "[$b]" $in > out || fail=1
Packit 709fb3
  compare out $in || fail=1
Packit 709fb3
Packit 709fb3
  test $i = 255 && break
Packit 709fb3
  i=$(expr $i + 1)
Packit 709fb3
done
Packit 709fb3
Packit 709fb3
Exit $fail