alpha: fix trunc for big input values
[glibc.git] / localedata / tst-fmon.sh
blobbec4322da0f06cfa0d7eef607dd3691b71a1242b
1 #!/bin/sh
2 # Testing the implementation of strfmon(3).
3 # Copyright (C) 1996-2016 Free Software Foundation, Inc.
4 # This file is part of the GNU C Library.
5 # Contributed by Jochen Hein <jochen.hein@delphi.central.de>, 1997.
7 # The GNU C Library is free software; you can redistribute it and/or
8 # modify it under the terms of the GNU Lesser General Public
9 # License as published by the Free Software Foundation; either
10 # version 2.1 of the License, or (at your option) any later version.
12 # The GNU C Library is distributed in the hope that it will be useful,
13 # but WITHOUT ANY WARRANTY; without even the implied warranty of
14 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 # Lesser General Public License for more details.
17 # You should have received a copy of the GNU Lesser General Public
18 # License along with the GNU C Library; if not, see
19 # <http://www.gnu.org/licenses/>.
21 set -e
23 common_objpfx=$1
24 run_program_prefix_before_env=$2
25 run_program_env=$3
26 run_program_prefix_after_env=$4
27 test_program_prefix=$5
28 datafile=$6
30 here=`pwd`
32 lang=`sed -e '/^#/d' -e '/^$/d' -e '/^C /d' -e '/^tstfmon/d' -e 's/^\([^ ]*\).*/\1/' $datafile | sort | uniq`
34 # Generate data files.
35 for cns in `cd ./tst-fmon-locales && ls tstfmon_*`; do
36 cn=tst-fmon-locales/$cns
37 fn=charmaps/ISO-8859-1
38 ${run_program_prefix_before_env} \
39 ${run_program_env} \
40 I18NPATH=. \
41 ${run_program_prefix_after_env} ${common_objpfx}locale/localedef \
42 --quiet -i $cn -f $fn ${common_objpfx}localedata/$cns
43 done
45 # Run the tests.
46 errcode=0
47 # There's a TAB for IFS
48 while IFS=" " read locale format value expect; do
49 case "$locale" in '#'*) continue ;; esac
50 if [ -n "$format" ]; then
51 expect=`echo "$expect" | sed 's/^\"\(.*\)\"$/\1/'`
52 ${test_program_prefix} ${common_objpfx}localedata/tst-fmon \
53 "$locale" "$format" "$value" "$expect" < /dev/null ||
54 errcode=$?
56 done < $datafile
58 exit $errcode
59 # Local Variables:
60 # mode:shell-script
61 # End: