[bpt/guile.git] / test-suite / standalone / test-command-line-encoding2

#!/bin/sh

# Choose a locale name that lacks a dot followed by the encoding name.
# This should not confuse `environ_locale_charset'.
# See <http://bugs.gnu.org/10742> for the original bug report.
LC_ALL="en_US"
export LC_ALL
unset LANG
unset LC_CTYPE

exec guile -q -s "$0" "hello"
!#

;; Make sure our argument was suitable decoded.
(exit (string=? (cadr (program-arguments)) "hello"))

;; Local Variables:
;; mode: scheme
;; coding: iso-8859-1
;; End:
Commit	Line	Data
5de00531 LC	1	#!/bin/sh
	2
	3	# Choose a locale name that lacks a dot followed by the encoding name.
	4	# This should not confuse `environ_locale_charset'.
	5	# See <http://bugs.gnu.org/10742> for the original bug report.
	6	LC_ALL="en_US"
	7	export LC_ALL
	8	unset LANG
	9	unset LC_CTYPE
	10
	11	exec guile -q -s "$0" "hello"
	12	!#
	13
	14	;; Make sure our argument was suitable decoded.
	15	(exit (string=? (cadr (program-arguments)) "hello"))
	16
	17	;; Local Variables:
	18	;; mode: scheme
	19	;; coding: iso-8859-1
	20	;; End: