| // 2004-08-25 Benjamin Kosnik <bkoz@redhat.com> |
| // |
| // Copyright (C) 2004, 2005 Free Software Foundation, Inc. |
| // |
| // 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 2, 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 COPYING. If not, write to the Free |
| // Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, |
| // USA. |
| |
| #include <testsuite_hooks.h> |
| #include <memory> |
| #include <ext/mt_allocator.h> |
| |
| // Tune characteristics, two of same type |
| template<typename _Tp> |
| struct test_policy |
| { static bool per_type() { return true; } }; |
| |
| using __gnu_cxx::__pool; |
| using __gnu_cxx::__common_pool_policy; |
| |
| template<> |
| struct test_policy<__common_pool_policy<__pool, true> > |
| { static bool per_type() { return false; } }; |
| |
| template<> |
| struct test_policy<__common_pool_policy<__pool, false> > |
| { static bool per_type() { return false; } }; |
| |
| struct pod2 |
| { |
| int i; |
| int j; |
| int k; |
| }; |
| |
| // Tune characteristics, two of different instantiations |
| template<typename _Tp, typename _Cp> |
| void test04() |
| { |
| bool test __attribute__((unused)) = true; |
| |
| typedef __gnu_cxx::__pool_base::_Tune tune_type; |
| typedef _Tp value_type; |
| typedef _Cp policy_type; |
| typedef __gnu_cxx::__mt_alloc<value_type, policy_type> allocator_type; |
| |
| allocator_type a; |
| tune_type t_default = a._M_get_options(); |
| tune_type t_opt(32, 5120, 32, 5120, 20, 10, false); |
| tune_type t_small(16, 1024, 32, 2048, 1, 10, false); |
| |
| // First instance of local type assured. |
| tune_type t1 = t_default; |
| if (test_policy<policy_type>::per_type()) |
| { |
| a._M_set_options(t_opt); |
| t1 = a._M_get_options(); |
| VERIFY( t1._M_align != t_default._M_align ); |
| } |
| |
| // Lock tune settings. |
| typename allocator_type::pointer p1 = a.allocate(128); |
| |
| typedef pod2 value2_type; |
| typedef typename allocator_type::template rebind<value2_type>::other rebind_type; |
| |
| rebind_type a2; |
| tune_type t2 = a2._M_get_options(); |
| |
| // Both policy_type and rebind_type::policy_type have same characteristics. |
| if (test_policy<policy_type>::per_type()) |
| { |
| a2._M_set_options(t_opt); |
| tune_type t = a2._M_get_options(); |
| VERIFY( t2._M_align != t._M_align ); |
| t2 = t; |
| } |
| |
| typename rebind_type::pointer p2 = a2.allocate(5128); |
| |
| a2._M_set_options(t_small); |
| tune_type t4 = a2._M_get_options(); |
| VERIFY( t4._M_chunk_size != t_small._M_chunk_size ); |
| VERIFY( t4._M_chunk_size == t2._M_chunk_size ); |
| |
| a.deallocate(p1, 128); |
| a2.deallocate(p2, 5128); |
| } |
| |
| int main() |
| { |
| #ifdef __GTHREADS |
| test04<float, __gnu_cxx::__common_pool_policy<__pool, true> >(); |
| test04<double, __gnu_cxx::__per_type_pool_policy<double, __pool, true> >(); |
| #endif |
| test04<float, __gnu_cxx::__common_pool_policy<__pool, false> >(); |
| test04<double, __gnu_cxx::__per_type_pool_policy<double, __pool, false> >(); |
| |
| return 0; |
| } |