1/* Test file for mpfr_swap. 2 3Copyright 2000-2004, 2006-2023 Free Software Foundation, Inc. 4Contributed by the AriC and Caramba projects, INRIA. 5 6This file is part of the GNU MPFR Library. 7 8The GNU MPFR Library is free software; you can redistribute it and/or modify 9it under the terms of the GNU Lesser General Public License as published by 10the Free Software Foundation; either version 3 of the License, or (at your 11option) any later version. 12 13The GNU MPFR Library is distributed in the hope that it will be useful, but 14WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY 15or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public 16License for more details. 17 18You should have received a copy of the GNU Lesser General Public License 19along with the GNU MPFR Library; see the file COPYING.LESSER. If not, see 20https://www.gnu.org/licenses/ or write to the Free Software Foundation, Inc., 2151 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA. */ 22 23#include "mpfr-test.h" 24 25int 26main (void) 27{ 28 mpfr_t u, v; 29 30 tests_start_mpfr (); 31 32 mpfr_init2 (u, 24); 33 mpfr_init2 (v, 53); 34 mpfr_set_ui (u, 16777215, MPFR_RNDN); /* 2^24 - 1 */ 35 mpfr_set_str1 (v, "9007199254740991.0"); /* 2^53 - 1 */ 36 mpfr_swap (u, v); 37 mpfr_swap (u, v); 38 if (mpfr_cmp_ui (u, 16777215) || mpfr_cmp_str1 (v, "9007199254740991.0")) 39 { 40 printf ("Error in mpfr_swap\n"); 41 exit (1); 42 } 43 mpfr_clear (u); 44 mpfr_clear (v); 45 46 tests_end_mpfr (); 47 return 0; 48} 49