1#!/bin/sh 2. "${srcdir=.}/init.sh"; path_prepend_ . ../src 3 4# Test Scheme support: --add-comments option. 5 6cat <<\EOF > xg-sc-3.scm 7; a 8(setq string ; b 9; c 10(_ ; d 11"hello world" ; e 12; f 13)) 14EOF 15 16: ${XGETTEXT=xgettext} 17${XGETTEXT} --add-comments --omit-header --no-location --keyword=_ \ 18 -d xg-sc-3.tmp xg-sc-3.scm || Exit 1 19LC_ALL=C tr -d '\r' < xg-sc-3.tmp.po > xg-sc-3.po || Exit 1 20 21cat <<EOF > xg-sc-3.ok 22#. a 23#. b 24#. c 25#. d 26msgid "hello world" 27msgstr "" 28EOF 29 30: ${DIFF=diff} 31${DIFF} xg-sc-3.ok xg-sc-3.po 32result=$? 33 34exit $result 35