text: // { dg-require-namedlocale "en_US.ISO-8859-15" }
  
  // 2003-02-06  Petur Runolfsson  <peturr02@ru.is>
  
  // Copyright (C) 2003-2017 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 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/>.
  
  // 22.2.1.5 - Template class codecvt [lib.locale.codecvt]
  
  #include <locale>
  #include <cstring>
  #include <testsuite_hooks.h>
  
  // Need to explicitly set the state(mbstate_t) to zero.
  // How to do this is not specified by the ISO C99 standard, so we
  // might need to add some operators to make the intuiative case
  // work:
  //   w_codecvt::state_type state00;
  //   state00 = 0;  
  // or, can use this explicit "C" initialization:
  //   w_codecvt::state_type state01 = {0, 0};
  // .. except Ulrich says: Use memset. Always use memset. Feel the force...
  void
  zero_state(std::mbstate_t& state)
  { std::memset(&state, 0, sizeof(std::mbstate_t)); }
  
  // Required instantiation
  // codecvt<wchar_t, char, mbstate_t>
  //
  // Baseline test for ISO-8859-15. Converts entire charset.
  void test03()
  {
    using namespace std;
    typedef codecvt<wchar_t, char, mbstate_t> 	w_codecvt;
    typedef codecvt_base::result			result;
    typedef wchar_t				int_type;
    typedef char					ext_type;
    typedef char_traits<wchar_t>			int_traits;
  
    const ext_type* 	e_lit =
      "\x1\x2\x3\x4\x5\x6\x7\x8\x9\xa\xb\xc\xd\xe\xf\x10\x11\x12\x13"
      "\x14\x15\x16\x17\x18\x19\x1a\x1b\x1c\x1d\x1e\x1f\x20!\"#$%&"
      "'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\\]^_`"
      "abcdefghijklmnopqrstuvwxyz{|}~\x7f\x80\x81\x82\x83\x84\x85\x86"
      "\x87\x88\x89\x8a\x8b\x8c\x8d\x8e\x8f\x90\x91\x92\x93\x94\x95"
      "\x96\x97\x98\x99\x9a\x9b\x9c\x9d\x9e\x9f\xa0\xa1\xa2\xa3\xa4"
      "\xa5\xa6\xa7\xa8\xa9\xaa\xab\xac\xad\xae\xaf\xb0\xb1\xb2\xb3"
      "\xb4\xb5\xb6\xb7\xb8\xb9\xba\xbb\xbc\xbd\xbe\xbf\xc0\xc1\xc2"
      "\xc3\xc4\xc5\xc6\xc7\xc8\xc9\xca\xcb\xcc\xcd\xce\xcf\xd0\xd1"
      "\xd2\xd3\xd4\xd5\xd6\xd7\xd8\xd9\xda\xdb\xdc\xdd\xde\xdf\xe0"
      "\xe1\xe2\xe3\xe4\xe5\xe6\xe7\xe8\xe9\xea\xeb\xec\xed\xee\xef"
      "\xf0\xf1\xf2\xf3\xf4\xf5\xf6\xf7\xf8\xf9\xfa\xfb\xfc\xfd\xfe"
      "\xff";
  
    const ext_type*       efrom_next;
    const int_type 	i_lit[] = {
      0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7, 0x8, 0x9, 0xa, 0xb, 0xc,
      0xd, 0xe, 0xf, 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17,
      0x18, 0x19, 0x1a, 0x1b, 0x1c, 0x1d, 0x1e, 0x1f, 0x20, L'!',
      L'"', L'#', L'$', L'%', L'&', L'\'', L'(', L')', L'*', L'+',
      L',', L'-', L'.', L'/', L'0', L'1', L'2', L'3', L'4', L'5',
      L'6', L'7', L'8', L'9', L':', L';', L'<', L'=', L'>', L'?',
      L'@', L'A', L'B', L'C', L'D', L'E', L'F', L'G', L'H', L'I',
      L'J', L'K', L'L', L'M', L'N', L'O', L'P', L'Q', L'R', L'S',
      L'T', L'U', L'V', L'W', L'X', L'Y', L'Z', L'[', L'\\', L']',
      L'^', L'_', L'`', L'a', L'b', L'c', L'd', L'e', L'f', L'g',
      L'h', L'i', L'j', L'k', L'l', L'm', L'n', L'o', L'p', L'q',
      L'r', L's', L't', L'u', L'v', L'w', L'x', L'y', L'z', L'{',
      L'|', L'}', L'~', 0x7f, 0x80, 0x81, 0x82, 0x83, 0x84, 0x85,
      0x86, 0x87, 0x88, 0x89, 0x8a, 0x8b, 0x8c, 0x8d, 0x8e, 0x8f,
      0x90, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96, 0x97, 0x98, 0x99,
      0x9a, 0x9b, 0x9c, 0x9d, 0x9e, 0x9f, 0xa0, 0xa1, 0xa2, 0xa3,
      0x20ac, 0xa5, 0x160, 0xa7, 0x161, 0xa9, 0xaa, 0xab, 0xac, 0xad,
      0xae, 0xaf, 0xb0, 0xb1, 0xb2, 0xb3, 0x17d, 0xb5, 0xb6, 0xb7,
      0x17e, 0xb9, 0xba, 0xbb, 0x152, 0x153, 0x178, 0xbf, 0xc0, 0xc1,
      0xc2, 0xc3, 0xc4, 0xc5, 0xc6, 0xc7, 0xc8, 0xc9, 0xca, 0xcb,
      0xcc, 0xcd, 0xce, 0xcf, 0xd0, 0xd1, 0xd2, 0xd3, 0xd4, 0xd5,
      0xd6, 0xd7, 0xd8, 0xd9, 0xda, 0xdb, 0xdc, 0xdd, 0xde, 0xdf,
      0xe0, 0xe1, 0xe2, 0xe3, 0xe4, 0xe5, 0xe6, 0xe7, 0xe8, 0xe9,
      0xea, 0xeb, 0xec, 0xed, 0xee, 0xef, 0xf0, 0xf1, 0xf2, 0xf3,
      0xf4, 0xf5, 0xf6, 0xf7, 0xf8, 0xf9, 0xfa, 0xfb, 0xfc, 0xfd,
      0xfe, 0xff, 0x0
    };
  
    int 			size = strlen(e_lit);
    int_type* 		i_arr = new int_type[size + 1];
    int_type* 		i_ref = new int_type[size + 1];
    wmemset(i_arr, 0xdeadbeef, size + 1);
    wmemset(i_ref, 0xdeadbeef, size + 1);
    int_type*		ito_next;
  
    locale loc = locale("en_US.ISO-8859-15");
    locale::global(loc);
    const w_codecvt* 	cvt = &use_facet<w_codecvt>(loc); 
  
    // in
    w_codecvt::state_type state01;
    zero_state(state01);
    result r1 = cvt->in(state01, e_lit, e_lit + size, efrom_next, 
  		      i_arr, i_arr + size, ito_next);
    VERIFY( r1 == codecvt_base::ok );
    VERIFY( efrom_next == e_lit + size );
    VERIFY( ito_next == i_arr + size );
    VERIFY( !int_traits::compare(i_arr, i_lit, size) ); 
    VERIFY( !int_traits::compare(ito_next, i_ref, 1) );
  
    delete [] i_arr;
    delete [] i_ref;
  }
  
  int main ()
  {
    test03();
    return 0;
  }
  