Fortran: Suppress wrong End Of File error with user defined IO.
[official-gcc.git] / libstdc++-v3 / testsuite / 18_support / launder / 1.cc
blob917da2dd757581dd50f3df97ae71bf131362cb10
1 // Copyright (C) 2016-2024 Free Software Foundation, Inc.
2 //
3 // This file is part of the GNU ISO C++ Library. This library is free
4 // software; you can redistribute it and/or modify it under the
5 // terms of the GNU General Public License as published by the
6 // Free Software Foundation; either version 3, or (at your option)
7 // any later version.
9 // This library is distributed in the hope that it will be useful,
10 // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 // GNU General Public License for more details.
14 // You should have received a copy of the GNU General Public License along
15 // with this library; see the file COPYING3. If not see
16 // <http://www.gnu.org/licenses/>.
18 // { dg-do run { target c++17 } }
20 #include <new>
21 #include <testsuite_hooks.h>
22 #include <testsuite_tr1.h>
24 void
25 test01()
27 struct S {
28 int i;
29 } s;
30 auto p = std::launder( &s.i );
31 VERIFY( p == &s.i );
35 void
36 test02()
38 // C++17 1.8 [intro.object]
39 struct X { const int n; };
40 union U { X x; float f; };
42 U u = {{ 1 }};
43 u.f = 5.f; // OK, creates new subobject of u (9.3)
44 X *p = new (&u.x) X {2}; // OK, creates new subobject of u
45 VERIFY(p->n == 2); // OK
46 VERIFY(*std::launder(&u.x.n) == 2); // OK
47 // assert(u.x.n == 2); undefined behavior, u.x does not name new subobject
50 int
51 main()
53 test01();
54 test02();