1#!/bin/sh 2. "${srcdir=.}/init.sh"; path_prepend_ . ../src 3 4# Test Scheme support: strings outside any function call. 5 6cat <<EOF > xg-sc-2.scm 7(define foo '("bar" "quux")) 8EOF 9 10: ${XGETTEXT=xgettext} 11${XGETTEXT} -k_ --omit-header --no-location --force-po -d xg-sc-2 xg-sc-2.scm || Exit 1 12 13cat <<EOF > xg-sc-2.ok 14EOF 15 16: ${DIFF=diff} 17${DIFF} xg-sc-2.ok xg-sc-2.po 18result=$? 19 20exit $result 21