#include <locale>
#include <sstream>
#include <testsuite_hooks.h>
void test04()
{
using namespace std;
bool test __attribute__((unused)) = true;
typedef wstring::iterator iter_type;
typedef char_traits<wchar_t> traits;
typedef num_put<wchar_t, iter_type> num_put_type;
const locale loc_c = locale::classic();
const wstring str(L"1798 Lady Elgin");
const wstring x(18, L'x'); wstring res;
wostringstream oss;
oss.imbue(locale(loc_c, new num_put_type));
const num_put_type& tp = use_facet<num_put_type>(oss.getloc());
const long l = 1798;
res = x;
iter_type ret1 = tp.put(res.begin(), oss, L' ', l);
wstring sanity1(res.begin(), ret1);
VERIFY( res == L"1798xxxxxxxxxxxxxx" );
VERIFY( sanity1 == L"1798" );
const long double ld = 1798.0;
res = x;
iter_type ret2 = tp.put(res.begin(), oss, L' ', ld);
wstring sanity2(res.begin(), ret2);
VERIFY( res == L"1798xxxxxxxxxxxxxx" );
VERIFY( sanity2 == L"1798" );
bool b = 1;
res = x;
iter_type ret3 = tp.put(res.begin(), oss, L' ', b);
wstring sanity3(res.begin(), ret3);
VERIFY( res == L"1xxxxxxxxxxxxxxxxx" );
VERIFY( sanity3 == L"1" );
b = 0;
res = x;
oss.setf(ios_base::boolalpha);
iter_type ret4 = tp.put(res.begin(), oss, L' ', b);
wstring sanity4(res.begin(), ret4);
VERIFY( res == L"falsexxxxxxxxxxxxx" );
VERIFY( sanity4 == L"false" );
oss.clear();
const void* cv = &ld;
res = x;
oss.setf(ios_base::fixed, ios_base::floatfield);
iter_type ret5 = tp.put(res.begin(), oss, L' ', cv);
wstring sanity5(res.begin(), ret5);
VERIFY( sanity5.size() );
VERIFY( sanity5[1] == L'x' );
}
int main()
{
test04();
return 0;
}