#! /bin/sh

# Test C support: comments.

tmpfiles=""
trap 'rm -fr $tmpfiles' 1 2 3 15

tmpfiles="$tmpfiles xg-c-7.c"
cat <<EOF > xg-c-7.c
int
main()
{
  /* This is a comment which immediately before a keyword.  */
  gettext ("1");

  // This
  // one
  // too
  // although many blank lines come before the token itself.

      


 gettext("2");

  /* this one also counts */ gettext ("3");

  gettext("4");

  /* this one is also copied */ nada
  gettext ("5");

  /* I hope you do not see the following */
  break;
  gettext("6");

  /* An unnice
     multi-line comment */ evil;
  gettext("7");
}
EOF

tmpfiles="$tmpfiles xg-c-7.po"
: ${XGETTEXT=xgettext}
${XGETTEXT} --omit-header --no-location -c --c++ -d xg-c-7 xg-c-7.c
test $? = 0 || { rm -fr $tmpfiles; exit 1; }

tmpfiles="$tmpfiles xg-c-7.ok"
cat <<EOF > xg-c-7.ok
#. This is a comment which immediately before a keyword.
msgid "1"
msgstr ""

#. This
#. one
#. too
#. although many blank lines come before the token itself.
msgid "2"
msgstr ""

#. this one also counts
msgid "3"
msgstr ""

msgid "4"
msgstr ""

#. this one is also copied
msgid "5"
msgstr ""

msgid "6"
msgstr ""

#. An unnice
#. multi-line comment
msgid "7"
msgstr ""
EOF

: ${DIFF=diff}
${DIFF} xg-c-7.ok xg-c-7.po
result=$?

rm -fr $tmpfiles

exit $result

Local Variables:
 nuke-trailing-whitespace-p:nil
End:
