--- /dev/null
+// Copyright (C) 2007, 2008, 2009 Free Software Foundation
+//
+// This file is part of the GNU ISO C++ Library. This library is free
+// software; you can redistribute it and/or modify it under the
+// terms of the GNU General Public License as published by the
+// Free Software Foundation; either version 3, or (at your option)
+// any later version.
+
+// This library is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+// GNU General Public License for more details.
+
+// You should have received a copy of the GNU General Public License along
+// with this library; see the file COPYING3. If not see
+// <http://www.gnu.org/licenses/>.
+
+#include <string>
+#include <locale>
+#include <testsuite_hooks.h>
+
+// Based on Langer Kreft "Standard C++ IOStreams and Locales" p 316-318
+struct base_facet: public std::locale::facet
+{
+ virtual std::string msg() const
+ { return "base class"; }
+
+ static std::locale::id id;
+};
+
+std::locale::id base_facet::id;
+
+
+struct derived_facet: public base_facet
+{
+ virtual std::string msg() const
+ { return "derived class"; }
+
+ virtual std::string msg_repeater() const
+ { return "derived class derived class"; }
+
+};
+
+// PR libstdc++/30127
+// PR libstdc++/34449
+int main()
+{
+ bool test __attribute__((unused)) = true;
+
+ using std::locale;
+ using std::has_facet;
+ using std::use_facet;
+
+ locale loc_c = locale::classic();
+ locale loc_base(loc_c, new base_facet);
+ locale loc_derived(loc_c, new derived_facet);
+
+ // Standard facets.
+ VERIFY( has_facet<std::ctype<char> >(loc_c) );
+ VERIFY( has_facet<std::ctype<char> >(loc_base) );
+ VERIFY( has_facet<std::ctype<char> >(loc_derived) );
+
+ // User defined base facet.
+ VERIFY( !has_facet<base_facet>(loc_c) );
+ VERIFY( has_facet<base_facet>(loc_base) );
+ VERIFY( has_facet<base_facet>(loc_derived) );
+
+ // User defined derived facet.
+ VERIFY( !has_facet<derived_facet>(loc_c) );
+ VERIFY( !has_facet<derived_facet>(loc_base) );
+ VERIFY( has_facet<derived_facet>(loc_derived) );
+
+
+ // 1
+ try
+ {
+ if (has_facet<derived_facet>(loc_base))
+ {
+ use_facet<derived_facet>(loc_base).msg_repeater();
+ VERIFY( false );
+ }
+ }
+ catch (...)
+ {
+ // Expect no exception.
+ VERIFY( true );
+ }
+
+ // 2
+ try
+ {
+ if (has_facet<base_facet>(loc_derived))
+ use_facet<base_facet>(loc_derived).msg();
+ else
+ VERIFY( true );
+ }
+ catch (...)
+ {
+ // Expect no exception.
+ VERIFY( true );
+ }
+
+ return 0;
+}