From ad02fe338b4e777c95913d5a874984bb18c33be0 Mon Sep 17 00:00:00 2001 From: Bruno Haible Date: Sat, 26 Feb 2005 15:48:36 +0000 Subject: [PATCH] Remove #! support. --- gettext-tools/src/ChangeLog | 5 +++++ gettext-tools/src/format-scheme.c | 11 ----------- gettext-tools/tests/ChangeLog | 4 ++++ gettext-tools/tests/format-scheme-1 | 2 -- 4 files changed, 9 insertions(+), 13 deletions(-) diff --git a/gettext-tools/src/ChangeLog b/gettext-tools/src/ChangeLog index bc4095020..26bfd6c4c 100644 --- a/gettext-tools/src/ChangeLog +++ b/gettext-tools/src/ChangeLog @@ -1,3 +1,8 @@ +2005-02-26 Bruno Haible + + * format-scheme.c (parse_upto): Remove support for ~!. + Reported by Kevin Ryde . + 2005-02-24 Bruno Haible * gettext-0.14.2 released. diff --git a/gettext-tools/src/format-scheme.c b/gettext-tools/src/format-scheme.c index d3208dbaf..b01aaedbd 100644 --- a/gettext-tools/src/format-scheme.c +++ b/gettext-tools/src/format-scheme.c @@ -3236,17 +3236,6 @@ parse_upto (const char **formatp, *separatorp = (colon_p ? 2 : 1); return true; - case '!': /* FORMAT-CALL, a CLISP extension */ - if (!nocheck_params (&list, paramcount, params, - spec->directives, invalid_reason)) - return false; - if (position >= 0) - { - add_req_type_constraint (&list, position++, FAT_FUNCTION); - add_req_type_constraint (&list, position++, FAT_OBJECT); - } - break; - default: --format; *invalid_reason = diff --git a/gettext-tools/tests/ChangeLog b/gettext-tools/tests/ChangeLog index bcdaf1c8a..426558fae 100644 --- a/gettext-tools/tests/ChangeLog +++ b/gettext-tools/tests/ChangeLog @@ -1,3 +1,7 @@ +2005-02-26 Bruno Haible + + * format-scheme-1: Remove test for #!. + 2005-02-24 Bruno Haible * gettext-0.14.2 released. diff --git a/gettext-tools/tests/format-scheme-1 b/gettext-tools/tests/format-scheme-1 index 41f10aff1..735274376 100755 --- a/gettext-tools/tests/format-scheme-1 +++ b/gettext-tools/tests/format-scheme-1 @@ -241,8 +241,6 @@ cat <<\EOF > f-sc-1.data "abc~{~(~}~)" # Invalid: wrongly nested "abc~{~<~}~>" -# Valid: FORMAT-CALL, (f * | . *) -"abc~!" # Valid: any number of arguments "abc~v,v,v,v,v!" # Invalid: type incompatibility between integer and list -- 2.47.2