--- /dev/null
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/gcc/ChangeLog gcc-41-20060515/gcc/ChangeLog
+--- gcc-41-20060515.orig/gcc/ChangeLog 2006-05-15 11:14:20.000000000 -0500
++++ gcc-41-20060515/gcc/ChangeLog 2006-05-15 14:00:27.693964000 -0500
+@@ -724,6 +724,51 @@
+ * reload1.c (choose_reload_regs): Added call of regno_clobbered_p
+ with new meaning of SETS.
+
++2006-02-14 Jakub Jelinek <jakub@redhat.com>
++ Aldy Hernandez <aldyh@redhat.com>
++
++ PR target/25864
++ * configure.ac: Add --with{out}-long-double-128 configure option.
++ (TARGET_DEFAULT_LONG_DOUBLE_128): New test.
++ * configure: Rebuilt.
++ * config.in: Rebuilt.
++ * doc/install.texi (Options specification): Document
++ --with-long-double-128.
++
++ * config.gcc (sparc-*-linux*): Add sparc/t-linux to tmake_file.
++ (sparc64-*-linux*): Likewise.
++ * config/sparc/t-linux64 (SHLIB_MAPFILES): Removed.
++ * config/sparc/t-linux: New file.
++ * config/sparc/libgcc-sparc-glibc.ver (__fixtfdi, __fixunstfdi,
++ __floatditf): Export at GCC_LDBL_3.0 if -m32 -mlong-double-128.
++ (__divtc3, __multc3, __powitf2): Export at GCC_LDBL_4.0.0 if
++ -m32 -mlong-double-128.
++
++ * config.gcc (alpha*-*-linux*): Add alpha/t-linux to tmake_file.
++ * config/alpha/t-linux: New file.
++ * config/alpha/libgcc-alpha-ldbl.ver: New file.
++
++ * config/sparc/linux.h (TARGET_OS_CPP_BUILTINS): Define
++ __LONG_DOUBLE_128__ if TARGET_LONG_DOUBLE_128.
++ (CPP_SUBTARGET_SPEC): Don't add -D__LONG_DOUBLE_128__ here.
++ * config/sparc/linux64.h (TARGET_OS_CPP_BUILTINS): Define
++ __LONG_DOUBLE_128__ if TARGET_LONG_DOUBLE_128 and TARGET_ARCH32.
++ (CPP_ARCH32_SPEC): Remove.
++
++ * config/s390/s390.c (override_options): Handle
++ TARGET_DEFAULT_LONG_DOUBLE_128.
++
++ * config/alpha/alpha.c (override_options): Handle
++ TARGET_DEFAULT_LONG_DOUBLE_128.
++
++ * config/sparc/sparc.c (sparc_override_options): Handle
++ TARGET_DEFAULT_LONG_DOUBLE_128.
++
++ * config/rs6000/linux.h [TARGET_DEFAULT_LONG_DOUBLE_128]
++ (RS6000_DEFAULT_LONG_DOUBLE_SIZE): Define to 128.
++ * config/rs6000/linux64.h [TARGET_DEFAULT_LONG_DOUBLE_128]
++ (RS6000_DEFAULT_LONG_DOUBLE_SIZE): Define to 128.
++
+ 2006-02-19 John David Anglin <dave.anglin@nrc-cnrc.gc.ca>
+
+ * doc/install.texi: Add missing `@samp'.
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/gcc/config/alpha/alpha.c gcc-41-20060515/gcc/config/alpha/alpha.c
+--- gcc-41-20060515.orig/gcc/config/alpha/alpha.c 2006-05-15 11:13:49.000000000 -0500
++++ gcc-41-20060515/gcc/config/alpha/alpha.c 2006-05-15 13:47:27.566272961 -0500
+@@ -516,6 +516,11 @@ override_options (void)
+ REAL_MODE_FORMAT (DFmode) = &vax_g_format;
+ REAL_MODE_FORMAT (TFmode) = NULL;
+ }
++
++#ifdef TARGET_DEFAULT_LONG_DOUBLE_128
++ if (!(target_flags_explicit & MASK_LONG_DOUBLE_128))
++ target_flags |= MASK_LONG_DOUBLE_128;
++#endif
+ }
+ \f
+ /* Returns 1 if VALUE is a mask that contains full bytes of zero or ones. */
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/gcc/config/alpha/libgcc-alpha-ldbl.ver gcc-41-20060515/gcc/config/alpha/libgcc-alpha-ldbl.ver
+--- gcc-41-20060515.orig/gcc/config/alpha/libgcc-alpha-ldbl.ver 1969-12-31 18:00:00.000000000 -0600
++++ gcc-41-20060515/gcc/config/alpha/libgcc-alpha-ldbl.ver 2006-05-15 13:47:27.566272961 -0500
+@@ -0,0 +1,32 @@
++%ifdef __LONG_DOUBLE_128__
++
++# long double 128 bit support in libgcc_s.so.1 is only available
++# when configured with --with-long-double-128. Make sure all the
++# symbols are available at @@GCC_LDBL_* versions to make it clear
++# there is a configurable symbol set.
++
++%exclude {
++ __fixtfdi
++ __fixunstfdi
++ __floatditf
++
++ __divtc3
++ __multc3
++ __powitf2
++}
++
++%inherit GCC_LDBL_3.0 GCC_3.0
++GCC_LDBL_3.0 {
++ __fixtfdi
++ __fixunstfdi
++ __floatditf
++}
++
++%inherit GCC_LDBL_4.0.0 GCC_4.0.0
++GCC_LDBL_4.0.0 {
++ __divtc3
++ __multc3
++ __powitf2
++}
++
++%endif
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/gcc/config/alpha/t-linux gcc-41-20060515/gcc/config/alpha/t-linux
+--- gcc-41-20060515.orig/gcc/config/alpha/t-linux 1969-12-31 18:00:00.000000000 -0600
++++ gcc-41-20060515/gcc/config/alpha/t-linux 2006-05-15 13:47:27.567272807 -0500
+@@ -0,0 +1 @@
++SHLIB_MAPFILES += $(srcdir)/config/alpha/libgcc-alpha-ldbl.ver
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/gcc/config/rs6000/linux64.h gcc-41-20060515/gcc/config/rs6000/linux64.h
+--- gcc-41-20060515.orig/gcc/config/rs6000/linux64.h 2006-05-15 11:14:02.000000000 -0500
++++ gcc-41-20060515/gcc/config/rs6000/linux64.h 2006-05-15 13:47:27.568272653 -0500
+@@ -570,3 +570,8 @@ while (0)
+ #endif
+
+ #define POWERPC_LINUX
++
++/* ppc{32,64} linux has 128-bit long double support in glibc 2.4 and later. */
++#ifdef TARGET_DEFAULT_LONG_DOUBLE_128
++#define RS6000_DEFAULT_LONG_DOUBLE_SIZE 128
++#endif
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/gcc/config/rs6000/linux.h gcc-41-20060515/gcc/config/rs6000/linux.h
+--- gcc-41-20060515.orig/gcc/config/rs6000/linux.h 2006-05-15 11:14:02.000000000 -0500
++++ gcc-41-20060515/gcc/config/rs6000/linux.h 2006-05-15 13:47:27.567272807 -0500
+@@ -120,3 +120,8 @@
+ #endif
+
+ #define POWERPC_LINUX
++
++/* ppc linux has 128-bit long double support in glibc 2.4 and later. */
++#ifdef TARGET_DEFAULT_LONG_DOUBLE_128
++#define RS6000_DEFAULT_LONG_DOUBLE_SIZE 128
++#endif
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/gcc/config/s390/s390.c gcc-41-20060515/gcc/config/s390/s390.c
+--- gcc-41-20060515.orig/gcc/config/s390/s390.c 2006-05-15 11:13:50.000000000 -0500
++++ gcc-41-20060515/gcc/config/s390/s390.c 2006-05-15 13:47:27.574271730 -0500
+@@ -1415,6 +1415,11 @@ override_options (void)
+ }
+ else if (s390_stack_guard)
+ error ("-mstack-guard implies use of -mstack-size");
++
++#ifdef TARGET_DEFAULT_LONG_DOUBLE_128
++ if (!(target_flags_explicit & MASK_LONG_DOUBLE_128))
++ target_flags |= MASK_LONG_DOUBLE_128;
++#endif
+ }
+
+ /* Map for smallest class containing reg regno. */
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/gcc/config/sparc/libgcc-sparc-glibc.ver gcc-41-20060515/gcc/config/sparc/libgcc-sparc-glibc.ver
+--- gcc-41-20060515.orig/gcc/config/sparc/libgcc-sparc-glibc.ver 2006-05-15 11:13:55.000000000 -0500
++++ gcc-41-20060515/gcc/config/sparc/libgcc-sparc-glibc.ver 2006-05-15 13:47:27.574271730 -0500
+@@ -26,3 +26,36 @@ GLIBC_VER {
+ __frame_state_for
+ __register_frame_info_table
+ }
++
++%if !defined (__arch64__) && defined (__LONG_DOUBLE_128__)
++
++# long double 128 bit support from 32-bit libgcc_s.so.1 is only available
++# when configured with --with-long-double-128. Make sure all the
++# symbols are available at @@GCC_LDBL_* versions to make it clear
++# there is a configurable symbol set.
++
++%exclude {
++ __fixtfdi
++ __fixunstfdi
++ __floatditf
++
++ __divtc3
++ __multc3
++ __powitf2
++}
++
++%inherit GCC_LDBL_3.0 GCC_3.0
++GCC_LDBL_3.0 {
++ __fixtfdi
++ __fixunstfdi
++ __floatditf
++}
++
++%inherit GCC_LDBL_4.0.0 GCC_4.0.0
++GCC_LDBL_4.0.0 {
++ __divtc3
++ __multc3
++ __powitf2
++}
++
++%endif
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/gcc/config/sparc/linux64.h gcc-41-20060515/gcc/config/sparc/linux64.h
+--- gcc-41-20060515.orig/gcc/config/sparc/linux64.h 2006-05-15 11:13:55.000000000 -0500
++++ gcc-41-20060515/gcc/config/sparc/linux64.h 2006-05-15 13:47:27.576271422 -0500
+@@ -20,22 +20,24 @@ along with GCC; see the file COPYING. I
+ the Free Software Foundation, 51 Franklin Street, Fifth Floor,
+ Boston, MA 02110-1301, USA. */
+
+-#define TARGET_OS_CPP_BUILTINS() \
+- do \
+- { \
+- builtin_define_std ("unix"); \
+- builtin_define_std ("linux"); \
+- builtin_define ("_LONGLONG"); \
+- builtin_define ("__gnu_linux__"); \
+- builtin_assert ("system=linux"); \
+- builtin_assert ("system=unix"); \
+- builtin_assert ("system=posix"); \
+- if (flag_pic) \
+- { \
+- builtin_define ("__PIC__"); \
+- builtin_define ("__pic__"); \
+- } \
+- } \
++#define TARGET_OS_CPP_BUILTINS() \
++ do \
++ { \
++ builtin_define_std ("unix"); \
++ builtin_define_std ("linux"); \
++ builtin_define ("_LONGLONG"); \
++ builtin_define ("__gnu_linux__"); \
++ builtin_assert ("system=linux"); \
++ builtin_assert ("system=unix"); \
++ builtin_assert ("system=posix"); \
++ if (flag_pic) \
++ { \
++ builtin_define ("__PIC__"); \
++ builtin_define ("__pic__"); \
++ } \
++ if (TARGET_ARCH32 && TARGET_LONG_DOUBLE_128) \
++ builtin_define ("__LONG_DOUBLE_128__"); \
++ } \
+ while (0)
+
+ /* Don't assume anything about the header files. */
+@@ -59,13 +61,6 @@ Boston, MA 02110-1301, USA. */
+ #undef ASM_CPU_DEFAULT_SPEC
+ #define ASM_CPU_DEFAULT_SPEC "-Av9a"
+
+-#ifdef SPARC_BI_ARCH
+-
+-#undef CPP_ARCH32_SPEC
+-#define CPP_ARCH32_SPEC "%{mlong-double-128:-D__LONG_DOUBLE_128__}"
+-
+-#endif
+-
+ /* Provide a STARTFILE_SPEC appropriate for GNU/Linux. Here we add
+ the GNU/Linux magical crtbegin.o file (see crtstuff.c) which
+ provides part of the support for getting C++ file-scope static
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/gcc/config/sparc/linux.h gcc-41-20060515/gcc/config/sparc/linux.h
+--- gcc-41-20060515.orig/gcc/config/sparc/linux.h 2006-05-15 11:13:55.000000000 -0500
++++ gcc-41-20060515/gcc/config/sparc/linux.h 2006-05-15 13:47:27.575271576 -0500
+@@ -23,17 +23,19 @@ Boston, MA 02110-1301, USA. */
+ #define TARGET_OS_CPP_BUILTINS() \
+ do \
+ { \
+- builtin_define_std ("unix"); \
+- builtin_define_std ("linux"); \
+- builtin_define ("__gnu_linux__"); \
+- builtin_assert ("system=linux"); \
+- builtin_assert ("system=unix"); \
+- builtin_assert ("system=posix"); \
+- if (flag_pic) \
+- { \
+- builtin_define ("__PIC__"); \
+- builtin_define ("__pic__"); \
+- } \
++ builtin_define_std ("unix"); \
++ builtin_define_std ("linux"); \
++ builtin_define ("__gnu_linux__"); \
++ builtin_assert ("system=linux"); \
++ builtin_assert ("system=unix"); \
++ builtin_assert ("system=posix"); \
++ if (flag_pic) \
++ { \
++ builtin_define ("__PIC__"); \
++ builtin_define ("__pic__"); \
++ } \
++ if (TARGET_LONG_DOUBLE_128) \
++ builtin_define ("__LONG_DOUBLE_128__"); \
+ } \
+ while (0)
+
+@@ -100,8 +102,7 @@ Boston, MA 02110-1301, USA. */
+
+ #undef CPP_SUBTARGET_SPEC
+ #define CPP_SUBTARGET_SPEC \
+-"%{posix:-D_POSIX_SOURCE} \
+-%{pthread:-D_REENTRANT} %{mlong-double-128:-D__LONG_DOUBLE_128__}"
++"%{posix:-D_POSIX_SOURCE} %{pthread:-D_REENTRANT}"
+
+ #undef LIB_SPEC
+ #define LIB_SPEC \
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/gcc/config/sparc/sparc.c gcc-41-20060515/gcc/config/sparc/sparc.c
+--- gcc-41-20060515.orig/gcc/config/sparc/sparc.c 2006-05-15 11:13:55.000000000 -0500
++++ gcc-41-20060515/gcc/config/sparc/sparc.c 2006-05-15 13:47:27.581270653 -0500
+@@ -790,6 +790,11 @@ sparc_override_options (void)
+ sparc_costs = &ultrasparc3_costs;
+ break;
+ };
++
++#ifdef TARGET_DEFAULT_LONG_DOUBLE_128
++ if (!(target_flags_explicit & MASK_LONG_DOUBLE_128))
++ target_flags |= MASK_LONG_DOUBLE_128;
++#endif
+ }
+ \f
+ #ifdef SUBTARGET_ATTRIBUTE_TABLE
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/gcc/config/sparc/t-linux gcc-41-20060515/gcc/config/sparc/t-linux
+--- gcc-41-20060515.orig/gcc/config/sparc/t-linux 1969-12-31 18:00:00.000000000 -0600
++++ gcc-41-20060515/gcc/config/sparc/t-linux 2006-05-15 13:47:27.582270499 -0500
+@@ -0,0 +1,5 @@
++# Override t-slibgcc-elf-ver to export some libgcc symbols with
++# the symbol versions that glibc used.
++# Avoid the t-linux version file.
++SHLIB_MAPFILES = $(srcdir)/libgcc-std.ver \
++ $(srcdir)/config/sparc/libgcc-sparc-glibc.ver
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/gcc/config/sparc/t-linux64 gcc-41-20060515/gcc/config/sparc/t-linux64
+--- gcc-41-20060515.orig/gcc/config/sparc/t-linux64 2006-05-15 11:13:55.000000000 -0500
++++ gcc-41-20060515/gcc/config/sparc/t-linux64 2006-05-15 13:47:27.582270499 -0500
+@@ -8,12 +8,6 @@ INSTALL_LIBGCC = install-multilib
+ EXTRA_MULTILIB_PARTS=crtbegin.o crtend.o crtbeginS.o crtendS.o crtbeginT.o \
+ crtfastmath.o
+
+-# Override t-slibgcc-elf-ver to export some libgcc symbols with
+-# the symbol versions that glibc used.
+-# Avoid the t-linux version file.
+-SHLIB_MAPFILES = $(srcdir)/libgcc-std.ver \
+- $(srcdir)/config/sparc/libgcc-sparc-glibc.ver
+-
+ CRTSTUFF_T_CFLAGS = `if test x$$($(GCC_FOR_TARGET) $(MULTILIB_CFLAGS) \
+ -print-multi-os-directory) \
+ = x../lib64; then echo -mcmodel=medany; fi`
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/gcc/config.gcc gcc-41-20060515/gcc/config.gcc
+--- gcc-41-20060515.orig/gcc/config.gcc 2006-05-15 11:14:20.000000000 -0500
++++ gcc-41-20060515/gcc/config.gcc 2006-05-15 13:47:27.555274654 -0500
+@@ -568,7 +568,7 @@ alpha*-*-unicosmk*)
+ alpha*-*-linux*)
+ tm_file="${tm_file} alpha/elf.h alpha/linux.h alpha/linux-elf.h"
+ target_cpu_default="MASK_GAS"
+- tmake_file="${tmake_file} alpha/t-crtfm alpha/t-alpha alpha/t-ieee"
++ tmake_file="${tmake_file} alpha/t-crtfm alpha/t-alpha alpha/t-ieee alpha/t-linux"
+ ;;
+ alpha*-*-gnu*)
+ target_cpu_default="MASK_GAS"
+@@ -2056,7 +2056,7 @@ sparc-*-elf*)
+ sparc-*-linux*) # SPARC's running GNU/Linux, libc6
+ tm_file="${tm_file} dbxelf.h elfos.h svr4.h sparc/sysv4.h sparc/linux.h"
+ extra_options="${extra_options} sparc/long-double-switch.opt"
+- tmake_file="${tmake_file} sparc/t-crtfm"
++ tmake_file="${tmake_file} sparc/t-linux sparc/t-crtfm"
+ ;;
+ sparc-*-rtems*)
+ tm_file="${tm_file} dbxelf.h elfos.h svr4.h sparc/sysv4.h sparc/sp-elf.h sparc/rtemself.h rtems.h"
+@@ -2175,7 +2175,7 @@ sparc64-*-freebsd*|ultrasparc-*-freebsd*
+ sparc64-*-linux*) # 64-bit SPARC's running GNU/Linux
+ tm_file="sparc/biarch64.h ${tm_file} dbxelf.h elfos.h svr4.h sparc/sysv4.h sparc/linux64.h"
+ extra_options="${extra_options} sparc/long-double-switch.opt"
+- tmake_file="${tmake_file} sparc/t-linux64 sparc/t-crtfm"
++ tmake_file="${tmake_file} sparc/t-linux sparc/t-linux64 sparc/t-crtfm"
+ ;;
+ sparc64-*-netbsd*)
+ tm_file="sparc/biarch64.h ${tm_file}"
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/gcc/config.in gcc-41-20060515/gcc/config.in
+--- gcc-41-20060515.orig/gcc/config.in 2006-05-15 11:14:20.000000000 -0500
++++ gcc-41-20060515/gcc/config.in 2006-05-15 13:47:27.559274038 -0500
+@@ -1277,6 +1277,12 @@
+ #endif
+
+
++/* Define if TFmode long double should be the default */
++#ifndef USED_FOR_TARGET
++#undef TARGET_DEFAULT_LONG_DOUBLE_128
++#endif
++
++
+ /* Define if your target C library provides stack protector support */
+ #ifndef USED_FOR_TARGET
+ #undef TARGET_LIBC_PROVIDES_SSP
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/gcc/configure gcc-41-20060515/gcc/configure
+--- gcc-41-20060515.orig/gcc/configure 2006-05-15 11:14:19.000000000 -0500
++++ gcc-41-20060515/gcc/configure 2006-05-15 13:47:27.594268652 -0500
+@@ -931,6 +931,7 @@ Optional Packages:
+ --with-libiconv-prefix[=DIR] search for libiconv in DIR/include and DIR/lib
+ --without-libiconv-prefix don't search for libiconv in includedir and libdir
+ --with-system-libunwind use installed libunwind
++ --with-long-double-128 Use 128-bit long double by default.
+ --with-gc={page,zone} choose the garbage collection mechanism to use
+ with the compiler
+ --with-system-zlib use installed libz
+@@ -7492,7 +7493,7 @@ if test "${gcc_cv_prog_makeinfo_modern+s
+ else
+ ac_prog_version=`$MAKEINFO --version 2>&1 |
+ sed -n 's/^.*GNU texinfo.* \([0-9][0-9.]*\).*$/\1/p'`
+- echo "configure:7495: version of makeinfo is $ac_prog_version" >&5
++ echo "configure:7496: version of makeinfo is $ac_prog_version" >&5
+ case $ac_prog_version in
+ '') gcc_cv_prog_makeinfo_modern=no;;
+ 4.[2-9]*)
+@@ -16213,6 +16214,46 @@ _ACEOF
+
+ fi
+
++# Check if TFmode long double should be used by default or not.
++# Some glibc targets used DFmode long double, but with glibc 2.4
++# and later they can use TFmode.
++case "$target" in
++ powerpc*-*-*gnu* | \
++ sparc*-*-linux* | \
++ s390*-*-linux* | \
++ alpha*-*-linux*)
++
++# Check whether --with-long-double-128 or --without-long-double-128 was given.
++if test "${with_long_double_128+set}" = set; then
++ withval="$with_long_double_128"
++ gcc_cv_target_ldbl128="$with_long_double_128"
++else
++ gcc_cv_target_ldbl128=no
++ if test x$host != x$target || test "x$TARGET_SYSTEM_ROOT" != x; then
++ if test "x$with_sysroot" = x; then
++ glibc_header_dir="${exec_prefix}/${target_noncanonical}/sys-include"
++ elif test "x$with_sysroot" = xyes; then
++ glibc_header_dir="${exec_prefix}/${target_noncanonical}/sys-root/usr/include"
++ else
++ glibc_header_dir="${with_sysroot}/usr/include"
++ fi
++ else
++ glibc_header_dir=/usr/include
++ fi
++ grep '^ *#[ ]*define[ ][ ]*__LONG_DOUBLE_MATH_OPTIONAL' \
++ $glibc_header_dir/bits/wordsize.h > /dev/null 2>&1 \
++ && gcc_cv_target_ldbl128=yes
++fi;
++ ;;
++esac
++if test x$gcc_cv_target_ldbl128 = xyes; then
++
++cat >>confdefs.h <<\_ACEOF
++#define TARGET_DEFAULT_LONG_DOUBLE_128 1
++_ACEOF
++
++fi
++
+ # Find out what GC implementation we want, or may, use.
+
+ # Check whether --with-gc or --without-gc was given.
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/gcc/configure.ac gcc-41-20060515/gcc/configure.ac
+--- gcc-41-20060515.orig/gcc/configure.ac 2006-05-15 11:14:20.000000000 -0500
++++ gcc-41-20060515/gcc/configure.ac 2006-05-15 13:47:27.597400000 -0500
+@@ -3130,6 +3130,39 @@ if test x$gcc_cv_libc_provides_ssp = xye
+ [Define if your target C library provides stack protector support])
+ fi
+
++# Check if TFmode long double should be used by default or not.
++# Some glibc targets used DFmode long double, but with glibc 2.4
++# and later they can use TFmode.
++case "$target" in
++ powerpc*-*-*gnu* | \
++ sparc*-*-linux* | \
++ s390*-*-linux* | \
++ alpha*-*-linux*)
++ AC_ARG_WITH(long-double-128,
++[ --with-long-double-128 Use 128-bit long double by default.],
++ gcc_cv_target_ldbl128="$with_long_double_128",
++ [gcc_cv_target_ldbl128=no
++ if test x$host != x$target || test "x$TARGET_SYSTEM_ROOT" != x; then
++ if test "x$with_sysroot" = x; then
++ glibc_header_dir="${exec_prefix}/${target_noncanonical}/sys-include"
++ elif test "x$with_sysroot" = xyes; then
++ glibc_header_dir="${exec_prefix}/${target_noncanonical}/sys-root/usr/include"
++ else
++ glibc_header_dir="${with_sysroot}/usr/include"
++ fi
++ else
++ glibc_header_dir=/usr/include
++ fi
++ grep '^[ ]*#[ ]*define[ ][ ]*__LONG_DOUBLE_MATH_OPTIONAL' \
++ $glibc_header_dir/bits/wordsize.h > /dev/null 2>&1 \
++ && gcc_cv_target_ldbl128=yes])
++ ;;
++esac
++if test x$gcc_cv_target_ldbl128 = xyes; then
++ AC_DEFINE(TARGET_DEFAULT_LONG_DOUBLE_128, 1,
++ [Define if TFmode long double should be the default])
++fi
++
+ # Find out what GC implementation we want, or may, use.
+ AC_ARG_WITH(gc,
+ [ --with-gc={page,zone} choose the garbage collection mechanism to use
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/gcc/doc/install.texi gcc-41-20060515/gcc/doc/install.texi
+--- gcc-41-20060515.orig/gcc/doc/install.texi 2006-05-15 11:10:10.000000000 -0500
++++ gcc-41-20060515/gcc/doc/install.texi 2006-05-15 13:47:27.600399538 -0500
+@@ -1224,6 +1224,14 @@ error message.
+ All support for systems which have been obsoleted in one release of GCC
+ is removed entirely in the next major release, unless someone steps
+ forward to maintain the port.
++
++@item --with-long-double-128
++Specify if @code{long double} type should be 128-bit by default on selected
++GNU/Linux architectures. If using @code{--without-long-double-128},
++@code{long double} will be by default 64-bit, the same as @code{double} type.
++When neither of these configure options are used, the default will be
++128-bit @code{long double} when built against GNU C Library 2.4 and later,
++64-bit @code{long double} otherwise.
+ @end table
+
+ @subheading Cross-Compiler-Specific Options
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/ChangeLog gcc-41-20060515/libstdc++-v3/ChangeLog
+--- gcc-41-20060515.orig/libstdc++-v3/ChangeLog 2006-05-15 11:15:42.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/ChangeLog 2006-05-15 14:02:07.401662657 -0500
+@@ -153,6 +153,64 @@
+ Likewise.
+ * docs/html/ext/pb_assoc/tree_assoc_cntnr_node_iterator.html: Likewise.
+
++2006-02-07 Jakub Jelinek <jakub@redhat.com>
++ Benjamin Kosnik <bkoz@redhat.com>
++
++ PR target/25864
++ * configure.ac (_GLIBCXX_LONG_DOUBLE_COMPAT): New check.
++ If true, set also port_specific_symbol_files and create
++ as_symver_specs.
++ (GLIBCXX_LDBL_COMPAT): New GLIBCXX_CONDITIONAL.
++ * configure: Rebuilt.
++ * config.h.in: Rebuilt.
++ * config/os/gnu-linux/ldbl-extra.ver: New file.
++ * config/linker-map.gnu: Make sure no __float128 symbols are
++ exported.
++ * include/bits/c++config (_GLIBCXX_LONG_DOUBLE_COMPAT,
++ _GLIBCXX_LDBL_NAMESPACE, _GLIBCXX_BEGIN_LDBL_NAMESPACE,
++ _GLIBCXX_END_LDBL_NAMESPACE): Define.
++ * include/bits/localefwd.h: Use them to conditionally scope facets.
++ * include/bits/locale_facets.h: Surround std::{money,num}_{get,put}
++ with _GLIBCXX_BEGIN_LDBL_NAMESPACE and _GLIBCXX_END_LDBL_NAMESPACE.
++ [_GLIBCXX_LONG_DOUBLE_COMPAT] (std::money_get): Add __do_get method.
++ [_GLIBCXX_LONG_DOUBLE_COMPAT] (std::money_put): Add __do_put method.
++ [_GLIBCXX_LONG_DOUBLE_COMPAT] (std::num_get): Add __do_get method.
++ [_GLIBCXX_LONG_DOUBLE_COMPAT] (std::num_put): Add __do_put method.
++ * include/bits/locale_facets.tcc: Surround std::{money,num}_{get,put}
++ with _GLIBCXX_BEGIN_LDBL_NAMESPACE and _GLIBCXX_END_LDBL_NAMESPACE.
++ (std::money_get::__do_get, std::money_put::__do_put,
++ std::num_get::__do_get, std::num_put::__do_put): New
++ specializations.
++ * include/Makefile.am: Conditionally define
++ _GLIBCXX_LONG_DOUBLE_COMPAT in c++config.
++ * include/Makefile.in: Regenerate.
++ * src/locale.cc [_GLIBCXX_LONG_DOUBLE_COMPAT] (_GLIBCXX_LOC_ID,
++ _GLIBCXX_SYNC_ID): Define, use them.
++ * src/compatibility-ldbl.cc: New file.
++ * src/complex_io.cc [_GLIBCXX_LONG_DOUBLE_COMPAT]: Add compatibility
++ symbols.
++ * src/limits.cc [_GLIBCXX_LONG_DOUBLE_COMPAT]: Likewise.
++ * src/locale.cc [_GLIBCXX_LONG_DOUBLE_COMPAT]: Likewise.
++ * src/locale-inst.cc [_GLIBCXX_LONG_DOUBLE_COMPAT]: Likewise.
++ * src/locale-misc-inst.cc [_GLIBCXX_LONG_DOUBLE_COMPAT]: Likewise.
++ * src/istream-inst.cc [_GLIBCXX_LONG_DOUBLE_COMPAT]: Likewise.
++ * src/ostream-inst.cc [_GLIBCXX_LONG_DOUBLE_COMPAT]: Likewise.
++ * src/locale.cc [_GLIBCXX_LONG_DOUBLE_COMPAT]: Likewise.
++ * src/wlocale-inst.cc [_GLIBCXX_LONG_DOUBLE_COMPAT]: Likewise.
++ * src/compatibility.cc [_GLIBCXX_LONG_DOUBLE_COMPAT]: Likewise.
++ * config/locale/generic/c_locale.cc [_GLIBCXX_LONG_DOUBLE_COMPAT]:
++ Likewise.
++ * config/locale/gnu/c_locale.cc [_GLIBCXX_LONG_DOUBLE_COMPAT]:
++ Likewise.
++ * src/Makefile.am (libstdc++-symbol.ver): Append instead of
++ insert in the middle if port specific symbol file requests it.
++ (ldbl_compat_sources): New variable.
++ (sources): Use it.
++ (compatibility-ldbl.lo, compatibility-ldbl.o): New rules.
++ * src/Makefile.in: Rebuilt.
++ * testsuite/testsuite_abi.cc: Recognize GLIBCXX_LDBL_3.4,
++ GLIBCXX_LDBL_3.4.7, CXXABI_LDBL_1.3.
++
+ 2006-02-07 Paolo Carlini <pcarlini@suse.de>
+
+ * include/tr1/hashtable: Trivial formatting fixes.
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/config/linker-map.gnu gcc-41-20060515/libstdc++-v3/config/linker-map.gnu
+--- gcc-41-20060515.orig/libstdc++-v3/config/linker-map.gnu 2006-05-15 11:15:41.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/config/linker-map.gnu 2006-05-15 13:47:27.603399076 -0500
+@@ -1,6 +1,6 @@
+ ## Linker script for GNU ld 2.13.91+ only.
+ ##
+-## Copyright (C) 2002, 2003, 2004, 2005 Free Software Foundation, Inc.
++## Copyright (C) 2002, 2003, 2004, 2005, 2006 Free Software Foundation, Inc.
+ ##
+ ## This file is part of the libstdc++ version 3 distribution.
+ ##
+@@ -44,7 +44,10 @@ GLIBCXX_3.4 {
+ std::basic_[j-n]*;
+ std::basic_o[a-e]*;
+ # std::basic_ofstream;
+- std::basic_o[g-z]*;
++# std::basic_o[g-z]*;
++ std::basic_o[g-r]*;
++ std::basic_ostr[a-d]*;
++ std::basic_ostr[f-z]*;
+ std::basic_[p-r]*;
+ std::basic_streambuf*;
+ # std::basic_string
+@@ -88,7 +91,14 @@ GLIBCXX_3.4 {
+ std::locale::_[J-Ra-z]*;
+ std::locale::_S_normalize_category*;
+ std::locale::_[T-Za-z]*;
+- std::[A-Zm-r]*;
++# std::[A-Zm-r]*;
++ std::[A-Zmp-r]*;
++ std::n[^u]*;
++ std::nu[^m]*;
++ std::num[^e]*;
++ std::ostrstream*;
++ std::out_of_range*;
++ std::overflow_error*;
+ std::set_new_handler*;
+ std::set_terminate*;
+ std::set_unexpected*;
+@@ -256,7 +266,7 @@ GLIBCXX_3.4 {
+ _ZNSi[0-9][a-h]*;
+ _ZNSi[0-9][j-z]*;
+ _ZNSi6ignoreE[il][il];
+- _ZNSirsE*;
++ _ZNSirsE*[^g];
+
+ # std::basic_istream<wchar_t>
+ _ZNSt13basic_istreamIwSt11char_traitsIwEEC*;
+@@ -265,7 +275,7 @@ GLIBCXX_3.4 {
+ _ZNSt13basic_istreamIwSt11char_traitsIwEE[0-9][a-h]*;
+ _ZNSt13basic_istreamIwSt11char_traitsIwEE[0-9][j-z]*;
+ _ZNSt13basic_istreamIwSt11char_traitsIwEE6ignoreE[il][ijlm];
+- _ZNSt13basic_istreamIwSt11char_traitsIwEErsE*;
++ _ZNSt13basic_istreamIwSt11char_traitsIwEErsE*[^g];
+
+ # std::istream operators and inserters
+ _ZSt7getlineI[cw]St11char_traitsI[cw]ESaI[cw]EERSt13basic_istream*;
+@@ -277,6 +287,37 @@ GLIBCXX_3.4 {
+ _ZStrsIe[cw]St11char_traitsI[cw]EERSt13basic_istream*;
+ _ZStrsIf[cw]St11char_traitsI[cw]EERSt13basic_istream*;
+
++ # std::basic_ostream<char>
++ _ZNSoC*;
++ _ZNSoD*;
++ _ZNKSo6sentrycvbEv;
++ _ZNSo8_M_write*;
++ _ZNSo[0-9][a-z]*;
++ _ZNSolsE*[^g];
++
++ # std::basic_ostream<wchar_t>
++ _ZNSt13basic_ostreamIwSt11char_traitsIwEEC*;
++ _ZNSt13basic_ostreamIwSt11char_traitsIwEED*;
++ _ZNKSt13basic_ostreamIwSt11char_traitsIwEE[0-9][a-z]*;
++ _ZNSt13basic_ostreamIwSt11char_traitsIwEE3putEw;
++ _ZNSt13basic_ostreamIwSt11char_traitsIwEE5flushEv;
++ _ZNSt13basic_ostreamIwSt11char_traitsIwEE5seekpE*;
++ _ZNSt13basic_ostreamIwSt11char_traitsIwEE5tellpEv;
++ _ZNSt13basic_ostreamIwSt11char_traitsIwEE5writeEPKw*;
++ _ZNSt13basic_ostreamIwSt11char_traitsIwEE6sentry*;
++ _ZNSt13basic_ostreamIwSt11char_traitsIwEE8_M_write*;
++ _ZNSt13basic_ostreamIwSt11char_traitsIwEElsE*[^g];
++
++ # std::ostream operators and inserters
++ _ZSt4end[ls]I[cw]St11char_traitsI[cw]EERSt13basic_ostream*;
++ _ZSt5flushI[cw]St11char_traitsI[cw]EERSt13basic_ostream*;
++ _ZStlsI[cw]St11char_traitsI[cw]EERSt13basic_ostream*;
++ _ZStlsI[cw]St11char_traitsI[cw]ESaI[cw]EERSt13basic_ostream*;
++ _ZStlsISt11char_traitsI[cw]EERSt13basic_ostream*;
++ _ZStlsId[cw]St11char_traitsI[cw]EERSt13basic_ostream*;
++ _ZStlsIe[cw]St11char_traitsI[cw]EERSt13basic_ostream*;
++ _ZStlsIf[cw]St11char_traitsI[cw]EERSt13basic_ostream*;
++
+ # std::locale destructors
+ _ZNSt6localeD*;
+
+@@ -292,14 +333,23 @@ GLIBCXX_3.4 {
+ _ZNSt8ios_base4InitD*;
+
+ # bool std::has_facet
+- _ZSt9has_facet*;
++ _ZSt9has_facetIS*;
+
+ # std::num_get
+ _ZNKSt7num_getI[cw]St19istreambuf_iteratorI[cw]St11char_traitsI[cw]EEE*;
+
++ # std::num_put
++ _ZNKSt7num_putI[cw]St19ostreambuf_iteratorI[cw]St11char_traitsI[cw]EEE*;
++
+ # std::money_get
+ _ZNKSt9money_getI[cw]St19istreambuf_iteratorI[cw]St11char_traitsI[cw]EEE*;
+
++ # std::money_put
++ _ZNKSt9money_putI[cw]St19ostreambuf_iteratorI[cw]St11char_traitsI[cw]EEE*;
++
++ # std::numeric_limits
++ _ZNSt14numeric_limitsI[^g]*;
++
+ # std::_Rb_tree
+ _ZSt18_Rb_tree_decrementPKSt18_Rb_tree_node_base;
+ _ZSt18_Rb_tree_decrementPSt18_Rb_tree_node_base;
+@@ -327,7 +377,7 @@ GLIBCXX_3.4 {
+ _ZNSt12__basic_fileIcED*;
+
+ # std::__convert_to_v
+- _ZSt14__convert_to_v*;
++ _ZSt14__convert_to_vI[^g]*;
+
+ # __gnu_cxx::stdio_sync_filebuf
+ _ZTVN9__gnu_cxx18stdio_sync_filebufI[cw]St11char_traitsI[cw]EEE;
+@@ -399,7 +449,8 @@ GLIBCXX_3.4 {
+ _ZTSN9__gnu_cxx13stdio_filebufI[cw]St11char_traitsI[cw]EEE;
+
+ # function-scope static objects requires a guard variable.
+- _ZGVNSt*;
++ _ZGVNSt[^1]*;
++ _ZGVNSt1[^7]*;
+
+ # virtual function thunks
+ _ZThn8_NS*;
+@@ -665,9 +716,9 @@ CXXABI_1.3 {
+ _ZTVN10__cxxabiv121__vmi_class_type_infoE;
+
+ # typeinfo structure (and some names)
+- _ZTI[a-z];
+- _ZTIP[a-z];
+- _ZTIPK[a-z];
++ _ZTI[a-fh-z];
++ _ZTIP[a-fh-z];
++ _ZTIPK[a-fh-z];
+ _ZTIN10__cxxabiv117__array_type_infoE;
+ _ZTIN10__cxxabiv117__class_type_infoE;
+ _ZTIN10__cxxabiv116__enum_type_infoE;
+@@ -680,9 +731,9 @@ CXXABI_1.3 {
+ _ZTIN10__cxxabiv121__vmi_class_type_infoE;
+
+ # typeinfo name
+- _ZTS[a-z];
+- _ZTSP[a-z];
+- _ZTSPK[a-z];
++ _ZTS[a-fh-z];
++ _ZTSP[a-fh-z];
++ _ZTSPK[a-fh-z];
+ _ZTSN10__cxxabiv117__array_type_infoE;
+ _ZTSN10__cxxabiv117__class_type_infoE;
+ _ZTSN10__cxxabiv116__enum_type_infoE;
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/config/locale/generic/c_locale.cc gcc-41-20060515/libstdc++-v3/config/locale/generic/c_locale.cc
+--- gcc-41-20060515.orig/libstdc++-v3/config/locale/generic/c_locale.cc 2006-05-15 11:15:39.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/config/locale/generic/c_locale.cc 2006-05-15 13:47:27.605398768 -0500
+@@ -1,6 +1,6 @@
+ // Wrapper for underlying C-language localization -*- C++ -*-
+
+-// Copyright (C) 2001, 2002, 2003, 2004, 2005
++// Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006
+ // Free Software Foundation, Inc.
+ //
+ // This file is part of the GNU ISO C++ Library. This library is free
+@@ -168,3 +168,10 @@ namespace std
+ {
+ const char* const* const locale::_S_categories = __gnu_cxx::category_names;
+ } // namespace std
++
++// XXX GLIBCXX_ABI Deprecated
++#ifdef _GLIBCXX_LONG_DOUBLE_COMPAT
++#define _GLIBCXX_LDBL_COMPAT(dbl, ldbl) \
++ extern "C" void ldbl (void) __attribute__ ((alias (#dbl)))
++_GLIBCXX_LDBL_COMPAT(_ZSt14__convert_to_vIdEvPKcRT_RSt12_Ios_IostateRKPi, _ZSt14__convert_to_vIeEvPKcRT_RSt12_Ios_IostateRKPi);
++#endif // _GLIBCXX_LONG_DOUBLE_COMPAT
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/config/locale/gnu/c_locale.cc gcc-41-20060515/libstdc++-v3/config/locale/gnu/c_locale.cc
+--- gcc-41-20060515.orig/libstdc++-v3/config/locale/gnu/c_locale.cc 2006-05-15 11:15:39.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/config/locale/gnu/c_locale.cc 2006-05-15 13:47:27.606398615 -0500
+@@ -1,6 +1,6 @@
+ // Wrapper for underlying C-language localization -*- C++ -*-
+
+-// Copyright (C) 2001, 2002, 2003, 2004, 2005
++// Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006
+ // Free Software Foundation, Inc.
+ //
+ // This file is part of the GNU ISO C++ Library. This library is free
+@@ -132,3 +132,10 @@ namespace std
+ {
+ const char* const* const locale::_S_categories = __gnu_cxx::category_names;
+ } // namespace std
++
++// XXX GLIBCXX_ABI Deprecated
++#ifdef _GLIBCXX_LONG_DOUBLE_COMPAT
++#define _GLIBCXX_LDBL_COMPAT(dbl, ldbl) \
++ extern "C" void ldbl (void) __attribute__ ((alias (#dbl)))
++_GLIBCXX_LDBL_COMPAT(_ZSt14__convert_to_vIdEvPKcRT_RSt12_Ios_IostateRKP15__locale_struct, _ZSt14__convert_to_vIeEvPKcRT_RSt12_Ios_IostateRKP15__locale_struct);
++#endif // _GLIBCXX_LONG_DOUBLE_COMPAT
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/config/os/gnu-linux/ldbl-extra.ver gcc-41-20060515/libstdc++-v3/config/os/gnu-linux/ldbl-extra.ver
+--- gcc-41-20060515.orig/libstdc++-v3/config/os/gnu-linux/ldbl-extra.ver 1969-12-31 18:00:00.000000000 -0600
++++ gcc-41-20060515/libstdc++-v3/config/os/gnu-linux/ldbl-extra.ver 2006-05-15 13:47:27.606398615 -0500
+@@ -0,0 +1,19 @@
++# Appended to version file.
++
++GLIBCXX_LDBL_3.4 {
++ _ZNSt14numeric_limitsIg*;
++ _ZNSirsERg;
++ _ZNSolsEg;
++ _ZNSt13basic_istreamIwSt11char_traitsIwEErsERg;
++ _ZNSt13basic_ostreamIwSt11char_traitsIwEElsEg;
++ _ZSt14__convert_to_vIgEvPKcRT_RSt12_Ios_IostateRKP*;
++ _ZStlsIg[cw]St11char_traitsI[cw]EERSt13basic_ostreamIT0_T1_ES6_RKSt7complexIT_E;
++ _ZStrsIg[cw]St11char_traitsI[cw]EERSt13basic_istreamIT0_T1_ES6_RSt7complexIT_E;
++ *__gnu_cxx_ldbl128*;
++};
++
++CXXABI_LDBL_1.3 {
++ _ZT[IS]g;
++ _ZT[IS]Pg;
++ _ZT[IS]PKg;
++};
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/config.h.in gcc-41-20060515/libstdc++-v3/config.h.in
+--- gcc-41-20060515.orig/libstdc++-v3/config.h.in 2006-05-15 11:15:42.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/config.h.in 2006-05-15 13:47:27.601399384 -0500
+@@ -658,6 +658,9 @@
+ /* Define to 1 if a full hosted library is built, or 0 if freestanding. */
+ #undef _GLIBCXX_HOSTED
+
++/* Define if compatibility should be provided for -mlong-double-64. */
++#undef _GLIBCXX_LONG_DOUBLE_COMPAT
++
+ /* Define if ptrdiff_t is int. */
+ #undef _GLIBCXX_PTRDIFF_T_IS_INT
+
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/configure gcc-41-20060515/libstdc++-v3/configure
+--- gcc-41-20060515.orig/libstdc++-v3/configure 2006-05-15 11:15:42.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/configure 2006-05-15 13:47:27.664389689 -0500
+@@ -309,7 +309,7 @@ ac_includes_default="\
+ # include <unistd.h>
+ #endif"
+
+-ac_subst_vars='SHELL PATH_SEPARATOR PACKAGE_NAME PACKAGE_TARNAME PACKAGE_VERSION PACKAGE_STRING PACKAGE_BUGREPORT exec_prefix prefix program_transform_name bindir sbindir libexecdir datadir sysconfdir sharedstatedir localstatedir libdir includedir oldincludedir infodir mandir build_alias host_alias target_alias DEFS ECHO_C ECHO_N ECHO_T LIBS libtool_VERSION multi_basedir build build_cpu build_vendor build_os host host_cpu host_vendor host_os target target_cpu target_vendor target_os INSTALL_PROGRAM INSTALL_SCRIPT INSTALL_DATA CYGPATH_W PACKAGE VERSION ACLOCAL AUTOCONF AUTOMAKE AUTOHEADER MAKEINFO install_sh STRIP ac_ct_STRIP INSTALL_STRIP_PROGRAM mkdir_p AWK SET_MAKE am__leading_dot AMTAR am__tar am__untar glibcxx_builddir glibcxx_srcdir toplevel_srcdir CC ac_ct_CC EXEEXT OBJEXT CXX ac_ct_CXX CFLAGS CXXFLAGS LN_S AS ac_ct_AS AR ac_ct_AR RANLIB ac_ct_RANLIB MAINTAINER_MODE_TRUE MAINTAINER_MODE_FALSE MAINT LIBTOOL CXXCPP CPPFLAGS enable_shared enable_static GLIBCXX_HOSTED_TRUE GLIBCXX_HOSTED_FALSE GLIBCXX_BUILD_PCH_TRUE GLIBCXX_BUILD_PCH_FALSE glibcxx_PCHFLAGS CSTDIO_H BASIC_FILE_H BASIC_FILE_CC CPP EGREP check_msgfmt glibcxx_MOFILES glibcxx_POFILES glibcxx_localedir USE_NLS CLOCALE_H CMESSAGES_H CCODECVT_CC CCOLLATE_CC CCTYPE_CC CMESSAGES_CC CMONEY_CC CNUMERIC_CC CTIME_H CTIME_CC CLOCALE_CC CLOCALE_INTERNAL_H ALLOCATOR_H ALLOCATOR_NAME C_INCLUDE_DIR GLIBCXX_C_HEADERS_C_TRUE GLIBCXX_C_HEADERS_C_FALSE GLIBCXX_C_HEADERS_C_STD_TRUE GLIBCXX_C_HEADERS_C_STD_FALSE GLIBCXX_C_HEADERS_COMPATIBILITY_TRUE GLIBCXX_C_HEADERS_COMPATIBILITY_FALSE DEBUG_FLAGS GLIBCXX_BUILD_DEBUG_TRUE GLIBCXX_BUILD_DEBUG_FALSE EXTRA_CXX_FLAGS glibcxx_thread_h WERROR SECTION_FLAGS SECTION_LDFLAGS OPT_LDFLAGS LIBMATHOBJS LIBICONV SYMVER_MAP port_specific_symbol_files ENABLE_SYMVERS_GNU_TRUE ENABLE_SYMVERS_GNU_FALSE ENABLE_SYMVERS_DARWIN_EXPORT_TRUE ENABLE_SYMVERS_DARWIN_EXPORT_FALSE baseline_dir ATOMICITY_SRCDIR ATOMIC_WORD_SRCDIR CPU_DEFINES_SRCDIR ABI_TWEAKS_SRCDIR OS_INC_SRCDIR glibcxx_prefixdir gxx_include_dir glibcxx_toolexecdir glibcxx_toolexeclibdir GLIBCXX_INCLUDES TOPLEVEL_INCLUDES OPTIMIZE_CXXFLAGS WARN_FLAGS LIBSUPCXX_PICFLAGS LIBOBJS LTLIBOBJS'
++ac_subst_vars='SHELL PATH_SEPARATOR PACKAGE_NAME PACKAGE_TARNAME PACKAGE_VERSION PACKAGE_STRING PACKAGE_BUGREPORT exec_prefix prefix program_transform_name bindir sbindir libexecdir datadir sysconfdir sharedstatedir localstatedir libdir includedir oldincludedir infodir mandir build_alias host_alias target_alias DEFS ECHO_C ECHO_N ECHO_T LIBS libtool_VERSION multi_basedir build build_cpu build_vendor build_os host host_cpu host_vendor host_os target target_cpu target_vendor target_os INSTALL_PROGRAM INSTALL_SCRIPT INSTALL_DATA CYGPATH_W PACKAGE VERSION ACLOCAL AUTOCONF AUTOMAKE AUTOHEADER MAKEINFO install_sh STRIP ac_ct_STRIP INSTALL_STRIP_PROGRAM mkdir_p AWK SET_MAKE am__leading_dot AMTAR am__tar am__untar glibcxx_builddir glibcxx_srcdir toplevel_srcdir CC ac_ct_CC EXEEXT OBJEXT CXX ac_ct_CXX CFLAGS CXXFLAGS LN_S AS ac_ct_AS AR ac_ct_AR RANLIB ac_ct_RANLIB MAINTAINER_MODE_TRUE MAINTAINER_MODE_FALSE MAINT LIBTOOL CXXCPP CPPFLAGS enable_shared enable_static GLIBCXX_HOSTED_TRUE GLIBCXX_HOSTED_FALSE GLIBCXX_BUILD_PCH_TRUE GLIBCXX_BUILD_PCH_FALSE glibcxx_PCHFLAGS CSTDIO_H BASIC_FILE_H BASIC_FILE_CC CPP EGREP check_msgfmt glibcxx_MOFILES glibcxx_POFILES glibcxx_localedir USE_NLS CLOCALE_H CMESSAGES_H CCODECVT_CC CCOLLATE_CC CCTYPE_CC CMESSAGES_CC CMONEY_CC CNUMERIC_CC CTIME_H CTIME_CC CLOCALE_CC CLOCALE_INTERNAL_H ALLOCATOR_H ALLOCATOR_NAME C_INCLUDE_DIR GLIBCXX_C_HEADERS_C_TRUE GLIBCXX_C_HEADERS_C_FALSE GLIBCXX_C_HEADERS_C_STD_TRUE GLIBCXX_C_HEADERS_C_STD_FALSE GLIBCXX_C_HEADERS_COMPATIBILITY_TRUE GLIBCXX_C_HEADERS_COMPATIBILITY_FALSE DEBUG_FLAGS GLIBCXX_BUILD_DEBUG_TRUE GLIBCXX_BUILD_DEBUG_FALSE EXTRA_CXX_FLAGS glibcxx_thread_h WERROR SECTION_FLAGS SECTION_LDFLAGS OPT_LDFLAGS LIBMATHOBJS LIBICONV SYMVER_MAP port_specific_symbol_files ENABLE_SYMVERS_GNU_TRUE ENABLE_SYMVERS_GNU_FALSE ENABLE_SYMVERS_DARWIN_EXPORT_TRUE ENABLE_SYMVERS_DARWIN_EXPORT_FALSE GLIBCXX_LDBL_COMPAT_TRUE GLIBCXX_LDBL_COMPAT_FALSE baseline_dir ATOMICITY_SRCDIR ATOMIC_WORD_SRCDIR CPU_DEFINES_SRCDIR ABI_TWEAKS_SRCDIR OS_INC_SRCDIR glibcxx_prefixdir gxx_include_dir glibcxx_toolexecdir glibcxx_toolexeclibdir GLIBCXX_INCLUDES TOPLEVEL_INCLUDES OPTIMIZE_CXXFLAGS WARN_FLAGS LIBSUPCXX_PICFLAGS LIBOBJS LTLIBOBJS'
+ ac_subst_files=''
+
+ # Initialize some variables set by options.
+@@ -87959,6 +87959,72 @@ echo "${ECHO_T}$glibcxx_ptrdiff_t_is_i"
+ echo "$as_me: versioning on shared library symbols is $enable_symvers" >&6;}
+
+
++ac_ldbl_compat=no
++case "$target" in
++ powerpc*-*-*gnu* | \
++ sparc*-*-linux* | \
++ s390*-*-linux* | \
++ alpha*-*-linux*)
++ cat >conftest.$ac_ext <<_ACEOF
++/* confdefs.h. */
++_ACEOF
++cat confdefs.h >>conftest.$ac_ext
++cat >>conftest.$ac_ext <<_ACEOF
++/* end confdefs.h. */
++
++int
++main ()
++{
++
++#if !defined __LONG_DOUBLE_128__ || (defined(__sparc__) && defined(__arch64__))
++#error no need for long double compatibility
++#endif
++
++ ;
++ return 0;
++}
++_ACEOF
++rm -f conftest.$ac_objext
++if { (eval echo "$as_me:$LINENO: \"$ac_compile\"") >&5
++ (eval $ac_compile) 2>conftest.er1
++ ac_status=$?
++ grep -v '^ *+' conftest.er1 >conftest.err
++ rm -f conftest.er1
++ cat conftest.err >&5
++ echo "$as_me:$LINENO: \$? = $ac_status" >&5
++ (exit $ac_status); } &&
++ { ac_try='test -z "$ac_c_werror_flag"
++ || test ! -s conftest.err'
++ { (eval echo "$as_me:$LINENO: \"$ac_try\"") >&5
++ (eval $ac_try) 2>&5
++ ac_status=$?
++ echo "$as_me:$LINENO: \$? = $ac_status" >&5
++ (exit $ac_status); }; } &&
++ { ac_try='test -s conftest.$ac_objext'
++ { (eval echo "$as_me:$LINENO: \"$ac_try\"") >&5
++ (eval $ac_try) 2>&5
++ ac_status=$?
++ echo "$as_me:$LINENO: \$? = $ac_status" >&5
++ (exit $ac_status); }; }; then
++ ac_ldbl_compat=yes
++else
++ echo "$as_me: failed program was:" >&5
++sed 's/^/| /' conftest.$ac_ext >&5
++
++ac_ldbl_compat=no
++fi
++rm -f conftest.err conftest.$ac_objext conftest.$ac_ext
++ if test "$ac_ldbl_compat" = yes; then
++
++cat >>confdefs.h <<\_ACEOF
++#define _GLIBCXX_LONG_DOUBLE_COMPAT 1
++_ACEOF
++
++ port_specific_symbol_files="\$(top_srcdir)/config/os/gnu-linux/ldbl-extra.ver"
++ fi
++esac
++
++
+ # This depends on GLIBCXX_ENABLE_SYMVERS and GLIBCXX_IS_NATIVE.
+
+ if $GLIBCXX_IS_NATIVE ; then
+@@ -88811,6 +88877,17 @@ fi
+
+
+
++if test $ac_ldbl_compat = yes; then
++ GLIBCXX_LDBL_COMPAT_TRUE=
++ GLIBCXX_LDBL_COMPAT_FALSE='#'
++else
++ GLIBCXX_LDBL_COMPAT_TRUE='#'
++ GLIBCXX_LDBL_COMPAT_FALSE=
++fi
++
++
++
++
+ cat >confcache <<\_ACEOF
+ # This file is a shell script that caches the results of configure
+ # tests run on this system so they can be shared between configure
+@@ -89166,6 +89243,13 @@ echo "$as_me: error: conditional \"ENABL
+ Usually this means the macro was only invoked conditionally." >&2;}
+ { (exit 1); exit 1; }; }
+ fi
++if test -z "${GLIBCXX_LDBL_COMPAT_TRUE}" && test -z "${GLIBCXX_LDBL_COMPAT_FALSE}"; then
++ { { echo "$as_me:$LINENO: error: conditional \"GLIBCXX_LDBL_COMPAT\" was never defined.
++Usually this means the macro was only invoked conditionally." >&5
++echo "$as_me: error: conditional \"GLIBCXX_LDBL_COMPAT\" was never defined.
++Usually this means the macro was only invoked conditionally." >&2;}
++ { (exit 1); exit 1; }; }
++fi
+
+ : ${CONFIG_STATUS=./config.status}
+ ac_clean_files_save=$ac_clean_files
+@@ -89836,6 +89920,8 @@ s,@ENABLE_SYMVERS_GNU_TRUE@,$ENABLE_SYMV
+ s,@ENABLE_SYMVERS_GNU_FALSE@,$ENABLE_SYMVERS_GNU_FALSE,;t t
+ s,@ENABLE_SYMVERS_DARWIN_EXPORT_TRUE@,$ENABLE_SYMVERS_DARWIN_EXPORT_TRUE,;t t
+ s,@ENABLE_SYMVERS_DARWIN_EXPORT_FALSE@,$ENABLE_SYMVERS_DARWIN_EXPORT_FALSE,;t t
++s,@GLIBCXX_LDBL_COMPAT_TRUE@,$GLIBCXX_LDBL_COMPAT_TRUE,;t t
++s,@GLIBCXX_LDBL_COMPAT_FALSE@,$GLIBCXX_LDBL_COMPAT_FALSE,;t t
+ s,@baseline_dir@,$baseline_dir,;t t
+ s,@ATOMICITY_SRCDIR@,$ATOMICITY_SRCDIR,;t t
+ s,@ATOMIC_WORD_SRCDIR@,$ATOMIC_WORD_SRCDIR,;t t
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/configure.ac gcc-41-20060515/libstdc++-v3/configure.ac
+--- gcc-41-20060515.orig/libstdc++-v3/configure.ac 2006-05-15 11:15:42.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/configure.ac 2006-05-15 13:47:27.665389535 -0500
+@@ -281,6 +281,25 @@ fi
+ # This depends on GLIBCXX CHECK_LINKER_FEATURES, but without it assumes no.
+ GLIBCXX_ENABLE_SYMVERS([yes])
+
++ac_ldbl_compat=no
++case "$target" in
++ powerpc*-*-*gnu* | \
++ sparc*-*-linux* | \
++ s390*-*-linux* | \
++ alpha*-*-linux*)
++ AC_TRY_COMPILE(, [
++#if !defined __LONG_DOUBLE_128__ || (defined(__sparc__) && defined(__arch64__))
++#error no need for long double compatibility
++#endif
++ ], [ac_ldbl_compat=yes], [ac_ldbl_compat=no])
++ if test "$ac_ldbl_compat" = yes; then
++ AC_DEFINE([_GLIBCXX_LONG_DOUBLE_COMPAT],1,
++ [Define if compatibility should be provided for -mlong-double-64.])
++ port_specific_symbol_files="\$(top_srcdir)/config/os/gnu-linux/ldbl-extra.ver"
++ fi
++esac
++GLIBCXX_CONDITIONAL(GLIBCXX_LDBL_COMPAT, test $ac_ldbl_compat = yes)
++
+ # This depends on GLIBCXX_ENABLE_SYMVERS and GLIBCXX_IS_NATIVE.
+ GLIBCXX_CONFIGURE_TESTSUITE
+
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/include/bits/c++config gcc-41-20060515/libstdc++-v3/include/bits/c++config
+--- gcc-41-20060515.orig/libstdc++-v3/include/bits/c++config 2006-05-15 11:14:38.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/include/bits/c++config 2006-05-15 13:47:27.668389073 -0500
+@@ -1,6 +1,6 @@
+ // Predefined symbols and macros -*- C++ -*-
+
+-// Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005
++// Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006
+ // Free Software Foundation, Inc.
+ //
+ // This file is part of the GNU ISO C++ Library. This library is free
+@@ -65,6 +65,26 @@ namespace std
+ # define _GLIBCXX_STD std
+ #endif
+
++/* Define if compatibility should be provided for -mlong-double-64. */
++#undef _GLIBCXX_LONG_DOUBLE_COMPAT
++
++// XXX GLIBCXX_ABI Deprecated
++// Namespace associations for long double 128 mode.
++#if defined _GLIBCXX_LONG_DOUBLE_COMPAT && defined __LONG_DOUBLE_128__
++# define _GLIBCXX_LDBL_NAMESPACE __gnu_cxx_ldbl128::
++# define _GLIBCXX_BEGIN_LDBL_NAMESPACE namespace __gnu_cxx_ldbl128 {
++# define _GLIBCXX_END_LDBL_NAMESPACE }
++namespace std
++{
++ namespace __gnu_cxx_ldbl128 { }
++ using namespace __gnu_cxx_ldbl128 __attribute__((__strong__));
++}
++#else
++# define _GLIBCXX_LDBL_NAMESPACE
++# define _GLIBCXX_BEGIN_LDBL_NAMESPACE
++# define _GLIBCXX_END_LDBL_NAMESPACE
++#endif
++
+ // Allow use of "export template." This is currently not a feature
+ // that g++ supports.
+ // #define _GLIBCXX_EXPORT_TEMPLATE 1
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/include/bits/locale_facets.h gcc-41-20060515/libstdc++-v3/include/bits/locale_facets.h
+--- gcc-41-20060515.orig/libstdc++-v3/include/bits/locale_facets.h 2006-05-15 11:14:38.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/include/bits/locale_facets.h 2006-05-15 13:47:27.673388304 -0500
+@@ -1,6 +1,6 @@
+ // Locale support -*- C++ -*-
+
+-// Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005
++// Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006
+ // Free Software Foundation, Inc.
+ //
+ // This file is part of the GNU ISO C++ Library. This library is free
+@@ -1910,6 +1910,7 @@ namespace std
+ ~numpunct_byname() { }
+ };
+
++_GLIBCXX_BEGIN_LDBL_NAMESPACE
+ /**
+ * @brief Facet for parsing number strings.
+ *
+@@ -2176,13 +2177,27 @@ namespace std
+ do_get(iter_type, iter_type, ios_base&, ios_base::iostate& __err,
+ double&) const;
+
++ // XXX GLIBCXX_ABI Deprecated
++#if defined _GLIBCXX_LONG_DOUBLE_COMPAT && defined __LONG_DOUBLE_128__
++ virtual iter_type
++ __do_get(iter_type, iter_type, ios_base&, ios_base::iostate& __err,
++ double&) const;
++#else
+ virtual iter_type
+ do_get(iter_type, iter_type, ios_base&, ios_base::iostate& __err,
+ long double&) const;
++#endif
+
+ virtual iter_type
+ do_get(iter_type, iter_type, ios_base&, ios_base::iostate& __err,
+ void*&) const;
++
++ // XXX GLIBCXX_ABI Deprecated
++#if defined _GLIBCXX_LONG_DOUBLE_COMPAT && defined __LONG_DOUBLE_128__
++ virtual iter_type
++ do_get(iter_type, iter_type, ios_base&, ios_base::iostate& __err,
++ long double&) const;
++#endif
+ //@}
+ };
+
+@@ -2438,17 +2453,30 @@ namespace std
+ virtual iter_type
+ do_put(iter_type, ios_base&, char_type __fill, double __v) const;
+
++ // XXX GLIBCXX_ABI Deprecated
++#if defined _GLIBCXX_LONG_DOUBLE_COMPAT && defined __LONG_DOUBLE_128__
++ virtual iter_type
++ __do_put(iter_type, ios_base&, char_type __fill, double __v) const;
++#else
+ virtual iter_type
+ do_put(iter_type, ios_base&, char_type __fill, long double __v) const;
++#endif
+
+ virtual iter_type
+ do_put(iter_type, ios_base&, char_type __fill, const void* __v) const;
++
++ // XXX GLIBCXX_ABI Deprecated
++#if defined _GLIBCXX_LONG_DOUBLE_COMPAT && defined __LONG_DOUBLE_128__
++ virtual iter_type
++ do_put(iter_type, ios_base&, char_type __fill, long double __v) const;
++#endif
+ //@}
+ };
+
+ template <typename _CharT, typename _OutIter>
+ locale::id num_put<_CharT, _OutIter>::id;
+
++_GLIBCXX_END_LDBL_NAMESPACE
+
+ /**
+ * @brief Facet for localized string comparison.
+@@ -3953,6 +3981,7 @@ namespace std
+ template<typename _CharT, bool _Intl>
+ const bool moneypunct_byname<_CharT, _Intl>::intl;
+
++_GLIBCXX_BEGIN_LDBL_NAMESPACE
+ /**
+ * @brief Facet for parsing monetary amounts.
+ *
+@@ -4064,9 +4093,16 @@ namespace std
+ * value. This function is a hook for derived classes to change the
+ * value returned. @see get() for details.
+ */
++ // XXX GLIBCXX_ABI Deprecated
++#if defined _GLIBCXX_LONG_DOUBLE_COMPAT && defined __LONG_DOUBLE_128__
++ virtual iter_type
++ __do_get(iter_type __s, iter_type __end, bool __intl, ios_base& __io,
++ ios_base::iostate& __err, double& __units) const;
++#else
+ virtual iter_type
+ do_get(iter_type __s, iter_type __end, bool __intl, ios_base& __io,
+ ios_base::iostate& __err, long double& __units) const;
++#endif
+
+ /**
+ * @brief Read and parse a monetary value.
+@@ -4079,6 +4115,13 @@ namespace std
+ do_get(iter_type __s, iter_type __end, bool __intl, ios_base& __io,
+ ios_base::iostate& __err, string_type& __digits) const;
+
++ // XXX GLIBCXX_ABI Deprecated
++#if defined _GLIBCXX_LONG_DOUBLE_COMPAT && defined __LONG_DOUBLE_128__
++ virtual iter_type
++ do_get(iter_type __s, iter_type __end, bool __intl, ios_base& __io,
++ ios_base::iostate& __err, long double& __units) const;
++#endif
++
+ template<bool _Intl>
+ iter_type
+ _M_extract(iter_type __s, iter_type __end, ios_base& __io,
+@@ -4191,9 +4234,16 @@ namespace std
+ * @param units Place to store result of parsing.
+ * @return Iterator after writing.
+ */
++ // XXX GLIBCXX_ABI Deprecated
++#if defined _GLIBCXX_LONG_DOUBLE_COMPAT && defined __LONG_DOUBLE_128__
++ virtual iter_type
++ __do_put(iter_type __s, bool __intl, ios_base& __io, char_type __fill,
++ double __units) const;
++#else
+ virtual iter_type
+ do_put(iter_type __s, bool __intl, ios_base& __io, char_type __fill,
+ long double __units) const;
++#endif
+
+ /**
+ * @brief Format and output a monetary value.
+@@ -4217,6 +4267,13 @@ namespace std
+ do_put(iter_type __s, bool __intl, ios_base& __io, char_type __fill,
+ const string_type& __digits) const;
+
++ // XXX GLIBCXX_ABI Deprecated
++#if defined _GLIBCXX_LONG_DOUBLE_COMPAT && defined __LONG_DOUBLE_128__
++ virtual iter_type
++ do_put(iter_type __s, bool __intl, ios_base& __io, char_type __fill,
++ long double __units) const;
++#endif
++
+ template<bool _Intl>
+ iter_type
+ _M_insert(iter_type __s, ios_base& __io, char_type __fill,
+@@ -4226,6 +4283,8 @@ namespace std
+ template<typename _CharT, typename _OutIter>
+ locale::id money_put<_CharT, _OutIter>::id;
+
++_GLIBCXX_END_LDBL_NAMESPACE
++
+ /**
+ * @brief Messages facet base class providing catalog typedef.
+ */
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/include/bits/locale_facets.tcc gcc-41-20060515/libstdc++-v3/include/bits/locale_facets.tcc
+--- gcc-41-20060515.orig/libstdc++-v3/include/bits/locale_facets.tcc 2006-05-15 11:14:38.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/include/bits/locale_facets.tcc 2006-05-15 13:47:27.676387842 -0500
+@@ -1,6 +1,6 @@
+ // Locale support -*- C++ -*-
+
+-// Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005
++// Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006
+ // Free Software Foundation, Inc.
+ //
+ // This file is part of the GNU ISO C++ Library. This library is free
+@@ -272,6 +272,8 @@ namespace std
+ __verify_grouping(const char* __grouping, size_t __grouping_size,
+ const string& __grouping_tmp);
+
++_GLIBCXX_BEGIN_LDBL_NAMESPACE
++
+ template<typename _CharT, typename _InIter>
+ _InIter
+ num_get<_CharT, _InIter>::
+@@ -446,6 +448,8 @@ namespace std
+ return __beg;
+ }
+
++_GLIBCXX_END_LDBL_NAMESPACE
++
+ template<typename _ValueT>
+ struct __to_unsigned_type
+ { typedef _ValueT __type; };
+@@ -460,6 +464,8 @@ namespace std
+ { typedef unsigned long long __type; };
+ #endif
+
++_GLIBCXX_BEGIN_LDBL_NAMESPACE
++
+ template<typename _CharT, typename _InIter>
+ template<typename _ValueT>
+ _InIter
+@@ -772,6 +778,21 @@ namespace std
+ return __beg;
+ }
+
++#if defined _GLIBCXX_LONG_DOUBLE_COMPAT && defined __LONG_DOUBLE_128__
++ template<typename _CharT, typename _InIter>
++ _InIter
++ num_get<_CharT, _InIter>::
++ __do_get(iter_type __beg, iter_type __end, ios_base& __io,
++ ios_base::iostate& __err, double& __v) const
++ {
++ string __xtrc;
++ __xtrc.reserve(32);
++ __beg = _M_extract_float(__beg, __end, __io, __err, __xtrc);
++ std::__convert_to_v(__xtrc.c_str(), __v, __err, _S_get_c_locale());
++ return __beg;
++ }
++#endif
++
+ template<typename _CharT, typename _InIter>
+ _InIter
+ num_get<_CharT, _InIter>::
+@@ -822,6 +843,8 @@ namespace std
+ __len = static_cast<int>(__w);
+ }
+
++_GLIBCXX_END_LDBL_NAMESPACE
++
+ // Forwarding functions to peel signed from unsigned integer types and
+ // either cast or compute the absolute value for the former, depending
+ // on __basefield.
+@@ -911,6 +934,8 @@ namespace std
+ return __bufend - __buf;
+ }
+
++_GLIBCXX_BEGIN_LDBL_NAMESPACE
++
+ template<typename _CharT, typename _OutIter>
+ void
+ num_put<_CharT, _OutIter>::
+@@ -1233,6 +1258,14 @@ namespace std
+ do_put(iter_type __s, ios_base& __io, char_type __fill, double __v) const
+ { return _M_insert_float(__s, __io, __fill, char(), __v); }
+
++#if defined _GLIBCXX_LONG_DOUBLE_COMPAT && defined __LONG_DOUBLE_128__
++ template<typename _CharT, typename _OutIter>
++ _OutIter
++ num_put<_CharT, _OutIter>::
++ __do_put(iter_type __s, ios_base& __io, char_type __fill, double __v) const
++ { return _M_insert_float(__s, __io, __fill, char(), __v); }
++#endif
++
+ template<typename _CharT, typename _OutIter>
+ _OutIter
+ num_put<_CharT, _OutIter>::
+@@ -1474,6 +1507,23 @@ namespace std
+ return __beg;
+ }
+
++#if defined _GLIBCXX_LONG_DOUBLE_COMPAT && defined __LONG_DOUBLE_128__
++ template<typename _CharT, typename _InIter>
++ _InIter
++ money_get<_CharT, _InIter>::
++ __do_get(iter_type __beg, iter_type __end, bool __intl, ios_base& __io,
++ ios_base::iostate& __err, double& __units) const
++ {
++ string __str;
++ if (__intl)
++ __beg = _M_extract<true>(__beg, __end, __io, __err, __str);
++ else
++ __beg = _M_extract<false>(__beg, __end, __io, __err, __str);
++ std::__convert_to_v(__str.c_str(), __units, __err, _S_get_c_locale());
++ return __beg;
++ }
++#endif
++
+ template<typename _CharT, typename _InIter>
+ _InIter
+ money_get<_CharT, _InIter>::
+@@ -1678,7 +1728,18 @@ namespace std
+ __io.width(0);
+ return __s;
+ }
+-
++
++#if defined _GLIBCXX_LONG_DOUBLE_COMPAT && defined __LONG_DOUBLE_128__
++ template<typename _CharT, typename _OutIter>
++ _OutIter
++ money_put<_CharT, _OutIter>::
++ __do_put(iter_type __s, bool __intl, ios_base& __io, char_type __fill,
++ double __units) const
++ {
++ return this->do_put(__s, __intl, __io, __fill, (long double) __units);
++ }
++#endif
++
+ template<typename _CharT, typename _OutIter>
+ _OutIter
+ money_put<_CharT, _OutIter>::
+@@ -1726,6 +1787,7 @@ namespace std
+ { return __intl ? _M_insert<true>(__s, __io, __fill, __digits)
+ : _M_insert<false>(__s, __io, __fill, __digits); }
+
++_GLIBCXX_END_LDBL_NAMESPACE
+
+ // NB: Not especially useful. Without an ios_base object or some
+ // kind of locale reference, we are left clawing at the air where
+@@ -2511,12 +2573,12 @@ namespace std
+ extern template class moneypunct<char, true>;
+ extern template class moneypunct_byname<char, false>;
+ extern template class moneypunct_byname<char, true>;
+- extern template class money_get<char>;
+- extern template class money_put<char>;
++ extern template class _GLIBCXX_LDBL_NAMESPACE money_get<char>;
++ extern template class _GLIBCXX_LDBL_NAMESPACE money_put<char>;
+ extern template class numpunct<char>;
+ extern template class numpunct_byname<char>;
+- extern template class num_get<char>;
+- extern template class num_put<char>;
++ extern template class _GLIBCXX_LDBL_NAMESPACE num_get<char>;
++ extern template class _GLIBCXX_LDBL_NAMESPACE num_put<char>;
+ extern template class __timepunct<char>;
+ extern template class time_put<char>;
+ extern template class time_put_byname<char>;
+@@ -2638,12 +2700,12 @@ namespace std
+ extern template class moneypunct<wchar_t, true>;
+ extern template class moneypunct_byname<wchar_t, false>;
+ extern template class moneypunct_byname<wchar_t, true>;
+- extern template class money_get<wchar_t>;
+- extern template class money_put<wchar_t>;
++ extern template class _GLIBCXX_LDBL_NAMESPACE money_get<wchar_t>;
++ extern template class _GLIBCXX_LDBL_NAMESPACE money_put<wchar_t>;
+ extern template class numpunct<wchar_t>;
+ extern template class numpunct_byname<wchar_t>;
+- extern template class num_get<wchar_t>;
+- extern template class num_put<wchar_t>;
++ extern template class _GLIBCXX_LDBL_NAMESPACE num_get<wchar_t>;
++ extern template class _GLIBCXX_LDBL_NAMESPACE num_put<wchar_t>;
+ extern template class __timepunct<wchar_t>;
+ extern template class time_put<wchar_t>;
+ extern template class time_put_byname<wchar_t>;
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/include/bits/localefwd.h gcc-41-20060515/libstdc++-v3/include/bits/localefwd.h
+--- gcc-41-20060515.orig/libstdc++-v3/include/bits/localefwd.h 2006-05-15 11:14:38.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/include/bits/localefwd.h 2006-05-15 13:47:27.676387842 -0500
+@@ -129,10 +129,12 @@ namespace std
+ class codecvt_byname;
+
+ // 22.2.2 and 22.2.3 numeric
++_GLIBCXX_BEGIN_LDBL_NAMESPACE
+ template<typename _CharT, typename _InIter = istreambuf_iterator<_CharT> >
+ class num_get;
+ template<typename _CharT, typename _OutIter = ostreambuf_iterator<_CharT> >
+ class num_put;
++_GLIBCXX_END_LDBL_NAMESPACE
+ template<typename _CharT> class numpunct;
+ template<typename _CharT> class numpunct_byname;
+
+@@ -155,10 +157,12 @@ namespace std
+
+ // 22.2.6 money
+ class money_base;
++_GLIBCXX_BEGIN_LDBL_NAMESPACE
+ template<typename _CharT, typename _InIter = istreambuf_iterator<_CharT> >
+ class money_get;
+ template<typename _CharT, typename _OutIter = ostreambuf_iterator<_CharT> >
+ class money_put;
++_GLIBCXX_END_LDBL_NAMESPACE
+ template<typename _CharT, bool _Intl = false>
+ class moneypunct;
+ template<typename _CharT, bool _Intl = false>
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/include/Makefile.am gcc-41-20060515/libstdc++-v3/include/Makefile.am
+--- gcc-41-20060515.orig/libstdc++-v3/include/Makefile.am 2006-05-15 11:14:39.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/include/Makefile.am 2006-05-15 13:47:27.666389381 -0500
+@@ -825,13 +825,18 @@ ${host_builddir}/c++config.h: ${top_buil
+ ${glibcxx_srcdir}/include/bits/c++config \
+ stamp-${host_alias} \
+ ${toplevel_srcdir}/gcc/DATESTAMP
+- @cat ${glibcxx_srcdir}/include/bits/c++config > $@ ;\
++ @ldbl_compat='' ;\
++ grep "^[ ]*#[ ]*define[ ][ ]*_GLIBCXX_LONG_DOUBLE_COMPAT[ ][ ]*1[ ]*$$" \
++ ${CONFIG_HEADER} > /dev/null 2>&1 \
++ && ldbl_compat='s,^#undef _GLIBCXX_LONG_DOUBLE_COMPAT$$,#define _GLIBCXX_LONG_DOUBLE_COMPAT 1,' ;\
++ sed -e "$$ldbl_compat" ${glibcxx_srcdir}/include/bits/c++config > $@ ;\
+ sed -e 's/^/#define __GLIBCXX__ /' \
+- < ${toplevel_srcdir}/gcc/DATESTAMP >> $@ ;\
++ < ${toplevel_srcdir}/gcc/DATESTAMP >> $@ ;\
+ sed -e 's/HAVE_/_GLIBCXX_HAVE_/g' \
+ -e 's/PACKAGE/_GLIBCXX_PACKAGE/g' \
+ -e 's/VERSION/_GLIBCXX_VERSION/g' \
+ -e 's/WORDS_/_GLIBCXX_WORDS_/g' \
++ -e '/[ ]_GLIBCXX_LONG_DOUBLE_COMPAT[ ]/d' \
+ < ${CONFIG_HEADER} >> $@ ;\
+ echo "#endif // _CXXCONFIG_" >>$@
+
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/include/Makefile.in gcc-41-20060515/libstdc++-v3/include/Makefile.in
+--- gcc-41-20060515.orig/libstdc++-v3/include/Makefile.in 2006-05-15 11:14:39.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/include/Makefile.in 2006-05-15 13:47:27.668389073 -0500
+@@ -1203,13 +1203,18 @@ ${host_builddir}/c++config.h: ${top_buil
+ ${glibcxx_srcdir}/include/bits/c++config \
+ stamp-${host_alias} \
+ ${toplevel_srcdir}/gcc/DATESTAMP
+- @cat ${glibcxx_srcdir}/include/bits/c++config > $@ ;\
++ @ldbl_compat='' ;\
++ grep "^[ ]*#[ ]*define[ ][ ]*_GLIBCXX_LONG_DOUBLE_COMPAT[ ][ ]*1[ ]*$$" \
++ ${CONFIG_HEADER} > /dev/null 2>&1 \
++ && ldbl_compat='s,^#undef _GLIBCXX_LONG_DOUBLE_COMPAT$$,#define _GLIBCXX_LONG_DOUBLE_COMPAT 1,' ;\
++ sed -e "$$ldbl_compat" ${glibcxx_srcdir}/include/bits/c++config > $@ ;\
+ sed -e 's/^/#define __GLIBCXX__ /' \
+- < ${toplevel_srcdir}/gcc/DATESTAMP >> $@ ;\
++ < ${toplevel_srcdir}/gcc/DATESTAMP >> $@ ;\
+ sed -e 's/HAVE_/_GLIBCXX_HAVE_/g' \
+ -e 's/PACKAGE/_GLIBCXX_PACKAGE/g' \
+ -e 's/VERSION/_GLIBCXX_VERSION/g' \
+ -e 's/WORDS_/_GLIBCXX_WORDS_/g' \
++ -e '/[ ]_GLIBCXX_LONG_DOUBLE_COMPAT[ ]/d' \
+ < ${CONFIG_HEADER} >> $@ ;\
+ echo "#endif // _CXXCONFIG_" >>$@
+
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/src/compatibility.cc gcc-41-20060515/libstdc++-v3/src/compatibility.cc
+--- gcc-41-20060515.orig/libstdc++-v3/src/compatibility.cc 2006-05-15 11:14:42.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/src/compatibility.cc 2006-05-15 13:47:27.681387073 -0500
+@@ -1,6 +1,6 @@
+ // Compatibility symbols for previous versions -*- C++ -*-
+
+-// Copyright (C) 2005
++// Copyright (C) 2005, 2006
+ // Free Software Foundation, Inc.
+ //
+ // This file is part of the GNU ISO C++ Library. This library is free
+@@ -49,6 +49,7 @@
+ #include <istream>
+ #include <fstream>
+ #include <sstream>
++#include <cmath>
+
+ namespace std
+ {
+@@ -362,6 +363,107 @@ namespace std
+
+ #endif
+
++// gcc-4.1.0
++#ifdef _GLIBCXX_LONG_DOUBLE_COMPAT
++#define _GLIBCXX_MATHL_WRAPPER(name, argdecl, args, ver) \
++extern "C" double \
++__ ## name ## l_wrapper argdecl \
++{ \
++ return name args; \
++} \
++asm (".symver __" #name "l_wrapper, " #name "l@" #ver)
++
++#define _GLIBCXX_MATHL_WRAPPER1(name, ver) \
++ _GLIBCXX_MATHL_WRAPPER (name, (double x), (x), ver)
++
++#define _GLIBCXX_MATHL_WRAPPER2(name, ver) \
++ _GLIBCXX_MATHL_WRAPPER (name, (double x, double y), (x, y), ver)
++
++#ifdef _GLIBCXX_HAVE_ACOSL
++_GLIBCXX_MATHL_WRAPPER1 (acos, GLIBCXX_3.4.3);
++#endif
++#ifdef _GLIBCXX_HAVE_ASINL
++_GLIBCXX_MATHL_WRAPPER1 (asin, GLIBCXX_3.4.3);
++#endif
++#ifdef _GLIBCXX_HAVE_ATAN2L
++_GLIBCXX_MATHL_WRAPPER2 (atan2, GLIBCXX_3.4);
++#endif
++#ifdef _GLIBCXX_HAVE_ATANL
++_GLIBCXX_MATHL_WRAPPER1 (atan, GLIBCXX_3.4.3);
++#endif
++#ifdef _GLIBCXX_HAVE_CEILL
++_GLIBCXX_MATHL_WRAPPER1 (ceil, GLIBCXX_3.4.3);
++#endif
++#ifdef _GLIBCXX_HAVE_COSHL
++_GLIBCXX_MATHL_WRAPPER1 (cosh, GLIBCXX_3.4);
++#endif
++#ifdef _GLIBCXX_HAVE_COSL
++_GLIBCXX_MATHL_WRAPPER1 (cos, GLIBCXX_3.4);
++#endif
++#ifdef _GLIBCXX_HAVE_EXPL
++_GLIBCXX_MATHL_WRAPPER1 (exp, GLIBCXX_3.4);
++#endif
++#ifdef _GLIBCXX_HAVE_FLOORL
++_GLIBCXX_MATHL_WRAPPER1 (floor, GLIBCXX_3.4.3);
++#endif
++#ifdef _GLIBCXX_HAVE_FMODL
++_GLIBCXX_MATHL_WRAPPER2 (fmod, GLIBCXX_3.4.3);
++#endif
++#ifdef _GLIBCXX_HAVE_FREXPL
++_GLIBCXX_MATHL_WRAPPER (frexp, (double x, int *y), (x, y), GLIBCXX_3.4.3);
++#endif
++#ifdef _GLIBCXX_HAVE_HYPOTL
++_GLIBCXX_MATHL_WRAPPER2 (hypot, GLIBCXX_3.4);
++#endif
++#ifdef _GLIBCXX_HAVE_LDEXPL
++_GLIBCXX_MATHL_WRAPPER (ldexp, (double x, int y), (x, y), GLIBCXX_3.4.3);
++#endif
++#ifdef _GLIBCXX_HAVE_LOG10L
++_GLIBCXX_MATHL_WRAPPER1 (log10, GLIBCXX_3.4);
++#endif
++#ifdef _GLIBCXX_HAVE_LOGL
++_GLIBCXX_MATHL_WRAPPER1 (log, GLIBCXX_3.4);
++#endif
++#ifdef _GLIBCXX_HAVE_MODFL
++_GLIBCXX_MATHL_WRAPPER (modf, (double x, double *y), (x, y), GLIBCXX_3.4.3);
++#endif
++#ifdef _GLIBCXX_HAVE_POWL
++_GLIBCXX_MATHL_WRAPPER2 (pow, GLIBCXX_3.4);
++#endif
++#ifdef _GLIBCXX_HAVE_SINHL
++_GLIBCXX_MATHL_WRAPPER1 (sinh, GLIBCXX_3.4);
++#endif
++#ifdef _GLIBCXX_HAVE_SINL
++_GLIBCXX_MATHL_WRAPPER1 (sin, GLIBCXX_3.4);
++#endif
++#ifdef _GLIBCXX_HAVE_SQRTL
++_GLIBCXX_MATHL_WRAPPER1 (sqrt, GLIBCXX_3.4);
++#endif
++#ifdef _GLIBCXX_HAVE_TANHL
++_GLIBCXX_MATHL_WRAPPER1 (tanh, GLIBCXX_3.4);
++#endif
++#ifdef _GLIBCXX_HAVE_TANL
++_GLIBCXX_MATHL_WRAPPER1 (tan, GLIBCXX_3.4);
++#endif
++#endif // _GLIBCXX_LONG_DOUBLE_COMPAT
++
++#ifdef _GLIBCXX_LONG_DOUBLE_COMPAT
++extern void *_ZTVN10__cxxabiv123__fundamental_type_infoE[];
++extern void *_ZTVN10__cxxabiv119__pointer_type_infoE[];
++extern __attribute__((used, weak)) const char _ZTSe[2] = "e";
++extern __attribute__((used, weak)) const char _ZTSPe[3] = "Pe";
++extern __attribute__((used, weak)) const char _ZTSPKe[4] = "PKe";
++extern __attribute__((used, weak)) const void *_ZTIe[2]
++ = { (void *) &_ZTVN10__cxxabiv123__fundamental_type_infoE[2],
++ (void *) _ZTSe };
++extern __attribute__((used, weak)) const void *_ZTIPe[4]
++ = { (void *) &_ZTVN10__cxxabiv119__pointer_type_infoE[2],
++ (void *) _ZTSPe, (void *) 0L, (void *) _ZTIe };
++extern __attribute__((used, weak)) const void *_ZTIPKe[4]
++ = { (void *) &_ZTVN10__cxxabiv119__pointer_type_infoE[2],
++ (void *) _ZTSPKe, (void *) 1L, (void *) _ZTIe };
++#endif // _GLIBCXX_LONG_DOUBLE_COMPAT
++
+ #ifdef __APPLE__
+ #if (defined(__ppc__) || defined (__ppc64__)) && defined (PIC)
+ /* __eprintf shouldn't have been made visible from libstdc++, or
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/src/compatibility-ldbl.cc gcc-41-20060515/libstdc++-v3/src/compatibility-ldbl.cc
+--- gcc-41-20060515.orig/libstdc++-v3/src/compatibility-ldbl.cc 1969-12-31 18:00:00.000000000 -0600
++++ gcc-41-20060515/libstdc++-v3/src/compatibility-ldbl.cc 2006-05-15 13:47:27.680387227 -0500
+@@ -0,0 +1,73 @@
++// Compatibility symbols for -mlong-double-64 compatibility -*- C++ -*-
++
++// Copyright (C) 2006
++// 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.
++
++// As a special exception, you may use this file as part of a free software
++// library without restriction. Specifically, if other files instantiate
++// templates or use macros or inline functions from this file, or you compile
++// this file and link it with other files to produce an executable, this
++// file does not by itself cause the resulting executable to be covered by
++// the GNU General Public License. This exception does not however
++// invalidate any other reasons why the executable file might be covered by
++// the GNU General Public License.
++
++#include <locale>
++
++#ifdef _GLIBCXX_LONG_DOUBLE_COMPAT
++
++#ifdef __LONG_DOUBLE_128__
++#error "compatibility-ldbl.cc must be compiled with -mlong-double-64"
++#endif
++
++namespace std
++{
++#define C char
++ template class num_get<C, istreambuf_iterator<C> >;
++ template class num_put<C, ostreambuf_iterator<C> >;
++ template class money_get<C, istreambuf_iterator<C> >;
++ template class money_put<C, ostreambuf_iterator<C> >;
++ template const num_put<C>& use_facet<num_put<C> >(const locale&);
++ template const num_get<C>& use_facet<num_get<C> >(const locale&);
++ template const money_put<C>& use_facet<money_put<C> >(const locale&);
++ template const money_get<C>& use_facet<money_get<C> >(const locale&);
++ template bool has_facet<num_put<C> >(const locale&);
++ template bool has_facet<num_get<C> >(const locale&);
++ template bool has_facet<money_put<C> >(const locale&);
++ template bool has_facet<money_get<C> >(const locale&);
++#undef C
++#ifdef _GLIBCXX_USE_WCHAR_T
++#define C wchar_t
++ template class num_get<C, istreambuf_iterator<C> >;
++ template class num_put<C, ostreambuf_iterator<C> >;
++ template class money_get<C, istreambuf_iterator<C> >;
++ template class money_put<C, ostreambuf_iterator<C> >;
++ template const num_put<C>& use_facet<num_put<C> >(const locale&);
++ template const num_get<C>& use_facet<num_get<C> >(const locale&);
++ template const money_put<C>& use_facet<money_put<C> >(const locale&);
++ template const money_get<C>& use_facet<money_get<C> >(const locale&);
++ template bool has_facet<num_put<C> >(const locale&);
++ template bool has_facet<num_get<C> >(const locale&);
++ template bool has_facet<money_put<C> >(const locale&);
++ template bool has_facet<money_get<C> >(const locale&);
++#undef C
++#endif
++}
++
++#endif
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/src/complex_io.cc gcc-41-20060515/libstdc++-v3/src/complex_io.cc
+--- gcc-41-20060515.orig/libstdc++-v3/src/complex_io.cc 2006-05-15 11:14:42.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/src/complex_io.cc 2006-05-15 13:47:27.681387073 -0500
+@@ -1,6 +1,6 @@
+ // The template and inlines for the -*- C++ -*- complex number classes.
+
+-// Copyright (C) 2000, 2001 Free Software Foundation, Inc.
++// Copyright (C) 2000, 2001, 2006 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
+@@ -91,3 +91,20 @@ namespace std
+ const complex<long double>&);
+ #endif //_GLIBCXX_USE_WCHAR_T
+ } // namespace std
++
++// XXX GLIBCXX_ABI Deprecated
++#ifdef _GLIBCXX_LONG_DOUBLE_COMPAT
++
++#define _GLIBCXX_LDBL_COMPAT(dbl, ldbl) \
++ extern "C" void ldbl (void) __attribute__ ((alias (#dbl), weak))
++
++_GLIBCXX_LDBL_COMPAT (_ZStlsIdcSt11char_traitsIcEERSt13basic_ostreamIT0_T1_ES6_RKSt7complexIT_E,
++ _ZStlsIecSt11char_traitsIcEERSt13basic_ostreamIT0_T1_ES6_RKSt7complexIT_E);
++_GLIBCXX_LDBL_COMPAT (_ZStlsIdwSt11char_traitsIwEERSt13basic_ostreamIT0_T1_ES6_RKSt7complexIT_E,
++ _ZStlsIewSt11char_traitsIwEERSt13basic_ostreamIT0_T1_ES6_RKSt7complexIT_E);
++_GLIBCXX_LDBL_COMPAT (_ZStrsIdcSt11char_traitsIcEERSt13basic_istreamIT0_T1_ES6_RSt7complexIT_E,
++ _ZStrsIecSt11char_traitsIcEERSt13basic_istreamIT0_T1_ES6_RSt7complexIT_E);
++_GLIBCXX_LDBL_COMPAT (_ZStrsIdwSt11char_traitsIwEERSt13basic_istreamIT0_T1_ES6_RSt7complexIT_E,
++ _ZStrsIewSt11char_traitsIwEERSt13basic_istreamIT0_T1_ES6_RSt7complexIT_E);
++
++#endif // _GLIBCXX_LONG_DOUBLE_COMPAT
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/src/istream-inst.cc gcc-41-20060515/libstdc++-v3/src/istream-inst.cc
+--- gcc-41-20060515.orig/libstdc++-v3/src/istream-inst.cc 2006-05-15 11:14:42.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/src/istream-inst.cc 2006-05-15 13:47:27.682386919 -0500
+@@ -1,6 +1,6 @@
+ // Explicit instantiation file.
+
+-// Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002
++// Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2006
+ // Free Software Foundation, Inc.
+ //
+ // This file is part of the GNU ISO C++ Library. This library is free
+@@ -68,3 +68,19 @@ namespace std
+ template wistream& operator>>(wistream&, _Setw);
+ #endif
+ } // namespace std
++
++// XXX GLIBCXX_ABI Deprecated
++#ifdef _GLIBCXX_LONG_DOUBLE_COMPAT
++
++#define _GLIBCXX_LDBL_COMPAT(dbl, ldbl) \
++ extern "C" void ldbl (void) __attribute__ ((alias (#dbl), weak))
++_GLIBCXX_LDBL_COMPAT (_ZNSirsERd, _ZNSirsERe);
++_GLIBCXX_LDBL_COMPAT (_ZNSt13basic_istreamIwSt11char_traitsIwEErsERd,
++ _ZNSt13basic_istreamIwSt11char_traitsIwEErsERe);
++// These 2 are in GCC 4.2+ only so far
++// _GLIBCXX_LDBL_COMPAT (_ZNSi10_M_extractIdEERSiRT_,
++// _ZNSi10_M_extractIeEERSiRT_);
++// _GLIBCXX_LDBL_COMPAT (_ZNSt13basic_istreamIwSt11char_traitsIwEE10_M_extractIdEERS2_RT_,
++// _ZNSt13basic_istreamIwSt11char_traitsIwEE10_M_extractIeEERS2_RT_);
++
++#endif // _GLIBCXX_LONG_DOUBLE_COMPAT
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/src/limits.cc gcc-41-20060515/libstdc++-v3/src/limits.cc
+--- gcc-41-20060515.orig/libstdc++-v3/src/limits.cc 2006-05-15 11:14:42.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/src/limits.cc 2006-05-15 13:47:27.683386765 -0500
+@@ -1,6 +1,6 @@
+ // Static data members of -*- C++ -*- numeric_limits classes
+
+-// Copyright (C) 1999, 2001, 2002 Free Software Foundation, Inc.
++// Copyright (C) 1999, 2001, 2002, 2006 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
+@@ -447,3 +447,34 @@ namespace std
+ const bool numeric_limits<long double>::tinyness_before;
+ const float_round_style numeric_limits<long double>::round_style;
+ } // namespace std
++
++// XXX GLIBCXX_ABI Deprecated
++#ifdef _GLIBCXX_LONG_DOUBLE_COMPAT
++
++#define _GLIBCXX_NUM_LIM_COMPAT(type, member, len) \
++ extern "C" type _ZNSt14numeric_limitsIeE ## len ## member ## E \
++ __attribute__ ((alias ("_ZNSt14numeric_limitsIdE" #len #member "E")))
++_GLIBCXX_NUM_LIM_COMPAT (bool, is_specialized, 14);
++_GLIBCXX_NUM_LIM_COMPAT (int, digits, 6);
++_GLIBCXX_NUM_LIM_COMPAT (int, digits10, 8);
++_GLIBCXX_NUM_LIM_COMPAT (bool, is_signed, 9);
++_GLIBCXX_NUM_LIM_COMPAT (bool, is_integer, 10);
++_GLIBCXX_NUM_LIM_COMPAT (bool, is_exact, 8);
++_GLIBCXX_NUM_LIM_COMPAT (int, radix, 5);
++_GLIBCXX_NUM_LIM_COMPAT (int, min_exponent, 12);
++_GLIBCXX_NUM_LIM_COMPAT (int, min_exponent10, 14);
++_GLIBCXX_NUM_LIM_COMPAT (int, max_exponent, 12);
++_GLIBCXX_NUM_LIM_COMPAT (int, max_exponent10, 14);
++_GLIBCXX_NUM_LIM_COMPAT (bool, has_infinity, 12);
++_GLIBCXX_NUM_LIM_COMPAT (bool, has_quiet_NaN, 13);
++_GLIBCXX_NUM_LIM_COMPAT (bool, has_signaling_NaN, 17);
++_GLIBCXX_NUM_LIM_COMPAT (std::float_denorm_style, has_denorm, 10);
++_GLIBCXX_NUM_LIM_COMPAT (bool, has_denorm_loss, 15);
++_GLIBCXX_NUM_LIM_COMPAT (bool, is_iec559, 9);
++_GLIBCXX_NUM_LIM_COMPAT (bool, is_bounded, 10);
++_GLIBCXX_NUM_LIM_COMPAT (bool, is_modulo, 9);
++_GLIBCXX_NUM_LIM_COMPAT (bool, traps, 5);
++_GLIBCXX_NUM_LIM_COMPAT (bool, tinyness_before, 15);
++_GLIBCXX_NUM_LIM_COMPAT (std::float_round_style, round_style, 11);
++
++#endif // _GLIBCXX_LONG_DOUBLE_COMPAT
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/src/locale.cc gcc-41-20060515/libstdc++-v3/src/locale.cc
+--- gcc-41-20060515.orig/libstdc++-v3/src/locale.cc 2006-05-15 11:14:42.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/src/locale.cc 2006-05-15 14:06:44.932155273 -0500
+@@ -41,6 +41,21 @@ namespace __gnu_internal
+ static __glibcxx_mutex_define_initialized(locale_cache_mutex);
+ }
+
++// XXX GLIBCXX_ABI Deprecated
++#ifdef _GLIBCXX_LONG_DOUBLE_COMPAT
++# define _GLIBCXX_LOC_ID(mangled) extern std::locale::id mangled
++_GLIBCXX_LOC_ID (_ZNSt7num_getIcSt19istreambuf_iteratorIcSt11char_traitsIcEEE2idE);
++_GLIBCXX_LOC_ID (_ZNSt7num_putIcSt19ostreambuf_iteratorIcSt11char_traitsIcEEE2idE);
++_GLIBCXX_LOC_ID (_ZNSt9money_getIcSt19istreambuf_iteratorIcSt11char_traitsIcEEE2idE);
++_GLIBCXX_LOC_ID (_ZNSt9money_putIcSt19ostreambuf_iteratorIcSt11char_traitsIcEEE2idE);
++# ifdef _GLIBCXX_USE_WCHAR_T
++_GLIBCXX_LOC_ID (_ZNSt7num_getIwSt19istreambuf_iteratorIwSt11char_traitsIwEEE2idE);
++_GLIBCXX_LOC_ID (_ZNSt7num_putIwSt19ostreambuf_iteratorIwSt11char_traitsIwEEE2idE);
++_GLIBCXX_LOC_ID (_ZNSt9money_getIwSt19istreambuf_iteratorIwSt11char_traitsIwEEE2idE);
++_GLIBCXX_LOC_ID (_ZNSt9money_putIwSt19ostreambuf_iteratorIwSt11char_traitsIwEEE2idE);
++# endif
++#endif
++
+ namespace std
+ {
+ // Definitions for static const data members of locale.
+@@ -397,9 +412,29 @@ namespace std
+ locale::id::_M_id() const
+ {
+ if (!_M_index)
+- _M_index = 1 + __gnu_cxx::__exchange_and_add(&_S_refcount, 1);
++ {
++ // XXX GLIBCXX_ABI Deprecated
++#ifdef _GLIBCXX_LONG_DOUBLE_COMPAT
++ locale::id *f = 0;
++# define _GLIBCXX_SYNC_ID(facet, mangled) \
++ if (this == &::mangled) \
++ f = &facet::id
++ _GLIBCXX_SYNC_ID (num_get<char>, _ZNSt7num_getIcSt19istreambuf_iteratorIcSt11char_traitsIcEEE2idE);
++ _GLIBCXX_SYNC_ID (num_put<char>, _ZNSt7num_putIcSt19ostreambuf_iteratorIcSt11char_traitsIcEEE2idE);
++ _GLIBCXX_SYNC_ID (money_get<char>, _ZNSt9money_getIcSt19istreambuf_iteratorIcSt11char_traitsIcEEE2idE);
++ _GLIBCXX_SYNC_ID (money_put<char>, _ZNSt9money_putIcSt19ostreambuf_iteratorIcSt11char_traitsIcEEE2idE);
++# ifdef _GLIBCXX_USE_WCHAR_T
++ _GLIBCXX_SYNC_ID (num_get<wchar_t>, _ZNSt7num_getIwSt19istreambuf_iteratorIwSt11char_traitsIwEEE2idE);
++ _GLIBCXX_SYNC_ID (num_put<wchar_t>, _ZNSt7num_putIwSt19ostreambuf_iteratorIwSt11char_traitsIwEEE2idE);
++ _GLIBCXX_SYNC_ID (money_get<wchar_t>, _ZNSt9money_getIwSt19istreambuf_iteratorIwSt11char_traitsIwEEE2idE);
++ _GLIBCXX_SYNC_ID (money_put<wchar_t>, _ZNSt9money_putIwSt19ostreambuf_iteratorIwSt11char_traitsIwEEE2idE);
++# endif
++ if (f)
++ _M_index = 1 + f->_M_id();
++ else
++#endif
++ _M_index = 1 + __gnu_cxx::__exchange_and_add(&_S_refcount, 1);
++ }
+ return _M_index - 1;
+ }
+ } // namespace std
+-
+-
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/src/locale-inst.cc gcc-41-20060515/libstdc++-v3/src/locale-inst.cc
+--- gcc-41-20060515.orig/libstdc++-v3/src/locale-inst.cc 2006-05-15 11:14:42.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/src/locale-inst.cc 2006-05-15 13:47:27.684386611 -0500
+@@ -1,6 +1,6 @@
+ // Locale support -*- C++ -*-
+
+-// Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004
++// Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2006
+ // Free Software Foundation, Inc.
+ //
+ // This file is part of the GNU ISO C++ Library. This library is free
+@@ -37,6 +37,7 @@
+ // Instantiation configuration.
+ #ifndef C
+ # define C char
++# define C_is_char
+ #endif
+
+ namespace std
+@@ -48,6 +49,7 @@ namespace std
+ template struct __moneypunct_cache<C, true>;
+ template class moneypunct_byname<C, false>;
+ template class moneypunct_byname<C, true>;
++_GLIBCXX_BEGIN_LDBL_NAMESPACE
+ template class money_get<C, istreambuf_iterator<C> >;
+ template class money_put<C, ostreambuf_iterator<C> >;
+ template
+@@ -73,11 +75,13 @@ namespace std
+ money_put<C, ostreambuf_iterator<C> >::
+ _M_insert<false>(ostreambuf_iterator<C>, ios_base&, C,
+ const string_type&) const;
++_GLIBCXX_END_LDBL_NAMESPACE
+
+ // numpunct, numpunct_byname, num_get, and num_put
+ template class numpunct<C>;
+ template struct __numpunct_cache<C>;
+ template class numpunct_byname<C>;
++_GLIBCXX_BEGIN_LDBL_NAMESPACE
+ template class num_get<C, istreambuf_iterator<C> >;
+ template class num_put<C, ostreambuf_iterator<C> >;
+ template
+@@ -161,7 +165,8 @@ namespace std
+ num_put<C, ostreambuf_iterator<C> >::
+ _M_insert_float(ostreambuf_iterator<C>, ios_base&, C, char,
+ long double) const;
+-
++_GLIBCXX_END_LDBL_NAMESPACE
++
+ // time_get and time_put
+ template class __timepunct<C>;
+ template struct __timepunct_cache<C>;
+@@ -314,3 +319,44 @@ namespace std
+ ios_base::fmtflags, bool);
+ #endif
+ } // namespace std
++
++// XXX GLIBCXX_ABI Deprecated
++#if defined _GLIBCXX_LONG_DOUBLE_COMPAT && defined C_is_char
++
++#define _GLIBCXX_LDBL_COMPAT(dbl, ldbl) \
++ extern "C" void ldbl (void) __attribute__ ((alias (#dbl), weak))
++
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_getIcSt19istreambuf_iteratorIcSt11char_traitsIcEEE14_M_extract_intIjEES4_S4_S4_RSt8ios_baseRSt12_Ios_IostateRT_,
++ _ZNKSt7num_getIcSt19istreambuf_iteratorIcSt11char_traitsIcEEE14_M_extract_intIjEES3_S3_S3_RSt8ios_baseRSt12_Ios_IostateRT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_getIcSt19istreambuf_iteratorIcSt11char_traitsIcEEE14_M_extract_intIlEES4_S4_S4_RSt8ios_baseRSt12_Ios_IostateRT_,
++ _ZNKSt7num_getIcSt19istreambuf_iteratorIcSt11char_traitsIcEEE14_M_extract_intIlEES3_S3_S3_RSt8ios_baseRSt12_Ios_IostateRT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_getIcSt19istreambuf_iteratorIcSt11char_traitsIcEEE14_M_extract_intImEES4_S4_S4_RSt8ios_baseRSt12_Ios_IostateRT_,
++ _ZNKSt7num_getIcSt19istreambuf_iteratorIcSt11char_traitsIcEEE14_M_extract_intImEES3_S3_S3_RSt8ios_baseRSt12_Ios_IostateRT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_getIcSt19istreambuf_iteratorIcSt11char_traitsIcEEE14_M_extract_intItEES4_S4_S4_RSt8ios_baseRSt12_Ios_IostateRT_,
++ _ZNKSt7num_getIcSt19istreambuf_iteratorIcSt11char_traitsIcEEE14_M_extract_intItEES3_S3_S3_RSt8ios_baseRSt12_Ios_IostateRT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_getIcSt19istreambuf_iteratorIcSt11char_traitsIcEEE14_M_extract_intIxEES4_S4_S4_RSt8ios_baseRSt12_Ios_IostateRT_,
++ _ZNKSt7num_getIcSt19istreambuf_iteratorIcSt11char_traitsIcEEE14_M_extract_intIxEES3_S3_S3_RSt8ios_baseRSt12_Ios_IostateRT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_getIcSt19istreambuf_iteratorIcSt11char_traitsIcEEE14_M_extract_intIyEES4_S4_S4_RSt8ios_baseRSt12_Ios_IostateRT_,
++ _ZNKSt7num_getIcSt19istreambuf_iteratorIcSt11char_traitsIcEEE14_M_extract_intIyEES3_S3_S3_RSt8ios_baseRSt12_Ios_IostateRT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_putIcSt19ostreambuf_iteratorIcSt11char_traitsIcEEE13_M_insert_intIlEES4_S4_RSt8ios_basecT_,
++ _ZNKSt7num_putIcSt19ostreambuf_iteratorIcSt11char_traitsIcEEE13_M_insert_intIlEES3_S3_RSt8ios_basecT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_putIcSt19ostreambuf_iteratorIcSt11char_traitsIcEEE13_M_insert_intImEES4_S4_RSt8ios_basecT_,
++ _ZNKSt7num_putIcSt19ostreambuf_iteratorIcSt11char_traitsIcEEE13_M_insert_intImEES3_S3_RSt8ios_basecT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_putIcSt19ostreambuf_iteratorIcSt11char_traitsIcEEE13_M_insert_intIxEES4_S4_RSt8ios_basecT_,
++ _ZNKSt7num_putIcSt19ostreambuf_iteratorIcSt11char_traitsIcEEE13_M_insert_intIxEES3_S3_RSt8ios_basecT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_putIcSt19ostreambuf_iteratorIcSt11char_traitsIcEEE13_M_insert_intIyEES4_S4_RSt8ios_basecT_,
++ _ZNKSt7num_putIcSt19ostreambuf_iteratorIcSt11char_traitsIcEEE13_M_insert_intIyEES3_S3_RSt8ios_basecT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_putIcSt19ostreambuf_iteratorIcSt11char_traitsIcEEE15_M_insert_floatIdEES4_S4_RSt8ios_baseccT_,
++ _ZNKSt7num_putIcSt19ostreambuf_iteratorIcSt11char_traitsIcEEE15_M_insert_floatIdEES3_S3_RSt8ios_baseccT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt7num_putIcSt19ostreambuf_iteratorIcSt11char_traitsIcEEE15_M_insert_floatIdEES3_S3_RSt8ios_baseccT_,
++ _ZNKSt7num_putIcSt19ostreambuf_iteratorIcSt11char_traitsIcEEE15_M_insert_floatIeEES3_S3_RSt8ios_baseccT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1289money_getIcSt19istreambuf_iteratorIcSt11char_traitsIcEEE10_M_extractILb0EEES4_S4_S4_RSt8ios_baseRSt12_Ios_IostateRSs,
++ _ZNKSt9money_getIcSt19istreambuf_iteratorIcSt11char_traitsIcEEE10_M_extractILb0EEES3_S3_S3_RSt8ios_baseRSt12_Ios_IostateRSs);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1289money_getIcSt19istreambuf_iteratorIcSt11char_traitsIcEEE10_M_extractILb1EEES4_S4_S4_RSt8ios_baseRSt12_Ios_IostateRSs,
++ _ZNKSt9money_getIcSt19istreambuf_iteratorIcSt11char_traitsIcEEE10_M_extractILb1EEES3_S3_S3_RSt8ios_baseRSt12_Ios_IostateRSs);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1289money_putIcSt19ostreambuf_iteratorIcSt11char_traitsIcEEE9_M_insertILb0EEES4_S4_RSt8ios_basecRKSs,
++ _ZNKSt9money_putIcSt19ostreambuf_iteratorIcSt11char_traitsIcEEE9_M_insertILb0EEES3_S3_RSt8ios_basecRKSs);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1289money_putIcSt19ostreambuf_iteratorIcSt11char_traitsIcEEE9_M_insertILb1EEES4_S4_RSt8ios_basecRKSs,
++ _ZNKSt9money_putIcSt19ostreambuf_iteratorIcSt11char_traitsIcEEE9_M_insertILb1EEES3_S3_RSt8ios_basecRKSs);
++
++#endif // _GLIBCXX_LONG_DOUBLE_COMPAT
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/src/locale-misc-inst.cc gcc-41-20060515/libstdc++-v3/src/locale-misc-inst.cc
+--- gcc-41-20060515.orig/libstdc++-v3/src/locale-misc-inst.cc 2006-05-15 11:14:42.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/src/locale-misc-inst.cc 2006-05-15 13:47:27.685386457 -0500
+@@ -1,6 +1,7 @@
+ // Locale support -*- C++ -*-
+
+-// Copyright (C) 1999, 2000, 2001, 2002, 2003 Free Software Foundation, Inc.
++// Copyright (C) 1999, 2000, 2001, 2002, 2003, 2006
++// 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
+@@ -45,3 +46,19 @@ namespace std
+ __convert_from_v(char*, const int, const char*, long double,
+ const __c_locale&, int);
+ } // namespace std
++
++// XXX GLIBCXX_ABI Deprecated
++#if defined _GLIBCXX_LONG_DOUBLE_COMPAT
++
++#define _GLIBCXX_LDBL_COMPAT(dbl, ldbl) \
++ extern "C" void ldbl (void) __attribute__ ((alias (#dbl), weak))
++
++# if _GLIBCXX_C_LOCALE_GNU
++_GLIBCXX_LDBL_COMPAT(_ZSt16__convert_from_vIdEiPciPKcT_RKP15__locale_structi,
++ _ZSt16__convert_from_vIeEiPciPKcT_RKP15__locale_structi);
++# else
++_GLIBCXX_LDBL_COMPAT(_ZSt16__convert_from_vIdEiPciPKcT_RKPii,
++ _ZSt16__convert_from_vIeEiPciPKcT_RKPii);
++# endif
++
++#endif // _GLIBCXX_LONG_DOUBLE_COMPAT
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/src/Makefile.am gcc-41-20060515/libstdc++-v3/src/Makefile.am
+--- gcc-41-20060515.orig/libstdc++-v3/src/Makefile.am 2006-05-15 11:14:42.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/src/Makefile.am 2006-05-15 13:47:27.677387688 -0500
+@@ -35,10 +35,15 @@ libstdc++-symbol.ver: ${glibcxx_srcdir}
+ $(port_specific_symbol_files)
+ cp ${glibcxx_srcdir}/$(SYMVER_MAP) ./libstdc++-symbol.ver
+ if test "x$(port_specific_symbol_files)" != x; then \
+- sed -n '1,/DO NOT DELETE/p' $@ > tmp.top; \
+- sed -n '/DO NOT DELETE/,$$p' $@ > tmp.bottom; \
+- cat tmp.top $(port_specific_symbol_files) tmp.bottom > $@; \
+- rm tmp.top tmp.bottom; \
++ if grep '^# Appended to version file.' \
++ $(port_specific_symbol_files) /dev/null > /dev/null 2>&1; then \
++ cat $(port_specific_symbol_files) >> $@; \
++ else \
++ sed -n '1,/DO NOT DELETE/p' $@ > tmp.top; \
++ sed -n '/DO NOT DELETE/,$$p' $@ > tmp.bottom; \
++ cat tmp.top $(port_specific_symbol_files) tmp.bottom > $@; \
++ rm tmp.top tmp.bottom; \
++ fi; \
+ fi
+
+ if ENABLE_SYMVERS_GNU
+@@ -113,6 +118,12 @@ c++locale.cc: ${glibcxx_srcdir}/$(CLOCAL
+ basic_file.cc: ${glibcxx_srcdir}/$(BASIC_FILE_CC)
+ $(LN_S) ${glibcxx_srcdir}/$(BASIC_FILE_CC) ./$@ || true
+
++if GLIBCXX_LDBL_COMPAT
++ldbl_compat_sources = compatibility-ldbl.cc
++else
++ldbl_compat_sources =
++endif
++
+ # Sources present in the src directory.
+ sources = \
+ bitmap_allocator.cc \
+@@ -160,7 +171,8 @@ sources = \
+ wlocale-inst.cc \
+ wstring-inst.cc \
+ ${host_sources} \
+- ${host_sources_extra}
++ ${host_sources_extra} \
++ ${ldbl_compat_sources}
+
+ VPATH = $(top_srcdir)/src:$(top_srcdir)
+
+@@ -191,6 +203,15 @@ concept-inst.lo: concept-inst.cc
+ concept-inst.o: concept-inst.cc
+ $(CXXCOMPILE) -D_GLIBCXX_CONCEPT_CHECKS -fimplicit-templates -c $<
+
++if GLIBCXX_LDBL_COMPAT
++# Use special rules for compatibility-ldbl.cc compilation, as we need to
++# pass -mlong-double-64.
++compatibility-ldbl.lo: compatibility-ldbl.cc
++ $(LTCXXCOMPILE) -mlong-double-64 -c $<
++compatibility-ldbl.o: compatibility-ldbl.cc
++ $(CXXCOMPILE) -mlong-double-64 -c $<
++endif
++
+ # AM_CXXFLAGS needs to be in each subdirectory so that it can be
+ # modified in a per-library or per-sub-library way. Need to manually
+ # set this option because CONFIG_CXXFLAGS has to be after
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/src/Makefile.in gcc-41-20060515/libstdc++-v3/src/Makefile.in
+--- gcc-41-20060515.orig/libstdc++-v3/src/Makefile.in 2006-05-15 11:14:42.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/src/Makefile.in 2006-05-15 13:47:27.679387380 -0500
+@@ -59,11 +59,27 @@ am__strip_dir = `echo $$p | sed -e 's|^.
+ am__installdirs = "$(DESTDIR)$(toolexeclibdir)"
+ toolexeclibLTLIBRARIES_INSTALL = $(INSTALL)
+ LTLIBRARIES = $(toolexeclib_LTLIBRARIES)
++am__libstdc___la_SOURCES_DIST = bitmap_allocator.cc pool_allocator.cc \
++ mt_allocator.cc codecvt.cc compatibility.cc complex_io.cc \
++ ctype.cc debug.cc debug_list.cc functexcept.cc \
++ globals_locale.cc globals_io.cc ios.cc ios_failure.cc \
++ ios_init.cc ios_locale.cc limits.cc list.cc locale.cc \
++ locale_init.cc locale_facets.cc localename.cc stdexcept.cc \
++ strstream.cc tree.cc allocator-inst.cc concept-inst.cc \
++ fstream-inst.cc ext-inst.cc ios-inst.cc iostream-inst.cc \
++ istream-inst.cc istream.cc locale-inst.cc locale-misc-inst.cc \
++ misc-inst.cc ostream-inst.cc sstream-inst.cc streambuf-inst.cc \
++ streambuf.cc string-inst.cc valarray-inst.cc wlocale-inst.cc \
++ wstring-inst.cc atomicity.cc codecvt_members.cc \
++ collate_members.cc ctype_members.cc messages_members.cc \
++ monetary_members.cc numeric_members.cc time_members.cc \
++ basic_file.cc c++locale.cc compatibility-ldbl.cc
+ am__objects_1 = atomicity.lo codecvt_members.lo collate_members.lo \
+ ctype_members.lo messages_members.lo monetary_members.lo \
+ numeric_members.lo time_members.lo
+ am__objects_2 = basic_file.lo c++locale.lo
+-am__objects_3 = bitmap_allocator.lo pool_allocator.lo mt_allocator.lo \
++@GLIBCXX_LDBL_COMPAT_TRUE@am__objects_3 = compatibility-ldbl.lo
++am__objects_4 = bitmap_allocator.lo pool_allocator.lo mt_allocator.lo \
+ codecvt.lo compatibility.lo complex_io.lo ctype.lo debug.lo \
+ debug_list.lo functexcept.lo globals_locale.lo globals_io.lo \
+ ios.lo ios_failure.lo ios_init.lo ios_locale.lo limits.lo \
+@@ -74,8 +90,9 @@ am__objects_3 = bitmap_allocator.lo pool
+ locale-inst.lo locale-misc-inst.lo misc-inst.lo \
+ ostream-inst.lo sstream-inst.lo streambuf-inst.lo streambuf.lo \
+ string-inst.lo valarray-inst.lo wlocale-inst.lo \
+- wstring-inst.lo $(am__objects_1) $(am__objects_2)
+-am_libstdc___la_OBJECTS = $(am__objects_3)
++ wstring-inst.lo $(am__objects_1) $(am__objects_2) \
++ $(am__objects_3)
++am_libstdc___la_OBJECTS = $(am__objects_4)
+ libstdc___la_OBJECTS = $(am_libstdc___la_OBJECTS)
+ DEFAULT_INCLUDES = -I. -I$(srcdir) -I$(top_builddir)
+ depcomp =
+@@ -84,7 +101,7 @@ CXXCOMPILE = $(CXX) $(DEFS) $(DEFAULT_IN
+ $(AM_CPPFLAGS) $(CPPFLAGS) $(AM_CXXFLAGS) $(CXXFLAGS)
+ CXXLD = $(CXX)
+ SOURCES = $(libstdc___la_SOURCES)
+-DIST_SOURCES = $(libstdc___la_SOURCES)
++DIST_SOURCES = $(am__libstdc___la_SOURCES_DIST)
+ ETAGS = etags
+ CTAGS = ctags
+ DISTFILES = $(DIST_COMMON) $(DIST_SOURCES) $(TEXINFOS) $(EXTRA_DIST)
+@@ -152,6 +169,8 @@ GLIBCXX_C_HEADERS_C_TRUE = @GLIBCXX_C_HE
+ GLIBCXX_HOSTED_FALSE = @GLIBCXX_HOSTED_FALSE@
+ GLIBCXX_HOSTED_TRUE = @GLIBCXX_HOSTED_TRUE@
+ GLIBCXX_INCLUDES = @GLIBCXX_INCLUDES@
++GLIBCXX_LDBL_COMPAT_FALSE = @GLIBCXX_LDBL_COMPAT_FALSE@
++GLIBCXX_LDBL_COMPAT_TRUE = @GLIBCXX_LDBL_COMPAT_TRUE@
+ INSTALL_DATA = @INSTALL_DATA@
+ INSTALL_PROGRAM = @INSTALL_PROGRAM@
+ INSTALL_SCRIPT = @INSTALL_SCRIPT@
+@@ -302,6 +321,8 @@ host_sources_extra = \
+ basic_file.cc \
+ c++locale.cc
+
++@GLIBCXX_LDBL_COMPAT_FALSE@ldbl_compat_sources =
++@GLIBCXX_LDBL_COMPAT_TRUE@ldbl_compat_sources = compatibility-ldbl.cc
+
+ # Sources present in the src directory.
+ sources = \
+@@ -350,7 +371,8 @@ sources = \
+ wlocale-inst.cc \
+ wstring-inst.cc \
+ ${host_sources} \
+- ${host_sources_extra}
++ ${host_sources_extra} \
++ ${ldbl_compat_sources}
+
+ libstdc___la_SOURCES = $(sources)
+ libstdc___la_LIBADD = \
+@@ -677,10 +699,15 @@ libstdc++-symbol.ver: ${glibcxx_srcdir}
+ $(port_specific_symbol_files)
+ cp ${glibcxx_srcdir}/$(SYMVER_MAP) ./libstdc++-symbol.ver
+ if test "x$(port_specific_symbol_files)" != x; then \
+- sed -n '1,/DO NOT DELETE/p' $@ > tmp.top; \
+- sed -n '/DO NOT DELETE/,$$p' $@ > tmp.bottom; \
+- cat tmp.top $(port_specific_symbol_files) tmp.bottom > $@; \
+- rm tmp.top tmp.bottom; \
++ if grep '^# Appended to version file.' \
++ $(port_specific_symbol_files) /dev/null > /dev/null 2>&1; then \
++ cat $(port_specific_symbol_files) >> $@; \
++ else \
++ sed -n '1,/DO NOT DELETE/p' $@ > tmp.top; \
++ sed -n '/DO NOT DELETE/,$$p' $@ > tmp.bottom; \
++ cat tmp.top $(port_specific_symbol_files) tmp.bottom > $@; \
++ rm tmp.top tmp.bottom; \
++ fi; \
+ fi
+ @ENABLE_SYMVERS_DARWIN_EXPORT_TRUE@@ENABLE_SYMVERS_GNU_FALSE@libstdc++-symbol.explist : libstdc++-symbol.ver \
+ @ENABLE_SYMVERS_DARWIN_EXPORT_TRUE@@ENABLE_SYMVERS_GNU_FALSE@ ${glibcxx_srcdir}/scripts/make_exports.pl \
+@@ -733,6 +760,13 @@ concept-inst.lo: concept-inst.cc
+ concept-inst.o: concept-inst.cc
+ $(CXXCOMPILE) -D_GLIBCXX_CONCEPT_CHECKS -fimplicit-templates -c $<
+
++# Use special rules for compatibility-ldbl.cc compilation, as we need to
++# pass -mlong-double-64.
++@GLIBCXX_LDBL_COMPAT_TRUE@compatibility-ldbl.lo: compatibility-ldbl.cc
++@GLIBCXX_LDBL_COMPAT_TRUE@ $(LTCXXCOMPILE) -mlong-double-64 -c $<
++@GLIBCXX_LDBL_COMPAT_TRUE@compatibility-ldbl.o: compatibility-ldbl.cc
++@GLIBCXX_LDBL_COMPAT_TRUE@ $(CXXCOMPILE) -mlong-double-64 -c $<
++
+ # Added bits to build debug library.
+ @GLIBCXX_BUILD_DEBUG_TRUE@all-local: build_debug
+ @GLIBCXX_BUILD_DEBUG_TRUE@install-data-local: install_debug
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/src/ostream-inst.cc gcc-41-20060515/libstdc++-v3/src/ostream-inst.cc
+--- gcc-41-20060515.orig/libstdc++-v3/src/ostream-inst.cc 2006-05-15 11:14:42.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/src/ostream-inst.cc 2006-05-15 13:47:27.685386457 -0500
+@@ -1,6 +1,6 @@
+ // Explicit instantiation file.
+
+-// Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002
++// Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2006
+ // Free Software Foundation, Inc.
+ //
+ // This file is part of the GNU ISO C++ Library. This library is free
+@@ -74,3 +74,19 @@ namespace std
+ template wostream& operator<<(wostream&, _Setw);
+ #endif
+ } // namespace std
++
++// XXX GLIBCXX_ABI Deprecated
++#ifdef _GLIBCXX_LONG_DOUBLE_COMPAT
++
++#define _GLIBCXX_LDBL_COMPAT(dbl, ldbl) \
++ extern "C" void ldbl (void) __attribute__ ((alias (#dbl), weak))
++_GLIBCXX_LDBL_COMPAT (_ZNSolsEd, _ZNSolsEe);
++_GLIBCXX_LDBL_COMPAT (_ZNSt13basic_ostreamIwSt11char_traitsIwEElsEd,
++ _ZNSt13basic_ostreamIwSt11char_traitsIwEElsEe);
++// These 2 are in GCC 4.2+ only so far
++// _GLIBCXX_LDBL_COMPAT (_ZNSo9_M_insertIdEERSoT_,
++// _ZNSo9_M_insertIeEERSoT_);
++// _GLIBCXX_LDBL_COMPAT (_ZNSt13basic_ostreamIwSt11char_traitsIwEE9_M_insertIdEERS2_T_,
++// _ZNSt13basic_ostreamIwSt11char_traitsIwEE9_M_insertIeEERS2_T_);
++
++#endif // _GLIBCXX_LONG_DOUBLE_COMPAT
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/src/wlocale-inst.cc gcc-41-20060515/libstdc++-v3/src/wlocale-inst.cc
+--- gcc-41-20060515.orig/libstdc++-v3/src/wlocale-inst.cc 2006-05-15 11:14:42.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/src/wlocale-inst.cc 2006-05-15 13:47:27.686386303 -0500
+@@ -1,6 +1,7 @@
+ // Locale support -*- C++ -*-
+
+-// Copyright (C) 1999, 2000, 2001, 2002, 2003 Free Software Foundation, Inc.
++// Copyright (C) 1999, 2000, 2001, 2002, 2003, 2006
++// 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
+@@ -36,4 +37,45 @@
+ #ifdef _GLIBCXX_USE_WCHAR_T
+ #define C wchar_t
+ #include "locale-inst.cc"
++
++// XXX GLIBCXX_ABI Deprecated
++#if defined _GLIBCXX_LONG_DOUBLE_COMPAT
++
++#define _GLIBCXX_LDBL_COMPAT(dbl, ldbl) \
++ extern "C" void ldbl (void) __attribute__ ((alias (#dbl), weak))
++
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_getIwSt19istreambuf_iteratorIwSt11char_traitsIwEEE14_M_extract_intIjEES4_S4_S4_RSt8ios_baseRSt12_Ios_IostateRT_,
++ _ZNKSt7num_getIwSt19istreambuf_iteratorIwSt11char_traitsIwEEE14_M_extract_intIjEES3_S3_S3_RSt8ios_baseRSt12_Ios_IostateRT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_getIwSt19istreambuf_iteratorIwSt11char_traitsIwEEE14_M_extract_intIlEES4_S4_S4_RSt8ios_baseRSt12_Ios_IostateRT_,
++ _ZNKSt7num_getIwSt19istreambuf_iteratorIwSt11char_traitsIwEEE14_M_extract_intIlEES3_S3_S3_RSt8ios_baseRSt12_Ios_IostateRT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_getIwSt19istreambuf_iteratorIwSt11char_traitsIwEEE14_M_extract_intImEES4_S4_S4_RSt8ios_baseRSt12_Ios_IostateRT_,
++ _ZNKSt7num_getIwSt19istreambuf_iteratorIwSt11char_traitsIwEEE14_M_extract_intImEES3_S3_S3_RSt8ios_baseRSt12_Ios_IostateRT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_getIwSt19istreambuf_iteratorIwSt11char_traitsIwEEE14_M_extract_intItEES4_S4_S4_RSt8ios_baseRSt12_Ios_IostateRT_,
++ _ZNKSt7num_getIwSt19istreambuf_iteratorIwSt11char_traitsIwEEE14_M_extract_intItEES3_S3_S3_RSt8ios_baseRSt12_Ios_IostateRT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_getIwSt19istreambuf_iteratorIwSt11char_traitsIwEEE14_M_extract_intIxEES4_S4_S4_RSt8ios_baseRSt12_Ios_IostateRT_,
++ _ZNKSt7num_getIwSt19istreambuf_iteratorIwSt11char_traitsIwEEE14_M_extract_intIxEES3_S3_S3_RSt8ios_baseRSt12_Ios_IostateRT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_getIwSt19istreambuf_iteratorIwSt11char_traitsIwEEE14_M_extract_intIyEES4_S4_S4_RSt8ios_baseRSt12_Ios_IostateRT_,
++ _ZNKSt7num_getIwSt19istreambuf_iteratorIwSt11char_traitsIwEEE14_M_extract_intIyEES3_S3_S3_RSt8ios_baseRSt12_Ios_IostateRT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_putIwSt19ostreambuf_iteratorIwSt11char_traitsIwEEE13_M_insert_intIlEES4_S4_RSt8ios_basewT_,
++ _ZNKSt7num_putIwSt19ostreambuf_iteratorIwSt11char_traitsIwEEE13_M_insert_intIlEES3_S3_RSt8ios_basewT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_putIwSt19ostreambuf_iteratorIwSt11char_traitsIwEEE13_M_insert_intImEES4_S4_RSt8ios_basewT_,
++ _ZNKSt7num_putIwSt19ostreambuf_iteratorIwSt11char_traitsIwEEE13_M_insert_intImEES3_S3_RSt8ios_basewT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_putIwSt19ostreambuf_iteratorIwSt11char_traitsIwEEE13_M_insert_intIxEES4_S4_RSt8ios_basewT_,
++ _ZNKSt7num_putIwSt19ostreambuf_iteratorIwSt11char_traitsIwEEE13_M_insert_intIxEES3_S3_RSt8ios_basewT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_putIwSt19ostreambuf_iteratorIwSt11char_traitsIwEEE13_M_insert_intIyEES4_S4_RSt8ios_basewT_,
++ _ZNKSt7num_putIwSt19ostreambuf_iteratorIwSt11char_traitsIwEEE13_M_insert_intIyEES3_S3_RSt8ios_basewT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1287num_putIwSt19ostreambuf_iteratorIwSt11char_traitsIwEEE15_M_insert_floatIdEES4_S4_RSt8ios_basewcT_,
++ _ZNKSt7num_putIwSt19ostreambuf_iteratorIwSt11char_traitsIwEEE15_M_insert_floatIdEES3_S3_RSt8ios_basewcT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt7num_putIwSt19ostreambuf_iteratorIwSt11char_traitsIwEEE15_M_insert_floatIdEES3_S3_RSt8ios_basewcT_,
++ _ZNKSt7num_putIwSt19ostreambuf_iteratorIwSt11char_traitsIwEEE15_M_insert_floatIeEES3_S3_RSt8ios_basewcT_);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1289money_getIwSt19istreambuf_iteratorIwSt11char_traitsIwEEE10_M_extractILb0EEES4_S4_S4_RSt8ios_baseRSt12_Ios_IostateRSs,
++ _ZNKSt9money_getIwSt19istreambuf_iteratorIwSt11char_traitsIwEEE10_M_extractILb0EEES3_S3_S3_RSt8ios_baseRSt12_Ios_IostateRSs);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1289money_getIwSt19istreambuf_iteratorIwSt11char_traitsIwEEE10_M_extractILb1EEES4_S4_S4_RSt8ios_baseRSt12_Ios_IostateRSs,
++ _ZNKSt9money_getIwSt19istreambuf_iteratorIwSt11char_traitsIwEEE10_M_extractILb1EEES3_S3_S3_RSt8ios_baseRSt12_Ios_IostateRSs);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1289money_putIwSt19ostreambuf_iteratorIwSt11char_traitsIwEEE9_M_insertILb0EEES4_S4_RSt8ios_basewRKSbIwS3_SaIwEE,
++ _ZNKSt9money_putIwSt19ostreambuf_iteratorIwSt11char_traitsIwEEE9_M_insertILb0EEES3_S3_RSt8ios_basewRKSbIwS2_SaIwEE);
++_GLIBCXX_LDBL_COMPAT(_ZNKSt17__gnu_cxx_ldbl1289money_putIwSt19ostreambuf_iteratorIwSt11char_traitsIwEEE9_M_insertILb1EEES4_S4_RSt8ios_basewRKSbIwS3_SaIwEE,
++ _ZNKSt9money_putIwSt19ostreambuf_iteratorIwSt11char_traitsIwEEE9_M_insertILb1EEES3_S3_RSt8ios_basewRKSbIwS2_SaIwEE);
++
++#endif // _GLIBCXX_LONG_DOUBLE_COMPAT
+ #endif
+diff -urpN -X /home/bergner/cvs/dontdiff gcc-41-20060515.orig/libstdc++-v3/testsuite/testsuite_abi.cc gcc-41-20060515/libstdc++-v3/testsuite/testsuite_abi.cc
+--- gcc-41-20060515.orig/libstdc++-v3/testsuite/testsuite_abi.cc 2006-05-15 11:15:38.000000000 -0500
++++ gcc-41-20060515/libstdc++-v3/testsuite/testsuite_abi.cc 2006-05-15 14:14:57.231341148 -0500
+@@ -187,8 +187,11 @@ check_version(symbol& test, bool added)
+ known_versions.push_back("GLIBCXX_3.4.6");
+ known_versions.push_back("GLIBCXX_3.4.7");
+ known_versions.push_back("GLIBCXX_3.4.8");
++ known_versions.push_back("GLIBCXX_LDBL_3.4");
++ known_versions.push_back("GLIBCXX_LDBL_3.4.7");
+ known_versions.push_back("CXXABI_1.3");
+ known_versions.push_back("CXXABI_1.3.1");
++ known_versions.push_back("CXXABI_LDBL_1.3");
+ }
+ compat_list::iterator begin = known_versions.begin();
+ compat_list::iterator end = known_versions.end();
+@@ -224,9 +227,7 @@ check_version(symbol& test, bool added)
+ // New version labels are ok. The rest are not.
+ compat_list::iterator it2 = find(begin, end, test.name);
+ if (it2 != end)
+- {
+- test.version_status = symbol::compatible;
+- }
++ test.version_status = symbol::compatible;
+ else
+ test.version_status = symbol::incompatible;
+ }
+@@ -370,7 +371,7 @@ compare_symbols(const char* baseline_fil
+ added_names.erase(it);
+ }
+ else
+- missing_names.push_back(what);
++ missing_names.push_back(what);
+ }
+
+ // Check missing names for compatibility.
--- /dev/null
+ * config/rs6000/darwin-ldouble.c: Build file for SOFT_FLOAT.
+ (strong_alias): Define.
+ (__gcc_qmul): Provide non-FMA for soft-float.
+ (__gcc_qdiv): Same.
+ (__gcc_qneg): New.
+ (__gcc_qeq): New.
+ (__gcc_qle): New.
+ (__gcc_qge): New.
+ (__gcc_qunord): New.
+ (__gcc_stoq): New.
+ (__gcc_dtoq): New.
+ (__gcc_qtos): New.
+ (__gcc_qtod): New.
+ (__gcc_qtoi): New.
+ (__gcc_qtou): New.
+ (__gcc_itoq): New.
+ (__gcc_utoq): New.
+ (fmsub): New.
+ * config/rs6000/rs6000.c (rs6000_emit_move): Handle TFmode
+ constant for soft-float.
+ (rs6000_init_libfuncs): Initialize soft-float functions.
+ * config/rs6000/libgcc-ppc-glibc.ver: Version soft-float symbols.
+ * config/rs6000/rs6000.md (movtf): Allow soft-float.
+ (movtf_softfloat): New.
+ * config/rs6000/t-ppccomm (TARGET_LIBGCC2_CFLAGS): Add
+ -mlong-double-128.
+ (ldblspecs): Remove.
+ * config/rs6000/sysv4.h (SUBTARGET_OVERRIDE_OPTIONS): Do not warn
+ about long double soft float.
+
+diff -urN gcc-4.1.1/gcc/config/rs6000/darwin-ldouble.c gcc-4.1.1-patched/gcc/config/rs6000/darwin-ldouble.c
+--- gcc-4.1.1/gcc/config/rs6000/darwin-ldouble.c 2006-03-23 16:23:58.000000000 -0600
++++ gcc-4.1.1-patched/gcc/config/rs6000/darwin-ldouble.c 2006-09-12 14:30:16.000000000 -0500
+@@ -49,7 +49,8 @@
+
+ This code currently assumes big-endian. */
+
+-#if (!defined (__NO_FPRS__) && !defined (__LITTLE_ENDIAN__) \
++#if ((!defined (__NO_FPRS__) || defined (_SOFT_FLOAT)) \
++ && !defined (__LITTLE_ENDIAN__) \
+ && (defined (__MACH__) || defined (__powerpc__) || defined (_AIX)))
+
+ #define fabs(x) __builtin_fabs(x)
+@@ -60,14 +61,19 @@
+
+ #define nonfinite(a) unlikely (! isless (fabs (a), inf ()))
+
++/* Define ALIASNAME as a strong alias for NAME. */
++# define strong_alias(name, aliasname) _strong_alias(name, aliasname)
++# define _strong_alias(name, aliasname) \
++ extern __typeof (name) aliasname __attribute__ ((alias (#name)));
++
+ /* All these routines actually take two long doubles as parameters,
+ but GCC currently generates poor code when a union is used to turn
+ a long double into a pair of doubles. */
+
+-extern long double __gcc_qadd (double, double, double, double);
+-extern long double __gcc_qsub (double, double, double, double);
+-extern long double __gcc_qmul (double, double, double, double);
+-extern long double __gcc_qdiv (double, double, double, double);
++long double __gcc_qadd (double, double, double, double);
++long double __gcc_qsub (double, double, double, double);
++long double __gcc_qmul (double, double, double, double);
++long double __gcc_qdiv (double, double, double, double);
+
+ #if defined __ELF__ && defined SHARED \
+ && (defined __powerpc64__ || !(defined __linux__ || defined __gnu_hurd__))
+@@ -139,6 +145,10 @@
+ return __gcc_qadd (a, b, -c, -d);
+ }
+
++#ifdef _SOFT_FLOAT
++static double fmsub (double, double, double);
++#endif
++
+ long double
+ __gcc_qmul (double a, double b, double c, double d)
+ {
+@@ -154,7 +164,11 @@
+ /* Sum terms of two highest orders. */
+
+ /* Use fused multiply-add to get low part of a * c. */
++#ifndef _SOFT_FLOAT
+ asm ("fmsub %0,%1,%2,%3" : "=f"(tau) : "f"(a), "f"(c), "f"(t));
++#else
++ tau = fmsub (a, c, t);
++#endif
+ v = a*d;
+ w = b*c;
+ tau += v + w; /* Add in other second-order terms. */
+@@ -187,7 +201,11 @@
+ numerically necessary. */
+
+ /* Use fused multiply-add to get low part of c * t. */
++#ifndef _SOFT_FLOAT
+ asm ("fmsub %0,%1,%2,%3" : "=f"(sigma) : "f"(c), "f"(t), "f"(s));
++#else
++ sigma = fmsub (c, t, s);
++#endif
+ v = a - s;
+
+ tau = ((v-sigma)+w)/c; /* Correction to t. */
+@@ -201,4 +219,3959 @@
+ return z.ldval;
+ }
+
++#ifdef _SOFT_FLOAT
++
++long double __gcc_qneg (double, double);
++int __gcc_qeq (double, double, double, double);
++int __gcc_qne (double, double, double, double);
++int __gcc_qge (double, double, double, double);
++int __gcc_qle (double, double, double, double);
++int __gcc_qunord (double, double, double, double);
++long double __gcc_stoq (float);
++long double __gcc_dtoq (double);
++float __gcc_qtos (double, double);
++double __gcc_qtod (double, double);
++int __gcc_qtoi (double, double);
++unsigned int __gcc_qtou (double, double);
++long double __gcc_itoq (int);
++long double __gcc_utoq (unsigned int);
++
++extern int __eqdf2 (double, double);
++extern int __ledf2 (double, double);
++extern int __gedf2 (double, double);
++extern int __unorddf2 (double, double);
++
++/* Negate 'long double' value and return the result. */
++long double
++__gcc_qneg (double a, double aa)
++{
++ longDblUnion x;
++
++ x.dval[0] = -a;
++ x.dval[1] = -aa;
++ return x.ldval;
++}
++
++/* Compare two 'long double' values for equality. */
++int
++__gcc_qeq (double a, double aa, double c, double cc)
++{
++ if (__eqdf2 (a, c) == 0)
++ return __eqdf2 (aa, cc);
++ return 1;
++}
++
++strong_alias (__gcc_qeq, __gcc_qne);
++
++/* Compare two 'long double' values for less than or equal. */
++int
++__gcc_qle (double a, double aa, double c, double cc)
++{
++ if (__eqdf2 (a, c) == 0)
++ return __ledf2 (aa, cc);
++ return __ledf2 (a, c);
++}
++
++strong_alias (__gcc_qle, __gcc_qlt);
++
++/* Compare two 'long double' values for greater than or equal. */
++int
++__gcc_qge (double a, double aa, double c, double cc)
++{
++ if (__eqdf2 (a, c) == 0)
++ return __gedf2 (aa, cc);
++ return __gedf2 (a, c);
++}
++
++strong_alias (__gcc_qge, __gcc_qgt);
++
++/* Compare two 'long double' values for unordered. */
++int
++__gcc_qunord (double a, double aa, double c, double cc)
++{
++ if (__eqdf2 (a, c) == 0)
++ return __unorddf2 (aa, cc);
++ return __unorddf2 (a, c);
++}
++
++/* Convert single to long double. */
++long double
++__gcc_stoq (float a)
++{
++ longDblUnion x;
++
++ x.dval[0] = (double) a;
++ x.dval[1] = 0.0;
++
++ return x.ldval;
++}
++
++/* Convert double to long double. */
++long double
++__gcc_dtoq (double a)
++{
++ longDblUnion x;
++
++ x.dval[0] = a;
++ x.dval[1] = 0.0;
++
++ return x.ldval;
++}
++
++/* Convert long double to single. */
++float
++__gcc_qtos (double a, double aa __attribute__ ((__unused__)))
++{
++ return (float) a;
++}
++
++/* Convert long double to double. */
++double
++__gcc_qtod (double a, double aa __attribute__ ((__unused__)))
++{
++ return a;
++}
++
++/* Convert long double to int. */
++int
++__gcc_qtoi (double a, double aa)
++{
++ double z = a + aa;
++ return (int) z;
++}
++
++/* Convert long double to unsigned int. */
++unsigned int
++__gcc_qtou (double a, double aa)
++{
++ double z = a + aa;
++ return (unsigned int) z;
++}
++
++/* Convert int to long double. */
++long double
++__gcc_itoq (int a)
++{
++ return __gcc_dtoq ((double) a);
++}
++
++/* Convert unsigned int to long double. */
++long double
++__gcc_utoq (unsigned int a)
++{
++ return __gcc_dtoq ((double) a);
++}
++
++typedef int QItype __attribute__ ((mode (QI)));
++typedef int SItype __attribute__ ((mode (SI)));
++typedef int DItype __attribute__ ((mode (DI)));
++typedef unsigned int UQItype __attribute__ ((mode (QI)));
++typedef unsigned int USItype __attribute__ ((mode (SI)));
++typedef unsigned int UDItype __attribute__ ((mode (DI)));
++
++typedef unsigned int UHWtype __attribute__ ((mode (HI)));
++extern const UQItype __clz_tab[256];
++extern void abort (void);
++typedef float DFtype __attribute__ ((mode (DF)));
++
++union _FP_UNION_D
++{
++ DFtype flt;
++ struct
++ {
++
++ unsigned sign:1;
++ unsigned exp:11;
++ unsigned frac1:53 - (((unsigned long) 1 << (53 - 1) % 32) != 0) - 32;
++ unsigned frac0:32;
++ } bits __attribute__ ((packed));
++};
++typedef float TFtype __attribute__ ((mode (TF)));
++
++union _FP_UNION_Q
++{
++ TFtype flt;
++ struct
++ {
++
++ unsigned sign:1;
++ unsigned exp:15;
++ unsigned long frac3:113 - (((unsigned long) 1 << (113 - 1) % 32) !=
++ 0) - (32 * 3);
++ unsigned long frac2:32;
++ unsigned long frac1:32;
++ unsigned long frac0:32;
++ } bits __attribute__ ((packed));
++};
++
++static double
++fmsub (double a, double b, double c)
++{
++ int _fex = 0;
++ long A_c __attribute__ ((unused)), A_s, A_e;
++ unsigned long A_f0, A_f1;
++ long B_c __attribute__ ((unused)), B_s, B_e;
++ unsigned long B_f0, B_f1;
++ long C_c __attribute__ ((unused)), C_s, C_e;
++ unsigned long C_f0, C_f1;
++ long X_c __attribute__ ((unused)), X_s, X_e;
++ unsigned long X_f[4];
++ long Y_c __attribute__ ((unused)), Y_s, Y_e;
++ unsigned long Y_f[4];
++ long Z_c __attribute__ ((unused)), Z_s, Z_e;
++ unsigned long Z_f[4];
++ long U_c __attribute__ ((unused)), U_s, U_e;
++ unsigned long U_f[4];
++ long V_c __attribute__ ((unused)), V_s, V_e;
++ unsigned long V_f[4];
++ long R_c __attribute__ ((unused)), R_s, R_e;
++ unsigned long R_f0, R_f1;
++ double r;
++ long double u, v, x, y, z;
++
++/* FP_INIT_ROUNDMODE */
++ do
++ {
++ }
++ while (0);
++
++/* FP_UNPACK_RAW_D (A, a) */
++ do
++ {
++ union _FP_UNION_D _flo;
++ _flo.flt = (a);
++ A_f0 = _flo.bits.frac0;
++ A_f1 = _flo.bits.frac1;
++ A_e = _flo.bits.exp;
++ A_s = _flo.bits.sign;
++ }
++ while (0);
++
++/* FP_UNPACK_RAW_D (B, b) */
++ do
++ {
++ union _FP_UNION_D _flo;
++ _flo.flt = (b);
++ B_f0 = _flo.bits.frac0;
++ B_f1 = _flo.bits.frac1;
++ B_e = _flo.bits.exp;
++ B_s = _flo.bits.sign;
++ }
++ while (0);
++
++/* FP_UNPACK_RAW_D (C, c) */
++ do
++ {
++ union _FP_UNION_D _flo;
++ _flo.flt = (c);
++ C_f0 = _flo.bits.frac0;
++ C_f1 = _flo.bits.frac1;
++ C_e = _flo.bits.exp;
++ C_s = _flo.bits.sign;
++ }
++ while (0);
++
++ /* Extend double to quad. */
++/* FP_EXTEND(Q,D,4,2,X,A) */
++ do
++ {
++ if (113 < 53 || (32767 - 16383 < 2047 - 1023) || 16383 < 1023 + 53 - 1)
++ abort ();
++ X_s = A_s;
++ do
++ {
++ X_f[0] = A_f0;
++ X_f[1] = A_f1;
++ X_f[2] = X_f[3] = 0;
++ }
++ while (0);
++ if ((((A_e + 1) & 2047) > 1))
++ {
++ X_e = A_e + 16383 - 1023;
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = ((113 - 53)) / 32;
++ _up = ((113 - 53)) % 32;
++ _down = 32 - _up;
++ if (!_up)
++ for (_i = 3; _i >= _skip; --_i)
++ X_f[_i] = X_f[_i - _skip];
++ else
++ {
++ for (_i = 3; _i > _skip; --_i)
++ X_f[_i] =
++ X_f[_i - _skip] << _up | X_f[_i - _skip - 1] >> _down;
++ X_f[_i--] = X_f[0] << _up;
++ }
++ for (; _i >= 0; --_i)
++ X_f[_i] = 0;
++ }
++ while (0);
++ }
++ else
++ {
++ if (A_e == 0)
++ {
++ if (((A_f1 | A_f0) == 0))
++ X_e = 0;
++ else
++ {
++ int _lz;
++ _fex |= (0);
++ do
++ {
++ if (A_f1)
++ do
++ {
++ if (sizeof (unsigned long) ==
++ sizeof (unsigned int))
++ _lz = __builtin_clz (A_f1);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long))
++ _lz = __builtin_clzl (A_f1);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long long))
++ _lz = __builtin_clzll (A_f1);
++ else
++ abort ();
++ }
++ while (0);
++ else
++ {
++ do
++ {
++ if (sizeof (unsigned long) ==
++ sizeof (unsigned int))
++ _lz = __builtin_clz (A_f0);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long))
++ _lz = __builtin_clzl (A_f0);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long long))
++ _lz = __builtin_clzll (A_f0);
++ else
++ abort ();
++ }
++ while (0);
++ _lz += 32;
++ }
++ }
++ while (0);
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = (_lz + 113 - (2 * 32)) / 32;
++ _up = (_lz + 113 - (2 * 32)) % 32;
++ _down = 32 - _up;
++ if (!_up)
++ for (_i = 3; _i >= _skip; --_i)
++ X_f[_i] = X_f[_i - _skip];
++ else
++ {
++ for (_i = 3; _i > _skip; --_i)
++ X_f[_i] =
++ X_f[_i - _skip] << _up | X_f[_i - _skip -
++ 1] >> _down;
++ X_f[_i--] = X_f[0] << _up;
++ }
++ for (; _i >= 0; --_i)
++ X_f[_i] = 0;
++ }
++ while (0);
++ X_e = (16383 - 1023 + 1 + ((2 * 32) - 53) - _lz);
++ }
++ }
++ else
++ {
++ X_e = 32767;
++ if (!((A_f1 | A_f0) == 0))
++ {
++ if (!((A_f1) & ((unsigned long) 1 << (53 - 2) % 32)))
++ _fex |= (0);
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = ((113 - 53)) / 32;
++ _up = ((113 - 53)) % 32;
++ _down = 32 - _up;
++ if (!_up)
++ for (_i = 3; _i >= _skip; --_i)
++ X_f[_i] = X_f[_i - _skip];
++ else
++ {
++ for (_i = 3; _i > _skip; --_i)
++ X_f[_i] =
++ X_f[_i - _skip] << _up | X_f[_i - _skip -
++ 1] >> _down;
++ X_f[_i--] = X_f[0] << _up;
++ }
++ for (; _i >= 0; --_i)
++ X_f[_i] = 0;
++ }
++ while (0);
++ }
++ }
++ }
++ }
++ while (0);
++
++/* FP_EXTEND(Q,D,4,2,Y,B) */
++ do
++ {
++ if (113 < 53 || (32767 - 16383 < 2047 - 1023) || 16383 < 1023 + 53 - 1)
++ abort ();
++ Y_s = B_s;
++ do
++ {
++ Y_f[0] = B_f0;
++ Y_f[1] = B_f1;
++ Y_f[2] = Y_f[3] = 0;
++ }
++ while (0);
++ if ((((B_e + 1) & 2047) > 1))
++ {
++ Y_e = B_e + 16383 - 1023;
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = ((113 - 53)) / 32;
++ _up = ((113 - 53)) % 32;
++ _down = 32 - _up;
++ if (!_up)
++ for (_i = 3; _i >= _skip; --_i)
++ Y_f[_i] = Y_f[_i - _skip];
++ else
++ {
++ for (_i = 3; _i > _skip; --_i)
++ Y_f[_i] =
++ Y_f[_i - _skip] << _up | Y_f[_i - _skip - 1] >> _down;
++ Y_f[_i--] = Y_f[0] << _up;
++ }
++ for (; _i >= 0; --_i)
++ Y_f[_i] = 0;
++ }
++ while (0);
++ }
++ else
++ {
++ if (B_e == 0)
++ {
++ if (((B_f1 | B_f0) == 0))
++ Y_e = 0;
++ else
++ {
++ int _lz;
++ _fex |= (0);
++ do
++ {
++ if (B_f1)
++ do
++ {
++ if (sizeof (unsigned long) ==
++ sizeof (unsigned int))
++ _lz = __builtin_clz (B_f1);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long))
++ _lz = __builtin_clzl (B_f1);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long long))
++ _lz = __builtin_clzll (B_f1);
++ else
++ abort ();
++ }
++ while (0);
++ else
++ {
++ do
++ {
++ if (sizeof (unsigned long) ==
++ sizeof (unsigned int))
++ _lz = __builtin_clz (B_f0);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long))
++ _lz = __builtin_clzl (B_f0);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long long))
++ _lz = __builtin_clzll (B_f0);
++ else
++ abort ();
++ }
++ while (0);
++ _lz += 32;
++ }
++ }
++ while (0);
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = (_lz + 113 - (2 * 32)) / 32;
++ _up = (_lz + 113 - (2 * 32)) % 32;
++ _down = 32 - _up;
++ if (!_up)
++ for (_i = 3; _i >= _skip; --_i)
++ Y_f[_i] = Y_f[_i - _skip];
++ else
++ {
++ for (_i = 3; _i > _skip; --_i)
++ Y_f[_i] =
++ Y_f[_i - _skip] << _up | Y_f[_i - _skip -
++ 1] >> _down;
++ Y_f[_i--] = Y_f[0] << _up;
++ }
++ for (; _i >= 0; --_i)
++ Y_f[_i] = 0;
++ }
++ while (0);
++ Y_e = (16383 - 1023 + 1 + ((2 * 32) - 53) - _lz);
++ }
++ }
++ else
++ {
++ Y_e = 32767;
++ if (!((B_f1 | B_f0) == 0))
++ {
++ if (!((B_f1) & ((unsigned long) 1 << (53 - 2) % 32)))
++ _fex |= (0);
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = ((113 - 53)) / 32;
++ _up = ((113 - 53)) % 32;
++ _down = 32 - _up;
++ if (!_up)
++ for (_i = 3; _i >= _skip; --_i)
++ Y_f[_i] = Y_f[_i - _skip];
++ else
++ {
++ for (_i = 3; _i > _skip; --_i)
++ Y_f[_i] =
++ Y_f[_i - _skip] << _up | Y_f[_i - _skip -
++ 1] >> _down;
++ Y_f[_i--] = Y_f[0] << _up;
++ }
++ for (; _i >= 0; --_i)
++ Y_f[_i] = 0;
++ }
++ while (0);
++ }
++ }
++ }
++ }
++ while (0);
++
++/* FP_EXTEND(Q,D,4,2,Z,C) */
++ do
++ {
++ if (113 < 53 || (32767 - 16383 < 2047 - 1023) || 16383 < 1023 + 53 - 1)
++ abort ();
++ Z_s = C_s;
++ do
++ {
++ Z_f[0] = C_f0;
++ Z_f[1] = C_f1;
++ Z_f[2] = Z_f[3] = 0;
++ }
++ while (0);
++ if ((((C_e + 1) & 2047) > 1))
++ {
++ Z_e = C_e + 16383 - 1023;
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = ((113 - 53)) / 32;
++ _up = ((113 - 53)) % 32;
++ _down = 32 - _up;
++ if (!_up)
++ for (_i = 3; _i >= _skip; --_i)
++ Z_f[_i] = Z_f[_i - _skip];
++ else
++ {
++ for (_i = 3; _i > _skip; --_i)
++ Z_f[_i] =
++ Z_f[_i - _skip] << _up | Z_f[_i - _skip - 1] >> _down;
++ Z_f[_i--] = Z_f[0] << _up;
++ }
++ for (; _i >= 0; --_i)
++ Z_f[_i] = 0;
++ }
++ while (0);
++ }
++ else
++ {
++ if (C_e == 0)
++ {
++ if (((C_f1 | C_f0) == 0))
++ Z_e = 0;
++ else
++ {
++ int _lz;
++ _fex |= (0);
++ do
++ {
++ if (C_f1)
++ do
++ {
++ if (sizeof (unsigned long) ==
++ sizeof (unsigned int))
++ _lz = __builtin_clz (C_f1);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long))
++ _lz = __builtin_clzl (C_f1);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long long))
++ _lz = __builtin_clzll (C_f1);
++ else
++ abort ();
++ }
++ while (0);
++ else
++ {
++ do
++ {
++ if (sizeof (unsigned long) ==
++ sizeof (unsigned int))
++ _lz = __builtin_clz (C_f0);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long))
++ _lz = __builtin_clzl (C_f0);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long long))
++ _lz = __builtin_clzll (C_f0);
++ else
++ abort ();
++ }
++ while (0);
++ _lz += 32;
++ }
++ }
++ while (0);
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = (_lz + 113 - (2 * 32)) / 32;
++ _up = (_lz + 113 - (2 * 32)) % 32;
++ _down = 32 - _up;
++ if (!_up)
++ for (_i = 3; _i >= _skip; --_i)
++ Z_f[_i] = Z_f[_i - _skip];
++ else
++ {
++ for (_i = 3; _i > _skip; --_i)
++ Z_f[_i] =
++ Z_f[_i - _skip] << _up | Z_f[_i - _skip -
++ 1] >> _down;
++ Z_f[_i--] = Z_f[0] << _up;
++ }
++ for (; _i >= 0; --_i)
++ Z_f[_i] = 0;
++ }
++ while (0);
++ Z_e = (16383 - 1023 + 1 + ((2 * 32) - 53) - _lz);
++ }
++ }
++ else
++ {
++ Z_e = 32767;
++ if (!((C_f1 | C_f0) == 0))
++ {
++ if (!((C_f1) & ((unsigned long) 1 << (53 - 2) % 32)))
++ _fex |= (0);
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = ((113 - 53)) / 32;
++ _up = ((113 - 53)) % 32;
++ _down = 32 - _up;
++ if (!_up)
++ for (_i = 3; _i >= _skip; --_i)
++ Z_f[_i] = Z_f[_i - _skip];
++ else
++ {
++ for (_i = 3; _i > _skip; --_i)
++ Z_f[_i] =
++ Z_f[_i - _skip] << _up | Z_f[_i - _skip -
++ 1] >> _down;
++ Z_f[_i--] = Z_f[0] << _up;
++ }
++ for (; _i >= 0; --_i)
++ Z_f[_i] = 0;
++ }
++ while (0);
++ }
++ }
++ }
++ }
++ while (0);
++
++/* FP_PACK_RAW_Q(x,X) */
++ do
++ {
++ union _FP_UNION_Q _flo;
++ _flo.bits.frac0 = X_f[0];
++ _flo.bits.frac1 = X_f[1];
++ _flo.bits.frac2 = X_f[2];
++ _flo.bits.frac3 = X_f[3];
++ _flo.bits.exp = X_e;
++ _flo.bits.sign = X_s;
++ (x) = _flo.flt;
++ }
++ while (0);
++
++/* FP_PACK_RAW_Q(y,Y) */
++ do
++ {
++ union _FP_UNION_Q _flo;
++ _flo.bits.frac0 = Y_f[0];
++ _flo.bits.frac1 = Y_f[1];
++ _flo.bits.frac2 = Y_f[2];
++ _flo.bits.frac3 = Y_f[3];
++ _flo.bits.exp = Y_e;
++ _flo.bits.sign = Y_s;
++ (y) = _flo.flt;
++ }
++ while (0);
++
++/* FP_PACK_RAW_Q(z,Z) */
++ do
++ {
++ union _FP_UNION_Q _flo;
++ _flo.bits.frac0 = Z_f[0];
++ _flo.bits.frac1 = Z_f[1];
++ _flo.bits.frac2 = Z_f[2];
++ _flo.bits.frac3 = Z_f[3];
++ _flo.bits.exp = Z_e;
++ _flo.bits.sign = Z_s;
++ (z) = _flo.flt;
++ }
++ while (0);
++
++/* FP_HANDLE_EXCEPTIONS */
++ do
++ {
++ }
++ while (0);
++
++ /* Multiply. */
++/* FP_INIT_ROUNDMODE */
++ do
++ {
++ }
++ while (0);
++
++/* FP_UNPACK_Q(X,x) */
++ do
++ {
++ do
++ {
++ union _FP_UNION_Q _flo;
++ _flo.flt = (x);
++ X_f[0] = _flo.bits.frac0;
++ X_f[1] = _flo.bits.frac1;
++ X_f[2] = _flo.bits.frac2;
++ X_f[3] = _flo.bits.frac3;
++ X_e = _flo.bits.exp;
++ X_s = _flo.bits.sign;
++ }
++ while (0);
++ do
++ {
++ switch (X_e)
++ {
++ default:
++ (X_f[3]) |= ((unsigned long) 1 << (113 - 1) % 32);
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = (3) / 32;
++ _up = (3) % 32;
++ _down = 32 - _up;
++ if (!_up)
++ for (_i = 3; _i >= _skip; --_i)
++ X_f[_i] = X_f[_i - _skip];
++ else
++ {
++ for (_i = 3; _i > _skip; --_i)
++ X_f[_i] =
++ X_f[_i - _skip] << _up | X_f[_i - _skip -
++ 1] >> _down;
++ X_f[_i--] = X_f[0] << _up;
++ }
++ for (; _i >= 0; --_i)
++ X_f[_i] = 0;
++ }
++ while (0);
++ X_e -= 16383;
++ X_c = 0;
++ break;
++ case 0:
++ if (((X_f[0] | X_f[1] | X_f[2] | X_f[3]) == 0))
++ X_c = 1;
++ else
++ {
++ long _shift;
++ do
++ {
++ if (X_f[3])
++ {
++ do
++ {
++ if (sizeof (unsigned long) ==
++ sizeof (unsigned int))
++ _shift = __builtin_clz (X_f[3]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long))
++ _shift = __builtin_clzl (X_f[3]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long long))
++ _shift = __builtin_clzll (X_f[3]);
++ else
++ abort ();
++ }
++ while (0);
++ }
++ else if (X_f[2])
++ {
++ do
++ {
++ if (sizeof (unsigned long) ==
++ sizeof (unsigned int))
++ _shift = __builtin_clz (X_f[2]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long))
++ _shift = __builtin_clzl (X_f[2]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long long))
++ _shift = __builtin_clzll (X_f[2]);
++ else
++ abort ();
++ }
++ while (0);
++ _shift += 32;
++ }
++ else if (X_f[1])
++ {
++ do
++ {
++ if (sizeof (unsigned long) ==
++ sizeof (unsigned int))
++ _shift = __builtin_clz (X_f[1]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long))
++ _shift = __builtin_clzl (X_f[1]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long long))
++ _shift = __builtin_clzll (X_f[1]);
++ else
++ abort ();
++ }
++ while (0);
++ _shift += 32 * 2;
++ }
++ else
++ {
++ do
++ {
++ if (sizeof (unsigned long) ==
++ sizeof (unsigned int))
++ _shift = __builtin_clz (X_f[0]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long))
++ _shift = __builtin_clzl (X_f[0]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long long))
++ _shift = __builtin_clzll (X_f[0]);
++ else
++ abort ();
++ }
++ while (0);
++ _shift += 32 * 3;
++ }
++ }
++ while (0);
++ _shift -= ((4 * 32) - 113);
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = ((_shift + 3)) / 32;
++ _up = ((_shift + 3)) % 32;
++ _down = 32 - _up;
++ if (!_up)
++ for (_i = 3; _i >= _skip; --_i)
++ X_f[_i] = X_f[_i - _skip];
++ else
++ {
++ for (_i = 3; _i > _skip; --_i)
++ X_f[_i] =
++ X_f[_i - _skip] << _up | X_f[_i - _skip -
++ 1] >> _down;
++ X_f[_i--] = X_f[0] << _up;
++ }
++ for (; _i >= 0; --_i)
++ X_f[_i] = 0;
++ }
++ while (0);
++ X_e -= 16383 - 1 + _shift;
++ X_c = 0;
++ _fex |= (0);
++ }
++ break;
++ case 32767:
++ if (((X_f[0] | X_f[1] | X_f[2] | X_f[3]) == 0))
++ X_c = 2;
++ else
++ {
++ X_c = 3;
++ if (!((X_f[3]) & ((unsigned long) 1 << (113 - 2) % 32)))
++ _fex |= (0);
++ } break;
++ }
++ }
++ while (0);
++ }
++ while (0);
++
++/* FP_UNPACK_Q(Y,y) */
++ do
++ {
++ do
++ {
++ union _FP_UNION_Q _flo;
++ _flo.flt = (y);
++ Y_f[0] = _flo.bits.frac0;
++ Y_f[1] = _flo.bits.frac1;
++ Y_f[2] = _flo.bits.frac2;
++ Y_f[3] = _flo.bits.frac3;
++ Y_e = _flo.bits.exp;
++ Y_s = _flo.bits.sign;
++ }
++ while (0);
++ do
++ {
++ switch (Y_e)
++ {
++ default:
++ (Y_f[3]) |= ((unsigned long) 1 << (113 - 1) % 32);
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = (3) / 32;
++ _up = (3) % 32;
++ _down = 32 - _up;
++ if (!_up)
++ for (_i = 3; _i >= _skip; --_i)
++ Y_f[_i] = Y_f[_i - _skip];
++ else
++ {
++ for (_i = 3; _i > _skip; --_i)
++ Y_f[_i] =
++ Y_f[_i - _skip] << _up | Y_f[_i - _skip -
++ 1] >> _down;
++ Y_f[_i--] = Y_f[0] << _up;
++ }
++ for (; _i >= 0; --_i)
++ Y_f[_i] = 0;
++ }
++ while (0);
++ Y_e -= 16383;
++ Y_c = 0;
++ break;
++ case 0:
++ if (((Y_f[0] | Y_f[1] | Y_f[2] | Y_f[3]) == 0))
++ Y_c = 1;
++ else
++ {
++ long _shift;
++ do
++ {
++ if (Y_f[3])
++ {
++ do
++ {
++ if (sizeof (unsigned long) ==
++ sizeof (unsigned int))
++ _shift = __builtin_clz (Y_f[3]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long))
++ _shift = __builtin_clzl (Y_f[3]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long long))
++ _shift = __builtin_clzll (Y_f[3]);
++ else
++ abort ();
++ }
++ while (0);
++ }
++ else if (Y_f[2])
++ {
++ do
++ {
++ if (sizeof (unsigned long) ==
++ sizeof (unsigned int))
++ _shift = __builtin_clz (Y_f[2]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long))
++ _shift = __builtin_clzl (Y_f[2]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long long))
++ _shift = __builtin_clzll (Y_f[2]);
++ else
++ abort ();
++ }
++ while (0);
++ _shift += 32;
++ }
++ else if (Y_f[1])
++ {
++ do
++ {
++ if (sizeof (unsigned long) ==
++ sizeof (unsigned int))
++ _shift = __builtin_clz (Y_f[1]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long))
++ _shift = __builtin_clzl (Y_f[1]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long long))
++ _shift = __builtin_clzll (Y_f[1]);
++ else
++ abort ();
++ }
++ while (0);
++ _shift += 32 * 2;
++ }
++ else
++ {
++ do
++ {
++ if (sizeof (unsigned long) ==
++ sizeof (unsigned int))
++ _shift = __builtin_clz (Y_f[0]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long))
++ _shift = __builtin_clzl (Y_f[0]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long long))
++ _shift = __builtin_clzll (Y_f[0]);
++ else
++ abort ();
++ }
++ while (0);
++ _shift += 32 * 3;
++ }
++ }
++ while (0);
++ _shift -= ((4 * 32) - 113);
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = ((_shift + 3)) / 32;
++ _up = ((_shift + 3)) % 32;
++ _down = 32 - _up;
++ if (!_up)
++ for (_i = 3; _i >= _skip; --_i)
++ Y_f[_i] = Y_f[_i - _skip];
++ else
++ {
++ for (_i = 3; _i > _skip; --_i)
++ Y_f[_i] =
++ Y_f[_i - _skip] << _up | Y_f[_i - _skip -
++ 1] >> _down;
++ Y_f[_i--] = Y_f[0] << _up;
++ }
++ for (; _i >= 0; --_i)
++ Y_f[_i] = 0;
++ }
++ while (0);
++ Y_e -= 16383 - 1 + _shift;
++ Y_c = 0;
++ _fex |= (0);
++ }
++ break;
++ case 32767:
++ if (((Y_f[0] | Y_f[1] | Y_f[2] | Y_f[3]) == 0))
++ Y_c = 2;
++ else
++ {
++ Y_c = 3;
++ if (!((Y_f[3]) & ((unsigned long) 1 << (113 - 2) % 32)))
++ _fex |= (0);
++ } break;
++ }
++ }
++ while (0);
++ }
++ while (0);
++
++/* FP_MUL_Q(U,X,Y) */
++ do
++ {
++ U_s = X_s ^ Y_s;
++ switch ((((X_c) << 2) | (Y_c)))
++ {
++ case (((0) << 2) | (0)):
++ U_c = 0;
++ U_e = X_e + Y_e + 1;
++ do
++ {
++ unsigned long _z_f[8];
++ unsigned long _b_f0, _b_f1;
++ unsigned long _c_f0, _c_f1;
++ unsigned long _d_f0, _d_f1;
++ unsigned long _e_f0, _e_f1;
++ unsigned long _f_f0, _f_f1;
++ do
++ {
++ USItype __m0 = (X_f[0]), __m1 = (Y_f[0]);
++ __asm__ ("mulhwu %0,%1,%2": "=r" ((_z_f[1])):"%r" (X_f[0]),
++ "r" (Y_f
++ [0]));
++ ((_z_f[0])) = __m0 * __m1;
++ }
++ while (0);
++ do
++ {
++ USItype __m0 = (X_f[0]), __m1 = (Y_f[1]);
++ __asm__ ("mulhwu %0,%1,%2": "=r" (_b_f1):"%r" (X_f[0]),
++ "r" (Y_f
++ [1]));
++ (_b_f0) = __m0 * __m1;
++ }
++ while (0);
++ do
++ {
++ USItype __m0 = (X_f[1]), __m1 = (Y_f[0]);
++ __asm__ ("mulhwu %0,%1,%2": "=r" (_c_f1):"%r" (X_f[1]),
++ "r" (Y_f
++ [0]));
++ (_c_f0) = __m0 * __m1;
++ }
++ while (0);
++ do
++ {
++ USItype __m0 = (X_f[1]), __m1 = (Y_f[1]);
++ __asm__ ("mulhwu %0,%1,%2": "=r" (_d_f1):"%r" (X_f[1]),
++ "r" (Y_f
++ [1]));
++ (_d_f0) = __m0 * __m1;
++ }
++ while (0);
++ do
++ {
++ USItype __m0 = (X_f[0]), __m1 = (Y_f[2]);
++ __asm__ ("mulhwu %0,%1,%2": "=r" (_e_f1):"%r" (X_f[0]),
++ "r" (Y_f
++ [2]));
++ (_e_f0) = __m0 * __m1;
++ }
++ while (0);
++ do
++ {
++ USItype __m0 = (X_f[2]), __m1 = (Y_f[0]);
++ __asm__ ("mulhwu %0,%1,%2": "=r" (_f_f1):"%r" (X_f[2]),
++ "r" (Y_f
++ [0]));
++ (_f_f0) = __m0 * __m1;
++ }
++ while (0);
++ do
++ {
++ unsigned long _c1, _c2;
++ (_z_f[1]) = _b_f0 + (_z_f[1]);
++ _c1 = (_z_f[1]) < _b_f0;
++ (_z_f[2]) = _b_f1 + 0;
++ _c2 = (_z_f[2]) < _b_f1;
++ (_z_f[2]) += _c1;
++ _c2 |= (_z_f[2]) < _c1;
++ (_z_f[3]) = 0 + 0 + _c2;
++ }
++ while (0);
++ do
++ {
++ unsigned long _c1, _c2;
++ (_z_f[1]) = _c_f0 + (_z_f[1]);
++ _c1 = (_z_f[1]) < _c_f0;
++ (_z_f[2]) = _c_f1 + (_z_f[2]);
++ _c2 = (_z_f[2]) < _c_f1;
++ (_z_f[2]) += _c1;
++ _c2 |= (_z_f[2]) < _c1;
++ (_z_f[3]) = 0 + (_z_f[3]) + _c2;
++ }
++ while (0);
++ do
++ {
++ unsigned long _c1, _c2;
++ (_z_f[2]) = _d_f0 + (_z_f[2]);
++ _c1 = (_z_f[2]) < _d_f0;
++ (_z_f[3]) = _d_f1 + (_z_f[3]);
++ _c2 = (_z_f[3]) < _d_f1;
++ (_z_f[3]) += _c1;
++ _c2 |= (_z_f[3]) < _c1;
++ (_z_f[4]) = 0 + 0 + _c2;
++ }
++ while (0);
++ do
++ {
++ unsigned long _c1, _c2;
++ (_z_f[2]) = _e_f0 + (_z_f[2]);
++ _c1 = (_z_f[2]) < _e_f0;
++ (_z_f[3]) = _e_f1 + (_z_f[3]);
++ _c2 = (_z_f[3]) < _e_f1;
++ (_z_f[3]) += _c1;
++ _c2 |= (_z_f[3]) < _c1;
++ (_z_f[4]) = 0 + (_z_f[4]) + _c2;
++ }
++ while (0);
++ do
++ {
++ unsigned long _c1, _c2;
++ (_z_f[2]) = _f_f0 + (_z_f[2]);
++ _c1 = (_z_f[2]) < _f_f0;
++ (_z_f[3]) = _f_f1 + (_z_f[3]);
++ _c2 = (_z_f[3]) < _f_f1;
++ (_z_f[3]) += _c1;
++ _c2 |= (_z_f[3]) < _c1;
++ (_z_f[4]) = 0 + (_z_f[4]) + _c2;
++ }
++ while (0);
++ do
++ {
++ USItype __m0 = (X_f[0]), __m1 = (Y_f[3]);
++ __asm__ ("mulhwu %0,%1,%2": "=r" (_b_f1):"%r" (X_f[0]),
++ "r" (Y_f
++ [3]));
++ (_b_f0) = __m0 * __m1;
++ }
++ while (0);
++ do
++ {
++ USItype __m0 = (X_f[3]), __m1 = (Y_f[0]);
++ __asm__ ("mulhwu %0,%1,%2": "=r" (_c_f1):"%r" (X_f[3]),
++ "r" (Y_f
++ [0]));
++ (_c_f0) = __m0 * __m1;
++ }
++ while (0);
++ do
++ {
++ USItype __m0 = (X_f[1]), __m1 = (Y_f[2]);
++ __asm__ ("mulhwu %0,%1,%2": "=r" (_d_f1):"%r" (X_f[1]),
++ "r" (Y_f
++ [2]));
++ (_d_f0) = __m0 * __m1;
++ }
++ while (0);
++ do
++ {
++ USItype __m0 = (X_f[2]), __m1 = (Y_f[1]);
++ __asm__ ("mulhwu %0,%1,%2": "=r" (_e_f1):"%r" (X_f[2]),
++ "r" (Y_f
++ [1]));
++ (_e_f0) = __m0 * __m1;
++ }
++ while (0);
++ do
++ {
++ unsigned long _c1, _c2;
++ (_z_f[3]) = _b_f0 + (_z_f[3]);
++ _c1 = (_z_f[3]) < _b_f0;
++ (_z_f[4]) = _b_f1 + (_z_f[4]);
++ _c2 = (_z_f[4]) < _b_f1;
++ (_z_f[4]) += _c1;
++ _c2 |= (_z_f[4]) < _c1;
++ (_z_f[5]) = 0 + 0 + _c2;
++ }
++ while (0);
++ do
++ {
++ unsigned long _c1, _c2;
++ (_z_f[3]) = _c_f0 + (_z_f[3]);
++ _c1 = (_z_f[3]) < _c_f0;
++ (_z_f[4]) = _c_f1 + (_z_f[4]);
++ _c2 = (_z_f[4]) < _c_f1;
++ (_z_f[4]) += _c1;
++ _c2 |= (_z_f[4]) < _c1;
++ (_z_f[5]) = 0 + (_z_f[5]) + _c2;
++ }
++ while (0);
++ do
++ {
++ unsigned long _c1, _c2;
++ (_z_f[3]) = _d_f0 + (_z_f[3]);
++ _c1 = (_z_f[3]) < _d_f0;
++ (_z_f[4]) = _d_f1 + (_z_f[4]);
++ _c2 = (_z_f[4]) < _d_f1;
++ (_z_f[4]) += _c1;
++ _c2 |= (_z_f[4]) < _c1;
++ (_z_f[5]) = 0 + (_z_f[5]) + _c2;
++ }
++ while (0);
++ do
++ {
++ unsigned long _c1, _c2;
++ (_z_f[3]) = _e_f0 + (_z_f[3]);
++ _c1 = (_z_f[3]) < _e_f0;
++ (_z_f[4]) = _e_f1 + (_z_f[4]);
++ _c2 = (_z_f[4]) < _e_f1;
++ (_z_f[4]) += _c1;
++ _c2 |= (_z_f[4]) < _c1;
++ (_z_f[5]) = 0 + (_z_f[5]) + _c2;
++ }
++ while (0);
++ do
++ {
++ USItype __m0 = (X_f[2]), __m1 = (Y_f[2]);
++ __asm__ ("mulhwu %0,%1,%2": "=r" (_b_f1):"%r" (X_f[2]),
++ "r" (Y_f
++ [2]));
++ (_b_f0) = __m0 * __m1;
++ }
++ while (0);
++ do
++ {
++ USItype __m0 = (X_f[1]), __m1 = (Y_f[3]);
++ __asm__ ("mulhwu %0,%1,%2": "=r" (_c_f1):"%r" (X_f[1]),
++ "r" (Y_f
++ [3]));
++ (_c_f0) = __m0 * __m1;
++ }
++ while (0);
++ do
++ {
++ USItype __m0 = (X_f[3]), __m1 = (Y_f[1]);
++ __asm__ ("mulhwu %0,%1,%2": "=r" (_d_f1):"%r" (X_f[3]),
++ "r" (Y_f
++ [1]));
++ (_d_f0) = __m0 * __m1;
++ }
++ while (0);
++ do
++ {
++ USItype __m0 = (X_f[2]), __m1 = (Y_f[3]);
++ __asm__ ("mulhwu %0,%1,%2": "=r" (_e_f1):"%r" (X_f[2]),
++ "r" (Y_f
++ [3]));
++ (_e_f0) = __m0 * __m1;
++ }
++ while (0);
++ do
++ {
++ USItype __m0 = (X_f[3]), __m1 = (Y_f[2]);
++ __asm__ ("mulhwu %0,%1,%2": "=r" (_f_f1):"%r" (X_f[3]),
++ "r" (Y_f
++ [2]));
++ (_f_f0) = __m0 * __m1;
++ }
++ while (0);
++ do
++ {
++ unsigned long _c1, _c2;
++ (_z_f[4]) = _b_f0 + (_z_f[4]);
++ _c1 = (_z_f[4]) < _b_f0;
++ (_z_f[5]) = _b_f1 + (_z_f[5]);
++ _c2 = (_z_f[5]) < _b_f1;
++ (_z_f[5]) += _c1;
++ _c2 |= (_z_f[5]) < _c1;
++ (_z_f[6]) = 0 + 0 + _c2;
++ }
++ while (0);
++ do
++ {
++ unsigned long _c1, _c2;
++ (_z_f[4]) = _c_f0 + (_z_f[4]);
++ _c1 = (_z_f[4]) < _c_f0;
++ (_z_f[5]) = _c_f1 + (_z_f[5]);
++ _c2 = (_z_f[5]) < _c_f1;
++ (_z_f[5]) += _c1;
++ _c2 |= (_z_f[5]) < _c1;
++ (_z_f[6]) = 0 + (_z_f[6]) + _c2;
++ }
++ while (0);
++ do
++ {
++ unsigned long _c1, _c2;
++ (_z_f[4]) = _d_f0 + (_z_f[4]);
++ _c1 = (_z_f[4]) < _d_f0;
++ (_z_f[5]) = _d_f1 + (_z_f[5]);
++ _c2 = (_z_f[5]) < _d_f1;
++ (_z_f[5]) += _c1;
++ _c2 |= (_z_f[5]) < _c1;
++ (_z_f[6]) = 0 + (_z_f[6]) + _c2;
++ }
++ while (0);
++ do
++ {
++ unsigned long _c1, _c2;
++ (_z_f[5]) = _e_f0 + (_z_f[5]);
++ _c1 = (_z_f[5]) < _e_f0;
++ (_z_f[6]) = _e_f1 + (_z_f[6]);
++ _c2 = (_z_f[6]) < _e_f1;
++ (_z_f[6]) += _c1;
++ _c2 |= (_z_f[6]) < _c1;
++ (_z_f[7]) = 0 + 0 + _c2;
++ }
++ while (0);
++ do
++ {
++ unsigned long _c1, _c2;
++ (_z_f[5]) = _f_f0 + (_z_f[5]);
++ _c1 = (_z_f[5]) < _f_f0;
++ (_z_f[6]) = _f_f1 + (_z_f[6]);
++ _c2 = (_z_f[6]) < _f_f1;
++ (_z_f[6]) += _c1;
++ _c2 |= (_z_f[6]) < _c1;
++ (_z_f[7]) = 0 + (_z_f[7]) + _c2;
++ }
++ while (0);
++ do
++ {
++ USItype __m0 = (X_f[3]), __m1 = (Y_f[3]);
++ __asm__ ("mulhwu %0,%1,%2": "=r" (_b_f1):"%r" (X_f[3]),
++ "r" (Y_f
++ [3]));
++ (_b_f0) = __m0 * __m1;
++ }
++ while (0);
++ do
++ {
++ if (__builtin_constant_p ((_z_f[7])) && ((_z_f[7])) == 0)
++ __asm__ ("{a%I4|add%I4c} %1,%3,%4\n\t{aze|addze} %0,%2": "=r" ((_z_f[7])), "=&r" ((_z_f[6])):"r" (_b_f1), "%r" (_b_f0),
++ "rI" ((_z_f
++ [6])));
++ else if (__builtin_constant_p ((_z_f[7]))
++ && ((_z_f[7])) == ~(USItype) 0)
++ __asm__ ("{a%I4|add%I4c} %1,%3,%4\n\t{ame|addme} %0,%2": "=r" ((_z_f[7])), "=&r" ((_z_f[6])):"r" (_b_f1), "%r" (_b_f0),
++ "rI" ((_z_f
++ [6])));
++ else
++ __asm__ ("{a%I5|add%I5c} %1,%4,%5\n\t{ae|adde} %0,%2,%3": "=r" ((_z_f[7])), "=&r" ((_z_f[6])):"%r" (_b_f1), "r" ((_z_f[7])), "%r" (_b_f0),
++ "rI" ((_z_f
++ [6])));
++ }
++ while (0);
++ do
++ {
++ long _up, _down, _skip, _i;
++ unsigned long _s;
++ _skip = ((3 + 113) - 1) / 32;
++ _down = ((3 + 113) - 1) % 32;
++ _up = 32 - _down;
++ for (_s = _i = 0; _i < _skip; ++_i)
++ _s |= _z_f[_i];
++ if (!_down)
++ for (_i = 0; _i <= 7 - _skip; ++_i)
++ _z_f[_i] = _z_f[_i + _skip];
++ else
++ {
++ _s |= _z_f[_i] << _up;
++ for (_i = 0; _i < 7 - _skip; ++_i)
++ _z_f[_i] =
++ _z_f[_i + _skip] >> _down | _z_f[_i + _skip +
++ 1] << _up;
++ _z_f[_i++] = _z_f[7] >> _down;
++ }
++ for (; _i < 8; ++_i)
++ _z_f[_i] = 0;
++ _z_f[0] |= (_s != 0);
++ }
++ while (0);
++ (U_f[3] = (_z_f[3]), U_f[2] = (_z_f[2]), U_f[1] =
++ (_z_f[1]), U_f[0] = (_z_f[0]));
++ }
++ while (0);
++ if (((U_f[3]) & ((unsigned long) 1 << ((3 + 113) % 32))))
++ do
++ {
++ int _sticky;
++ do
++ {
++ long _up, _down, _skip, _i;
++ unsigned long _s;
++ _skip = (1) / 32;
++ _down = (1) % 32;
++ _up = 32 - _down;
++ for (_s = _i = 0; _i < _skip; ++_i)
++ _s |= U_f[_i];
++ if (!_down)
++ for (_i = 0; _i <= 3 - _skip; ++_i)
++ U_f[_i] = U_f[_i + _skip];
++ else
++ {
++ _s |= U_f[_i] << _up;
++ for (_i = 0; _i < 3 - _skip; ++_i)
++ U_f[_i] =
++ U_f[_i + _skip] >> _down | U_f[_i + _skip +
++ 1] << _up;
++ U_f[_i++] = U_f[3] >> _down;
++ }
++ for (; _i < 4; ++_i)
++ U_f[_i] = 0;
++ _sticky = (_s != 0);
++ }
++ while (0);
++ U_f[0] |= _sticky;
++ }
++ while (0);
++ else
++ U_e--;
++ break;
++ case (((3) << 2) | (3)):
++ do
++ {
++ if (((X_f[3]) & ((unsigned long) 1 << (113 - 2) % 32))
++ && !((Y_f[3]) & ((unsigned long) 1 << (113 - 2) % 32)))
++ {
++ U_s = Y_s;
++ (U_f[0] = Y_f[0], U_f[1] = Y_f[1], U_f[2] = Y_f[2], U_f[3] =
++ Y_f[3]);
++ }
++ else
++ {
++ U_s = X_s;
++ (U_f[0] = X_f[0], U_f[1] = X_f[1], U_f[2] = X_f[2], U_f[3] =
++ X_f[3]);
++ }
++ U_c = 3;
++ }
++ while (0);
++ break;
++ case (((3) << 2) | (0)):
++ case (((3) << 2) | (2)):
++ case (((3) << 2) | (1)):
++ U_s = X_s;
++ case (((2) << 2) | (2)):
++ case (((2) << 2) | (0)):
++ case (((1) << 2) | (0)):
++ case (((1) << 2) | (1)):
++ (U_f[0] = X_f[0], U_f[1] = X_f[1], U_f[2] = X_f[2], U_f[3] =
++ X_f[3]);
++ U_c = X_c;
++ break;
++ case (((0) << 2) | (3)):
++ case (((2) << 2) | (3)):
++ case (((1) << 2) | (3)):
++ U_s = Y_s;
++ case (((0) << 2) | (2)):
++ case (((0) << 2) | (1)):
++ (U_f[0] = Y_f[0], U_f[1] = Y_f[1], U_f[2] = Y_f[2], U_f[3] =
++ Y_f[3]);
++ U_c = Y_c;
++ break;
++ case (((2) << 2) | (1)):
++ case (((1) << 2) | (2)):
++ U_s = 0;
++ U_c = 3;
++ (U_f[3] =
++ ((((unsigned long) 1 << (113 - 2) % 32) << 1) - 1), U_f[2] =
++ -1, U_f[1] = -1, U_f[0] = -1);
++ _fex |= (0);
++ break;
++ default:
++ abort ();
++ }
++ }
++ while (0);
++
++/* FP_PACK_Q(u,U) */
++ do
++ {
++ do
++ {
++ switch (U_c)
++ {
++ case 0:
++ U_e += 16383;
++ if (U_e > 0)
++ {
++ do
++ {
++ if ((U_f[0]) & 7)
++ _fex |= (0);
++ switch (0)
++ {
++ case 0:
++ do
++ {
++ if (((U_f[0]) & 15) != ((unsigned long) 1 << 2))
++ do
++ {
++ unsigned long _t;
++ _t =
++ ((U_f[0] +=
++ ((unsigned long) 1 << 2)) <
++ ((unsigned long) 1 << 2));
++ U_f[1] += _t;
++ _t = (U_f[1] < _t);
++ U_f[2] += _t;
++ _t = (U_f[2] < _t);
++ U_f[3] += _t;
++ }
++ while (0);
++ }
++ while (0);
++ break;
++ case 1:
++ (void) 0;
++ break;
++ case 2:
++ do
++ {
++ if (!U_s && ((U_f[0]) & 7))
++ do
++ {
++ unsigned long _t;
++ _t =
++ ((U_f[0] +=
++ ((unsigned long) 1 << 3)) <
++ ((unsigned long) 1 << 3));
++ U_f[1] += _t;
++ _t = (U_f[1] < _t);
++ U_f[2] += _t;
++ _t = (U_f[2] < _t);
++ U_f[3] += _t;
++ }
++ while (0);
++ }
++ while (0);
++ break;
++ case 3:
++ do
++ {
++ if (U_s && ((U_f[0]) & 7))
++ do
++ {
++ unsigned long _t;
++ _t =
++ ((U_f[0] +=
++ ((unsigned long) 1 << 3)) <
++ ((unsigned long) 1 << 3));
++ U_f[1] += _t;
++ _t = (U_f[1] < _t);
++ U_f[2] += _t;
++ _t = (U_f[2] < _t);
++ U_f[3] += _t;
++ }
++ while (0);
++ }
++ while (0);
++ break;
++ }
++ }
++ while (0);
++ if (((U_f[3]) & ((unsigned long) 1 << ((3 + 113) % 32))))
++ {
++ ((U_f[3]) &= ~((unsigned long) 1 << ((3 + 113) % 32)));
++ U_e++;
++ }
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = (3) / 32;
++ _down = (3) % 32;
++ _up = 32 - _down;
++ if (!_down)
++ for (_i = 0; _i <= 3 - _skip; ++_i)
++ U_f[_i] = U_f[_i + _skip];
++ else
++ {
++ for (_i = 0; _i < 3 - _skip; ++_i)
++ U_f[_i] =
++ U_f[_i + _skip] >> _down | U_f[_i + _skip +
++ 1] << _up;
++ U_f[_i++] = U_f[3] >> _down;
++ }
++ for (; _i < 4; ++_i)
++ U_f[_i] = 0;
++ }
++ while (0);
++ if (U_e >= 32767)
++ {
++ switch (0)
++ {
++ case 0:
++ U_c = 2;
++ break;
++ case 2:
++ if (!U_s)
++ U_c = 2;
++ break;
++ case 3:
++ if (U_s)
++ U_c = 2;
++ break;
++ }
++ if (U_c == 2)
++ {
++ U_e = 32767;
++ (U_f[3] = 0, U_f[2] = 0, U_f[1] = 0, U_f[0] = 0);
++ }
++ else
++ {
++ U_e = 32767 - 1;
++ (U_f[3] = (~(signed long) 0), U_f[2] =
++ (~(signed long) 0), U_f[1] =
++ (~(signed long) 0), U_f[0] = (~(signed long) 0));
++ } _fex |= (0);
++ _fex |= (0);
++ }
++ }
++ else
++ {
++ U_e = -U_e + 1;
++ if (U_e <= (3 + 113))
++ {
++ do
++ {
++ int _sticky;
++ do
++ {
++ long _up, _down, _skip, _i;
++ unsigned long _s;
++ _skip = (U_e) / 32;
++ _down = (U_e) % 32;
++ _up = 32 - _down;
++ for (_s = _i = 0; _i < _skip; ++_i)
++ _s |= U_f[_i];
++ if (!_down)
++ for (_i = 0; _i <= 3 - _skip; ++_i)
++ U_f[_i] = U_f[_i + _skip];
++ else
++ {
++ _s |= U_f[_i] << _up;
++ for (_i = 0; _i < 3 - _skip; ++_i)
++ U_f[_i] =
++ U_f[_i + _skip] >> _down | U_f[_i +
++ _skip +
++ 1] <<
++ _up;
++ U_f[_i++] = U_f[3] >> _down;
++ }
++ for (; _i < 4; ++_i)
++ U_f[_i] = 0;
++ _sticky = (_s != 0);
++ }
++ while (0);
++ U_f[0] |= _sticky;
++ }
++ while (0);
++ do
++ {
++ if ((U_f[0]) & 7)
++ _fex |= (0);
++ switch (0)
++ {
++ case 0:
++ do
++ {
++ if (((U_f[0]) & 15) !=
++ ((unsigned long) 1 << 2))
++ do
++ {
++ unsigned long _t;
++ _t =
++ ((U_f[0] +=
++ ((unsigned long) 1 << 2)) <
++ ((unsigned long) 1 << 2));
++ U_f[1] += _t;
++ _t = (U_f[1] < _t);
++ U_f[2] += _t;
++ _t = (U_f[2] < _t);
++ U_f[3] += _t;
++ }
++ while (0);
++ }
++ while (0);
++ break;
++ case 1:
++ (void) 0;
++ break;
++ case 2:
++ do
++ {
++ if (!U_s && ((U_f[0]) & 7))
++ do
++ {
++ unsigned long _t;
++ _t =
++ ((U_f[0] +=
++ ((unsigned long) 1 << 3)) <
++ ((unsigned long) 1 << 3));
++ U_f[1] += _t;
++ _t = (U_f[1] < _t);
++ U_f[2] += _t;
++ _t = (U_f[2] < _t);
++ U_f[3] += _t;
++ }
++ while (0);
++ }
++ while (0);
++ break;
++ case 3:
++ do
++ {
++ if (U_s && ((U_f[0]) & 7))
++ do
++ {
++ unsigned long _t;
++ _t =
++ ((U_f[0] +=
++ ((unsigned long) 1 << 3)) <
++ ((unsigned long) 1 << 3));
++ U_f[1] += _t;
++ _t = (U_f[1] < _t);
++ U_f[2] += _t;
++ _t = (U_f[2] < _t);
++ U_f[3] += _t;
++ }
++ while (0);
++ }
++ while (0);
++ break;
++ }
++ }
++ while (0);
++ if ((U_f[3]) &
++ (((unsigned long) 1 << ((3 + 113) % 32)) >> 1))
++ {
++ U_e = 1;
++ (U_f[3] = 0, U_f[2] = 0, U_f[1] = 0, U_f[0] = 0);
++ }
++ else
++ {
++ U_e = 0;
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = (3) / 32;
++ _down = (3) % 32;
++ _up = 32 - _down;
++ if (!_down)
++ for (_i = 0; _i <= 3 - _skip; ++_i)
++ U_f[_i] = U_f[_i + _skip];
++ else
++ {
++ for (_i = 0; _i < 3 - _skip; ++_i)
++ U_f[_i] =
++ U_f[_i + _skip] >> _down | U_f[_i +
++ _skip +
++ 1] <<
++ _up;
++ U_f[_i++] = U_f[3] >> _down;
++ }
++ for (; _i < 4; ++_i)
++ U_f[_i] = 0;
++ }
++ while (0);
++ _fex |= (0);
++ }
++ }
++ else
++ {
++ U_e = 0;
++ if (!((U_f[0] | U_f[1] | U_f[2] | U_f[3]) == 0))
++ {
++ (U_f[3] = 0, U_f[2] = 0, U_f[1] = 0, U_f[0] = 1);
++ do
++ {
++ if ((U_f[0]) & 7)
++ _fex |= (0);
++ switch (0)
++ {
++ case 0:
++ do
++ {
++ if (((U_f[0]) & 15) !=
++ ((unsigned long) 1 << 2))
++ do
++ {
++ unsigned long _t;
++ _t =
++ ((U_f[0] +=
++ ((unsigned long) 1 << 2)) <
++ ((unsigned long) 1 << 2));
++ U_f[1] += _t;
++ _t = (U_f[1] < _t);
++ U_f[2] += _t;
++ _t = (U_f[2] < _t);
++ U_f[3] += _t;
++ }
++ while (0);
++ }
++ while (0);
++ break;
++ case 1:
++ (void) 0;
++ break;
++ case 2:
++ do
++ {
++ if (!U_s && ((U_f[0]) & 7))
++ do
++ {
++ unsigned long _t;
++ _t =
++ ((U_f[0] +=
++ ((unsigned long) 1 << 3)) <
++ ((unsigned long) 1 << 3));
++ U_f[1] += _t;
++ _t = (U_f[1] < _t);
++ U_f[2] += _t;
++ _t = (U_f[2] < _t);
++ U_f[3] += _t;
++ }
++ while (0);
++ }
++ while (0);
++ break;
++ case 3:
++ do
++ {
++ if (U_s && ((U_f[0]) & 7))
++ do
++ {
++ unsigned long _t;
++ _t =
++ ((U_f[0] +=
++ ((unsigned long) 1 << 3)) <
++ ((unsigned long) 1 << 3));
++ U_f[1] += _t;
++ _t = (U_f[1] < _t);
++ U_f[2] += _t;
++ _t = (U_f[2] < _t);
++ U_f[3] += _t;
++ }
++ while (0);
++ }
++ while (0);
++ break;
++ }
++ }
++ while (0);
++ (U_f[0]) >>= (3);
++ }
++ _fex |= (0);
++ }
++ }
++ break;
++ case 1:
++ U_e = 0;
++ (U_f[3] = 0, U_f[2] = 0, U_f[1] = 0, U_f[0] = 0);
++ break;
++ case 2:
++ U_e = 32767;
++ (U_f[3] = 0, U_f[2] = 0, U_f[1] = 0, U_f[0] = 0);
++ break;
++ case 3:
++ U_e = 32767;
++ if (!1)
++ {
++ (U_f[3] =
++ ((((unsigned long) 1 << (113 - 2) % 32) << 1) - 1),
++ U_f[2] = -1, U_f[1] = -1, U_f[0] = -1);
++ U_s = 0;
++ }
++ else
++ (U_f[3]) |= ((unsigned long) 1 << (113 - 2) % 32);
++ break;
++ }
++ }
++ while (0);
++ do
++ {
++ union _FP_UNION_Q _flo;
++ _flo.bits.frac0 = U_f[0];
++ _flo.bits.frac1 = U_f[1];
++ _flo.bits.frac2 = U_f[2];
++ _flo.bits.frac3 = U_f[3];
++ _flo.bits.exp = U_e;
++ _flo.bits.sign = U_s;
++ (u) = _flo.flt;
++ }
++ while (0);
++ }
++ while (0);
++
++/* FP_HANDLE_EXCEPTIONS */
++ do
++ {
++ }
++ while (0);
++
++ /* Subtract. */
++/* FP_INIT_ROUNDMODE */
++ do
++ {
++ }
++ while (0);
++
++/* FP_UNPACK_SEMIRAW_Q(U,u) */
++ do
++ {
++ do
++ {
++ union _FP_UNION_Q _flo;
++ _flo.flt = (u);
++ U_f[0] = _flo.bits.frac0;
++ U_f[1] = _flo.bits.frac1;
++ U_f[2] = _flo.bits.frac2;
++ U_f[3] = _flo.bits.frac3;
++ U_e = _flo.bits.exp;
++ U_s = _flo.bits.sign;
++ }
++ while (0);
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = (3) / 32;
++ _up = (3) % 32;
++ _down = 32 - _up;
++ if (!_up)
++ for (_i = 3; _i >= _skip; --_i)
++ U_f[_i] = U_f[_i - _skip];
++ else
++ {
++ for (_i = 3; _i > _skip; --_i)
++ U_f[_i] =
++ U_f[_i - _skip] << _up | U_f[_i - _skip - 1] >> _down;
++ U_f[_i--] = U_f[0] << _up;
++ }
++ for (; _i >= 0; --_i)
++ U_f[_i] = 0;
++ }
++ while (0);
++ }
++ while (0);
++
++/* FP_UNPACK_SEMIRAW_Q(Z,z) */
++ do
++ {
++ do
++ {
++ union _FP_UNION_Q _flo;
++ _flo.flt = (z);
++ Z_f[0] = _flo.bits.frac0;
++ Z_f[1] = _flo.bits.frac1;
++ Z_f[2] = _flo.bits.frac2;
++ Z_f[3] = _flo.bits.frac3;
++ Z_e = _flo.bits.exp;
++ Z_s = _flo.bits.sign;
++ }
++ while (0);
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = (3) / 32;
++ _up = (3) % 32;
++ _down = 32 - _up;
++ if (!_up)
++ for (_i = 3; _i >= _skip; --_i)
++ Z_f[_i] = Z_f[_i - _skip];
++ else
++ {
++ for (_i = 3; _i > _skip; --_i)
++ Z_f[_i] =
++ Z_f[_i - _skip] << _up | Z_f[_i - _skip - 1] >> _down;
++ Z_f[_i--] = Z_f[0] << _up;
++ }
++ for (; _i >= 0; --_i)
++ Z_f[_i] = 0;
++ }
++ while (0);
++ }
++ while (0);
++
++/* FP_SUB_Q(V,U,Z) */
++ do
++ {
++ if (!(Z_e == 32767 && !((Z_f[0] | Z_f[1] | Z_f[2] | Z_f[3]) == 0)))
++ Z_s ^= 1;
++ do
++ {
++ if (U_s == Z_s)
++ {
++ V_s = U_s;
++ int ediff = U_e - Z_e;
++ if (ediff > 0)
++ {
++ V_e = U_e;
++ if (Z_e == 0)
++ {
++ if (((Z_f[0] | Z_f[1] | Z_f[2] | Z_f[3]) == 0))
++ {
++ do
++ {
++ if (U_e == 32767
++ && !((U_f[0] | U_f[1] | U_f[2] | U_f[3]) ==
++ 0)
++ && !((U_f[3]) &
++ ((unsigned long) 1 << (113 - 2 + 3) %
++ 32)))
++ _fex |= (0);
++ }
++ while (0);
++ (V_f[0] = U_f[0], V_f[1] = U_f[1], V_f[2] =
++ U_f[2], V_f[3] = U_f[3]);
++ goto add_done;
++ }
++ else
++ {
++ _fex |= (0);
++ ediff--;
++ if (ediff == 0)
++ {
++ do
++ {
++ unsigned long _c1, _c2, _c3;
++ V_f[0] = U_f[0] + Z_f[0];
++ _c1 = V_f[0] < U_f[0];
++ V_f[1] = U_f[1] + Z_f[1];
++ _c2 = V_f[1] < U_f[1];
++ V_f[1] += _c1;
++ _c2 |= V_f[1] < _c1;
++ V_f[2] = U_f[2] + Z_f[2];
++ _c3 = V_f[2] < U_f[2];
++ V_f[2] += _c2;
++ _c3 |= V_f[2] < _c2;
++ V_f[3] = U_f[3] + Z_f[3] + _c3;
++ }
++ while (0);
++ goto add3;
++ }
++ if (U_e == 32767)
++ {
++ do
++ {
++ if (U_e == 32767
++ && !((U_f[0] | U_f[1] | U_f[2] | U_f[3])
++ == 0)
++ && !((U_f[3]) &
++ ((unsigned long) 1 << (113 - 2 + 3)
++ % 32)))
++ _fex |= (0);
++ }
++ while (0);
++ (V_f[0] = U_f[0], V_f[1] = U_f[1], V_f[2] =
++ U_f[2], V_f[3] = U_f[3]);
++ goto add_done;
++ }
++ goto add1;
++ }
++ }
++ else if (U_e == 32767)
++ {
++ do
++ {
++ if (U_e == 32767
++ && !((U_f[0] | U_f[1] | U_f[2] | U_f[3]) == 0)
++ && !((U_f[3]) &
++ ((unsigned long) 1 << (113 - 2 + 3) % 32)))
++ _fex |= (0);
++ }
++ while (0);
++ (V_f[0] = U_f[0], V_f[1] = U_f[1], V_f[2] =
++ U_f[2], V_f[3] = U_f[3]);
++ goto add_done;
++ }
++ (Z_f[3]) |= ((unsigned long) 1 << (113 - 1 + 3) % 32);
++ add1:if (ediff <= (3 + 113))
++ do
++ {
++ int _sticky;
++ do
++ {
++ long _up, _down, _skip, _i;
++ unsigned long _s;
++ _skip = (ediff) / 32;
++ _down = (ediff) % 32;
++ _up = 32 - _down;
++ for (_s = _i = 0; _i < _skip; ++_i)
++ _s |= Z_f[_i];
++ if (!_down)
++ for (_i = 0; _i <= 3 - _skip; ++_i)
++ Z_f[_i] = Z_f[_i + _skip];
++ else
++ {
++ _s |= Z_f[_i] << _up;
++ for (_i = 0; _i < 3 - _skip; ++_i)
++ Z_f[_i] =
++ Z_f[_i + _skip] >> _down | Z_f[_i +
++ _skip +
++ 1] << _up;
++ Z_f[_i++] = Z_f[3] >> _down;
++ }
++ for (; _i < 4; ++_i)
++ Z_f[_i] = 0;
++ _sticky = (_s != 0);
++ }
++ while (0);
++ Z_f[0] |= _sticky;
++ }
++ while (0);
++ else if (!((Z_f[0] | Z_f[1] | Z_f[2] | Z_f[3]) == 0))
++ (Z_f[3] = 0, Z_f[2] = 0, Z_f[1] = 0, Z_f[0] = 1);
++ do
++ {
++ unsigned long _c1, _c2, _c3;
++ V_f[0] = U_f[0] + Z_f[0];
++ _c1 = V_f[0] < U_f[0];
++ V_f[1] = U_f[1] + Z_f[1];
++ _c2 = V_f[1] < U_f[1];
++ V_f[1] += _c1;
++ _c2 |= V_f[1] < _c1;
++ V_f[2] = U_f[2] + Z_f[2];
++ _c3 = V_f[2] < U_f[2];
++ V_f[2] += _c2;
++ _c3 |= V_f[2] < _c2;
++ V_f[3] = U_f[3] + Z_f[3] + _c3;
++ }
++ while (0);
++ }
++ else if (ediff < 0)
++ {
++ ediff = -ediff;
++ V_e = Z_e;
++ if (U_e == 0)
++ {
++ if (((U_f[0] | U_f[1] | U_f[2] | U_f[3]) == 0))
++ {
++ do
++ {
++ if (Z_e == 32767
++ && !((Z_f[0] | Z_f[1] | Z_f[2] | Z_f[3]) ==
++ 0)
++ && !((Z_f[3]) &
++ ((unsigned long) 1 << (113 - 2 + 3) %
++ 32)))
++ _fex |= (0);
++ }
++ while (0);
++ (V_f[0] = Z_f[0], V_f[1] = Z_f[1], V_f[2] =
++ Z_f[2], V_f[3] = Z_f[3]);
++ goto add_done;
++ }
++ else
++ {
++ _fex |= (0);
++ ediff--;
++ if (ediff == 0)
++ {
++ do
++ {
++ unsigned long _c1, _c2, _c3;
++ V_f[0] = Z_f[0] + U_f[0];
++ _c1 = V_f[0] < Z_f[0];
++ V_f[1] = Z_f[1] + U_f[1];
++ _c2 = V_f[1] < Z_f[1];
++ V_f[1] += _c1;
++ _c2 |= V_f[1] < _c1;
++ V_f[2] = Z_f[2] + U_f[2];
++ _c3 = V_f[2] < Z_f[2];
++ V_f[2] += _c2;
++ _c3 |= V_f[2] < _c2;
++ V_f[3] = Z_f[3] + U_f[3] + _c3;
++ }
++ while (0);
++ goto add3;
++ }
++ if (Z_e == 32767)
++ {
++ do
++ {
++ if (Z_e == 32767
++ && !((Z_f[0] | Z_f[1] | Z_f[2] | Z_f[3])
++ == 0)
++ && !((Z_f[3]) &
++ ((unsigned long) 1 << (113 - 2 + 3)
++ % 32)))
++ _fex |= (0);
++ }
++ while (0);
++ (V_f[0] = Z_f[0], V_f[1] = Z_f[1], V_f[2] =
++ Z_f[2], V_f[3] = Z_f[3]);
++ goto add_done;
++ }
++ goto add2;
++ }
++ }
++ else if (Z_e == 32767)
++ {
++ do
++ {
++ if (Z_e == 32767
++ && !((Z_f[0] | Z_f[1] | Z_f[2] | Z_f[3]) == 0)
++ && !((Z_f[3]) &
++ ((unsigned long) 1 << (113 - 2 + 3) % 32)))
++ _fex |= (0);
++ }
++ while (0);
++ (V_f[0] = Z_f[0], V_f[1] = Z_f[1], V_f[2] =
++ Z_f[2], V_f[3] = Z_f[3]);
++ goto add_done;
++ }
++ (U_f[3]) |= ((unsigned long) 1 << (113 - 1 + 3) % 32);
++ add2:if (ediff <= (3 + 113))
++ do
++ {
++ int _sticky;
++ do
++ {
++ long _up, _down, _skip, _i;
++ unsigned long _s;
++ _skip = (ediff) / 32;
++ _down = (ediff) % 32;
++ _up = 32 - _down;
++ for (_s = _i = 0; _i < _skip; ++_i)
++ _s |= U_f[_i];
++ if (!_down)
++ for (_i = 0; _i <= 3 - _skip; ++_i)
++ U_f[_i] = U_f[_i + _skip];
++ else
++ {
++ _s |= U_f[_i] << _up;
++ for (_i = 0; _i < 3 - _skip; ++_i)
++ U_f[_i] =
++ U_f[_i + _skip] >> _down | U_f[_i +
++ _skip +
++ 1] << _up;
++ U_f[_i++] = U_f[3] >> _down;
++ }
++ for (; _i < 4; ++_i)
++ U_f[_i] = 0;
++ _sticky = (_s != 0);
++ }
++ while (0);
++ U_f[0] |= _sticky;
++ }
++ while (0);
++ else if (!((U_f[0] | U_f[1] | U_f[2] | U_f[3]) == 0))
++ (U_f[3] = 0, U_f[2] = 0, U_f[1] = 0, U_f[0] = 1);
++ do
++ {
++ unsigned long _c1, _c2, _c3;
++ V_f[0] = Z_f[0] + U_f[0];
++ _c1 = V_f[0] < Z_f[0];
++ V_f[1] = Z_f[1] + U_f[1];
++ _c2 = V_f[1] < Z_f[1];
++ V_f[1] += _c1;
++ _c2 |= V_f[1] < _c1;
++ V_f[2] = Z_f[2] + U_f[2];
++ _c3 = V_f[2] < Z_f[2];
++ V_f[2] += _c2;
++ _c3 |= V_f[2] < _c2;
++ V_f[3] = Z_f[3] + U_f[3] + _c3;
++ }
++ while (0);
++ }
++ else
++ {
++ if (!(((U_e + 1) & 32767) > 1))
++ {
++ if (U_e == 0)
++ {
++ V_e = 0;
++ if (((U_f[0] | U_f[1] | U_f[2] | U_f[3]) == 0))
++ {
++ if (!((Z_f[0] | Z_f[1] | Z_f[2] | Z_f[3]) == 0))
++ _fex |= (0);
++ (V_f[0] = Z_f[0], V_f[1] = Z_f[1], V_f[2] =
++ Z_f[2], V_f[3] = Z_f[3]);
++ goto add_done;
++ }
++ else if (((Z_f[0] | Z_f[1] | Z_f[2] | Z_f[3]) == 0))
++ {
++ _fex |= (0);
++ (V_f[0] = U_f[0], V_f[1] = U_f[1], V_f[2] =
++ U_f[2], V_f[3] = U_f[3]);
++ goto add_done;
++ }
++ else
++ {
++ _fex |= (0);
++ do
++ {
++ unsigned long _c1, _c2, _c3;
++ V_f[0] = U_f[0] + Z_f[0];
++ _c1 = V_f[0] < U_f[0];
++ V_f[1] = U_f[1] + Z_f[1];
++ _c2 = V_f[1] < U_f[1];
++ V_f[1] += _c1;
++ _c2 |= V_f[1] < _c1;
++ V_f[2] = U_f[2] + Z_f[2];
++ _c3 = V_f[2] < U_f[2];
++ V_f[2] += _c2;
++ _c3 |= V_f[2] < _c2;
++ V_f[3] = U_f[3] + Z_f[3] + _c3;
++ }
++ while (0);
++ if ((V_f[3]) &
++ ((unsigned long) 1 << (113 - 1 + 3) % 32))
++ {
++ (V_f[3]) &=
++ ~(unsigned long) ((unsigned long) 1 <<
++ (113 - 1 + 3) % 32);
++ V_e = 1;
++ }
++ goto add_done;
++ }
++ }
++ else
++ {
++ do
++ {
++ if (U_e == 32767
++ && !((U_f[0] | U_f[1] | U_f[2] | U_f[3]) ==
++ 0)
++ && !((U_f[3]) &
++ ((unsigned long) 1 << (113 - 2 + 3) %
++ 32)))
++ _fex |= (0);
++ }
++ while (0);
++ do
++ {
++ if (Z_e == 32767
++ && !((Z_f[0] | Z_f[1] | Z_f[2] | Z_f[3]) ==
++ 0)
++ && !((Z_f[3]) &
++ ((unsigned long) 1 << (113 - 2 + 3) %
++ 32)))
++ _fex |= (0);
++ }
++ while (0);
++ V_e = 32767;
++ if (((U_f[0] | U_f[1] | U_f[2] | U_f[3]) == 0))
++ (V_f[0] = Z_f[0], V_f[1] = Z_f[1], V_f[2] =
++ Z_f[2], V_f[3] = Z_f[3]);
++ else if (((Z_f[0] | Z_f[1] | Z_f[2] | Z_f[3]) == 0))
++ (V_f[0] = U_f[0], V_f[1] = U_f[1], V_f[2] =
++ U_f[2], V_f[3] = U_f[3]);
++ else
++ do
++ {
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = (3) / 32;
++ _down = (3) % 32;
++ _up = 32 - _down;
++ if (!_down)
++ for (_i = 0; _i <= 3 - _skip; ++_i)
++ U_f[_i] = U_f[_i + _skip];
++ else
++ {
++ for (_i = 0; _i < 3 - _skip; ++_i)
++ U_f[_i] =
++ U_f[_i +
++ _skip] >> _down | U_f[_i +
++ _skip +
++ 1] <<
++ _up;
++ U_f[_i++] = U_f[3] >> _down;
++ }
++ for (; _i < 4; ++_i)
++ U_f[_i] = 0;
++ }
++ while (0);
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = (3) / 32;
++ _down = (3) % 32;
++ _up = 32 - _down;
++ if (!_down)
++ for (_i = 0; _i <= 3 - _skip; ++_i)
++ Z_f[_i] = Z_f[_i + _skip];
++ else
++ {
++ for (_i = 0; _i < 3 - _skip; ++_i)
++ Z_f[_i] =
++ Z_f[_i +
++ _skip] >> _down | Z_f[_i +
++ _skip +
++ 1] <<
++ _up;
++ Z_f[_i++] = Z_f[3] >> _down;
++ }
++ for (; _i < 4; ++_i)
++ Z_f[_i] = 0;
++ }
++ while (0);
++ do
++ {
++ if (((U_f[3]) &
++ ((unsigned long) 1 << (113 - 2) %
++ 32))
++ && !((Z_f[3]) &
++ ((unsigned long) 1 << (113 - 2) %
++ 32)))
++ {
++ V_s = Z_s;
++ (V_f[0] = Z_f[0], V_f[1] =
++ Z_f[1], V_f[2] = Z_f[2], V_f[3] =
++ Z_f[3]);
++ }
++ else
++ {
++ V_s = U_s;
++ (V_f[0] = U_f[0], V_f[1] =
++ U_f[1], V_f[2] = U_f[2], V_f[3] =
++ U_f[3]);
++ }
++ V_c = 3;
++ }
++ while (0);
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = (3) / 32;
++ _up = (3) % 32;
++ _down = 32 - _up;
++ if (!_up)
++ for (_i = 3; _i >= _skip; --_i)
++ V_f[_i] = V_f[_i - _skip];
++ else
++ {
++ for (_i = 3; _i > _skip; --_i)
++ V_f[_i] =
++ V_f[_i - _skip] << _up | V_f[_i -
++ _skip
++ -
++ 1] >>
++ _down;
++ V_f[_i--] = V_f[0] << _up;
++ }
++ for (; _i >= 0; --_i)
++ V_f[_i] = 0;
++ }
++ while (0);
++ }
++ while (0);
++ goto add_done;
++ }
++ }
++ do
++ {
++ unsigned long _c1, _c2, _c3;
++ V_f[0] = U_f[0] + Z_f[0];
++ _c1 = V_f[0] < U_f[0];
++ V_f[1] = U_f[1] + Z_f[1];
++ _c2 = V_f[1] < U_f[1];
++ V_f[1] += _c1;
++ _c2 |= V_f[1] < _c1;
++ V_f[2] = U_f[2] + Z_f[2];
++ _c3 = V_f[2] < U_f[2];
++ V_f[2] += _c2;
++ _c3 |= V_f[2] < _c2;
++ V_f[3] = U_f[3] + Z_f[3] + _c3;
++ }
++ while (0);
++ V_e = U_e + 1;
++ do
++ {
++ int _sticky;
++ do
++ {
++ long _up, _down, _skip, _i;
++ unsigned long _s;
++ _skip = (1) / 32;
++ _down = (1) % 32;
++ _up = 32 - _down;
++ for (_s = _i = 0; _i < _skip; ++_i)
++ _s |= V_f[_i];
++ if (!_down)
++ for (_i = 0; _i <= 3 - _skip; ++_i)
++ V_f[_i] = V_f[_i + _skip];
++ else
++ {
++ _s |= V_f[_i] << _up;
++ for (_i = 0; _i < 3 - _skip; ++_i)
++ V_f[_i] =
++ V_f[_i + _skip] >> _down | V_f[_i + _skip +
++ 1] << _up;
++ V_f[_i++] = V_f[3] >> _down;
++ }
++ for (; _i < 4; ++_i)
++ V_f[_i] = 0;
++ _sticky = (_s != 0);
++ }
++ while (0);
++ V_f[0] |= _sticky;
++ }
++ while (0);
++ if (V_e == 32767)
++ do
++ {
++ if (0 == 0 || (0 == 2 && !V_s) || (0 == 3 && V_s))
++ {
++ V_e = 32767;
++ (V_f[3] = 0, V_f[2] = 0, V_f[1] = 0, V_f[0] = 0);
++ }
++ else
++ {
++ V_e = 32767 - 1;
++ _fex |= (0);
++ _fex |= (0);
++ (V_f[3] = (~(signed long) 0), V_f[2] =
++ (~(signed long) 0), V_f[1] =
++ (~(signed long) 0), V_f[0] = (~(signed long) 0));
++ }
++ }
++ while (0);
++ goto add_done;
++ }
++ add3:if ((V_f[3]) &
++ ((unsigned long) 1 << (113 - 1 + 3) % 32))
++ {
++ (V_f[3]) &=
++ ~(unsigned long) ((unsigned long) 1 << (113 - 1 + 3) %
++ 32);
++ V_e++;
++ do
++ {
++ int _sticky;
++ do
++ {
++ long _up, _down, _skip, _i;
++ unsigned long _s;
++ _skip = (1) / 32;
++ _down = (1) % 32;
++ _up = 32 - _down;
++ for (_s = _i = 0; _i < _skip; ++_i)
++ _s |= V_f[_i];
++ if (!_down)
++ for (_i = 0; _i <= 3 - _skip; ++_i)
++ V_f[_i] = V_f[_i + _skip];
++ else
++ {
++ _s |= V_f[_i] << _up;
++ for (_i = 0; _i < 3 - _skip; ++_i)
++ V_f[_i] =
++ V_f[_i + _skip] >> _down | V_f[_i + _skip +
++ 1] << _up;
++ V_f[_i++] = V_f[3] >> _down;
++ }
++ for (; _i < 4; ++_i)
++ V_f[_i] = 0;
++ _sticky = (_s != 0);
++ }
++ while (0);
++ V_f[0] |= _sticky;
++ }
++ while (0);
++ if (V_e == 32767)
++ do
++ {
++ if (0 == 0 || (0 == 2 && !V_s) || (0 == 3 && V_s))
++ {
++ V_e = 32767;
++ (V_f[3] = 0, V_f[2] = 0, V_f[1] = 0, V_f[0] = 0);
++ }
++ else
++ {
++ V_e = 32767 - 1;
++ _fex |= (0);
++ _fex |= (0);
++ (V_f[3] = (~(signed long) 0), V_f[2] =
++ (~(signed long) 0), V_f[1] =
++ (~(signed long) 0), V_f[0] = (~(signed long) 0));
++ }
++ }
++ while (0);
++ }
++ add_done:;
++ }
++ else
++ {
++ int ediff = U_e - Z_e;
++ if (ediff > 0)
++ {
++ V_e = U_e;
++ V_s = U_s;
++ if (Z_e == 0)
++ {
++ if (((Z_f[0] | Z_f[1] | Z_f[2] | Z_f[3]) == 0))
++ {
++ do
++ {
++ if (U_e == 32767
++ && !((U_f[0] | U_f[1] | U_f[2] | U_f[3]) ==
++ 0)
++ && !((U_f[3]) &
++ ((unsigned long) 1 << (113 - 2 + 3) %
++ 32)))
++ _fex |= (0);
++ }
++ while (0);
++ (V_f[0] = U_f[0], V_f[1] = U_f[1], V_f[2] =
++ U_f[2], V_f[3] = U_f[3]);
++ goto sub_done;
++ }
++ else
++ {
++ _fex |= (0);
++ ediff--;
++ if (ediff == 0)
++ {
++ do
++ {
++ unsigned long _c1, _c2, _c3;
++ V_f[0] = U_f[0] - Z_f[0];
++ _c1 = V_f[0] > U_f[0];
++ V_f[1] = U_f[1] - Z_f[1];
++ _c2 = V_f[1] > U_f[1];
++ V_f[1] -= _c1;
++ _c2 |= _c1 && (Z_f[1] == U_f[1]);
++ V_f[2] = U_f[2] - Z_f[2];
++ _c3 = V_f[2] > U_f[2];
++ V_f[2] -= _c2;
++ _c3 |= _c2 && (Z_f[2] == U_f[2]);
++ V_f[3] = U_f[3] - Z_f[3] - _c3;
++ }
++ while (0);
++ goto sub3;
++ }
++ if (U_e == 32767)
++ {
++ do
++ {
++ if (U_e == 32767
++ && !((U_f[0] | U_f[1] | U_f[2] | U_f[3])
++ == 0)
++ && !((U_f[3]) &
++ ((unsigned long) 1 << (113 - 2 + 3)
++ % 32)))
++ _fex |= (0);
++ }
++ while (0);
++ (V_f[0] = U_f[0], V_f[1] = U_f[1], V_f[2] =
++ U_f[2], V_f[3] = U_f[3]);
++ goto sub_done;
++ }
++ goto sub1;
++ }
++ }
++ else if (U_e == 32767)
++ {
++ do
++ {
++ if (U_e == 32767
++ && !((U_f[0] | U_f[1] | U_f[2] | U_f[3]) == 0)
++ && !((U_f[3]) &
++ ((unsigned long) 1 << (113 - 2 + 3) % 32)))
++ _fex |= (0);
++ }
++ while (0);
++ (V_f[0] = U_f[0], V_f[1] = U_f[1], V_f[2] =
++ U_f[2], V_f[3] = U_f[3]);
++ goto sub_done;
++ }
++ (Z_f[3]) |= ((unsigned long) 1 << (113 - 1 + 3) % 32);
++ sub1:if (ediff <= (3 + 113))
++ do
++ {
++ int _sticky;
++ do
++ {
++ long _up, _down, _skip, _i;
++ unsigned long _s;
++ _skip = (ediff) / 32;
++ _down = (ediff) % 32;
++ _up = 32 - _down;
++ for (_s = _i = 0; _i < _skip; ++_i)
++ _s |= Z_f[_i];
++ if (!_down)
++ for (_i = 0; _i <= 3 - _skip; ++_i)
++ Z_f[_i] = Z_f[_i + _skip];
++ else
++ {
++ _s |= Z_f[_i] << _up;
++ for (_i = 0; _i < 3 - _skip; ++_i)
++ Z_f[_i] =
++ Z_f[_i + _skip] >> _down | Z_f[_i +
++ _skip +
++ 1] << _up;
++ Z_f[_i++] = Z_f[3] >> _down;
++ }
++ for (; _i < 4; ++_i)
++ Z_f[_i] = 0;
++ _sticky = (_s != 0);
++ }
++ while (0);
++ Z_f[0] |= _sticky;
++ }
++ while (0);
++ else if (!((Z_f[0] | Z_f[1] | Z_f[2] | Z_f[3]) == 0))
++ (Z_f[3] = 0, Z_f[2] = 0, Z_f[1] = 0, Z_f[0] = 1);
++ do
++ {
++ unsigned long _c1, _c2, _c3;
++ V_f[0] = U_f[0] - Z_f[0];
++ _c1 = V_f[0] > U_f[0];
++ V_f[1] = U_f[1] - Z_f[1];
++ _c2 = V_f[1] > U_f[1];
++ V_f[1] -= _c1;
++ _c2 |= _c1 && (Z_f[1] == U_f[1]);
++ V_f[2] = U_f[2] - Z_f[2];
++ _c3 = V_f[2] > U_f[2];
++ V_f[2] -= _c2;
++ _c3 |= _c2 && (Z_f[2] == U_f[2]);
++ V_f[3] = U_f[3] - Z_f[3] - _c3;
++ }
++ while (0);
++ }
++ else if (ediff < 0)
++ {
++ ediff = -ediff;
++ V_e = Z_e;
++ V_s = Z_s;
++ if (U_e == 0)
++ {
++ if (((U_f[0] | U_f[1] | U_f[2] | U_f[3]) == 0))
++ {
++ do
++ {
++ if (Z_e == 32767
++ && !((Z_f[0] | Z_f[1] | Z_f[2] | Z_f[3]) ==
++ 0)
++ && !((Z_f[3]) &
++ ((unsigned long) 1 << (113 - 2 + 3) %
++ 32)))
++ _fex |= (0);
++ }
++ while (0);
++ (V_f[0] = Z_f[0], V_f[1] = Z_f[1], V_f[2] =
++ Z_f[2], V_f[3] = Z_f[3]);
++ goto sub_done;
++ }
++ else
++ {
++ _fex |= (0);
++ ediff--;
++ if (ediff == 0)
++ {
++ do
++ {
++ unsigned long _c1, _c2, _c3;
++ V_f[0] = Z_f[0] - U_f[0];
++ _c1 = V_f[0] > Z_f[0];
++ V_f[1] = Z_f[1] - U_f[1];
++ _c2 = V_f[1] > Z_f[1];
++ V_f[1] -= _c1;
++ _c2 |= _c1 && (U_f[1] == Z_f[1]);
++ V_f[2] = Z_f[2] - U_f[2];
++ _c3 = V_f[2] > Z_f[2];
++ V_f[2] -= _c2;
++ _c3 |= _c2 && (U_f[2] == Z_f[2]);
++ V_f[3] = Z_f[3] - U_f[3] - _c3;
++ }
++ while (0);
++ goto sub3;
++ }
++ if (Z_e == 32767)
++ {
++ do
++ {
++ if (Z_e == 32767
++ && !((Z_f[0] | Z_f[1] | Z_f[2] | Z_f[3])
++ == 0)
++ && !((Z_f[3]) &
++ ((unsigned long) 1 << (113 - 2 + 3)
++ % 32)))
++ _fex |= (0);
++ }
++ while (0);
++ (V_f[0] = Z_f[0], V_f[1] = Z_f[1], V_f[2] =
++ Z_f[2], V_f[3] = Z_f[3]);
++ goto sub_done;
++ }
++ goto sub2;
++ }
++ }
++ else if (Z_e == 32767)
++ {
++ do
++ {
++ if (Z_e == 32767
++ && !((Z_f[0] | Z_f[1] | Z_f[2] | Z_f[3]) == 0)
++ && !((Z_f[3]) &
++ ((unsigned long) 1 << (113 - 2 + 3) % 32)))
++ _fex |= (0);
++ }
++ while (0);
++ (V_f[0] = Z_f[0], V_f[1] = Z_f[1], V_f[2] =
++ Z_f[2], V_f[3] = Z_f[3]);
++ goto sub_done;
++ }
++ (U_f[3]) |= ((unsigned long) 1 << (113 - 1 + 3) % 32);
++ sub2:if (ediff <= (3 + 113))
++ do
++ {
++ int _sticky;
++ do
++ {
++ long _up, _down, _skip, _i;
++ unsigned long _s;
++ _skip = (ediff) / 32;
++ _down = (ediff) % 32;
++ _up = 32 - _down;
++ for (_s = _i = 0; _i < _skip; ++_i)
++ _s |= U_f[_i];
++ if (!_down)
++ for (_i = 0; _i <= 3 - _skip; ++_i)
++ U_f[_i] = U_f[_i + _skip];
++ else
++ {
++ _s |= U_f[_i] << _up;
++ for (_i = 0; _i < 3 - _skip; ++_i)
++ U_f[_i] =
++ U_f[_i + _skip] >> _down | U_f[_i +
++ _skip +
++ 1] << _up;
++ U_f[_i++] = U_f[3] >> _down;
++ }
++ for (; _i < 4; ++_i)
++ U_f[_i] = 0;
++ _sticky = (_s != 0);
++ }
++ while (0);
++ U_f[0] |= _sticky;
++ }
++ while (0);
++ else if (!((U_f[0] | U_f[1] | U_f[2] | U_f[3]) == 0))
++ (U_f[3] = 0, U_f[2] = 0, U_f[1] = 0, U_f[0] = 1);
++ do
++ {
++ unsigned long _c1, _c2, _c3;
++ V_f[0] = Z_f[0] - U_f[0];
++ _c1 = V_f[0] > Z_f[0];
++ V_f[1] = Z_f[1] - U_f[1];
++ _c2 = V_f[1] > Z_f[1];
++ V_f[1] -= _c1;
++ _c2 |= _c1 && (U_f[1] == Z_f[1]);
++ V_f[2] = Z_f[2] - U_f[2];
++ _c3 = V_f[2] > Z_f[2];
++ V_f[2] -= _c2;
++ _c3 |= _c2 && (U_f[2] == Z_f[2]);
++ V_f[3] = Z_f[3] - U_f[3] - _c3;
++ }
++ while (0);
++ }
++ else
++ {
++ if (!(((U_e + 1) & 32767) > 1))
++ {
++ if (U_e == 0)
++ {
++ V_e = 0;
++ if (((U_f[0] | U_f[1] | U_f[2] | U_f[3]) == 0))
++ {
++ (V_f[0] = Z_f[0], V_f[1] = Z_f[1], V_f[2] =
++ Z_f[2], V_f[3] = Z_f[3]);
++ if (((Z_f[0] | Z_f[1] | Z_f[2] | Z_f[3]) == 0))
++ V_s = (0 == 3);
++ else
++ {
++ _fex |= (0);
++ V_s = Z_s;
++ }
++ goto sub_done;
++ }
++ else if (((Z_f[0] | Z_f[1] | Z_f[2] | Z_f[3]) == 0))
++ {
++ _fex |= (0);
++ (V_f[0] = U_f[0], V_f[1] = U_f[1], V_f[2] =
++ U_f[2], V_f[3] = U_f[3]);
++ V_s = U_s;
++ goto sub_done;
++ }
++ else
++ {
++ _fex |= (0);
++ do
++ {
++ unsigned long _c1, _c2, _c3;
++ V_f[0] = U_f[0] - Z_f[0];
++ _c1 = V_f[0] > U_f[0];
++ V_f[1] = U_f[1] - Z_f[1];
++ _c2 = V_f[1] > U_f[1];
++ V_f[1] -= _c1;
++ _c2 |= _c1 && (Z_f[1] == U_f[1]);
++ V_f[2] = U_f[2] - Z_f[2];
++ _c3 = V_f[2] > U_f[2];
++ V_f[2] -= _c2;
++ _c3 |= _c2 && (Z_f[2] == U_f[2]);
++ V_f[3] = U_f[3] - Z_f[3] - _c3;
++ }
++ while (0);
++ V_s = U_s;
++ if ((V_f[3]) &
++ ((unsigned long) 1 << (113 - 1 + 3) % 32))
++ {
++ do
++ {
++ unsigned long _c1, _c2, _c3;
++ V_f[0] = Z_f[0] - U_f[0];
++ _c1 = V_f[0] > Z_f[0];
++ V_f[1] = Z_f[1] - U_f[1];
++ _c2 = V_f[1] > Z_f[1];
++ V_f[1] -= _c1;
++ _c2 |= _c1 && (U_f[1] == Z_f[1]);
++ V_f[2] = Z_f[2] - U_f[2];
++ _c3 = V_f[2] > Z_f[2];
++ V_f[2] -= _c2;
++ _c3 |= _c2 && (U_f[2] == Z_f[2]);
++ V_f[3] = Z_f[3] - U_f[3] - _c3;
++ }
++ while (0);
++ V_s = Z_s;
++ }
++ else
++ if (((V_f[0] | V_f[1] | V_f[2] | V_f[3]) ==
++ 0))
++ V_s = (0 == 3);
++ goto sub_done;
++ }
++ }
++ else
++ {
++ do
++ {
++ if (U_e == 32767
++ && !((U_f[0] | U_f[1] | U_f[2] | U_f[3]) ==
++ 0)
++ && !((U_f[3]) &
++ ((unsigned long) 1 << (113 - 2 + 3) %
++ 32)))
++ _fex |= (0);
++ }
++ while (0);
++ do
++ {
++ if (Z_e == 32767
++ && !((Z_f[0] | Z_f[1] | Z_f[2] | Z_f[3]) ==
++ 0)
++ && !((Z_f[3]) &
++ ((unsigned long) 1 << (113 - 2 + 3) %
++ 32)))
++ _fex |= (0);
++ }
++ while (0);
++ V_e = 32767;
++ if (((U_f[0] | U_f[1] | U_f[2] | U_f[3]) == 0))
++ {
++ if (((Z_f[0] | Z_f[1] | Z_f[2] | Z_f[3]) == 0))
++ {
++ V_s = 0;
++ (V_f[3] =
++ ((((unsigned long) 1 << (113 - 2) %
++ 32) << 1) - 1), V_f[2] = -1, V_f[1] =
++ -1, V_f[0] = -1);
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = (3) / 32;
++ _up = (3) % 32;
++ _down = 32 - _up;
++ if (!_up)
++ for (_i = 3; _i >= _skip; --_i)
++ V_f[_i] = V_f[_i - _skip];
++ else
++ {
++ for (_i = 3; _i > _skip; --_i)
++ V_f[_i] =
++ V_f[_i -
++ _skip] << _up | V_f[_i -
++ _skip -
++ 1] >>
++ _down;
++ V_f[_i--] = V_f[0] << _up;
++ }
++ for (; _i >= 0; --_i)
++ V_f[_i] = 0;
++ }
++ while (0);
++ _fex |= (0);
++ }
++ else
++ {
++ V_s = Z_s;
++ (V_f[0] = Z_f[0], V_f[1] = Z_f[1], V_f[2] =
++ Z_f[2], V_f[3] = Z_f[3]);
++ }
++ }
++ else
++ {
++ if (((Z_f[0] | Z_f[1] | Z_f[2] | Z_f[3]) == 0))
++ {
++ V_s = U_s;
++ (V_f[0] = U_f[0], V_f[1] = U_f[1], V_f[2] =
++ U_f[2], V_f[3] = U_f[3]);
++ }
++ else
++ {
++ do
++ {
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = (3) / 32;
++ _down = (3) % 32;
++ _up = 32 - _down;
++ if (!_down)
++ for (_i = 0; _i <= 3 - _skip;
++ ++_i)
++ U_f[_i] = U_f[_i + _skip];
++ else
++ {
++ for (_i = 0; _i < 3 - _skip;
++ ++_i)
++ U_f[_i] =
++ U_f[_i +
++ _skip] >> _down | U_f[_i
++ +
++ _skip
++ +
++ 1]
++ << _up;
++ U_f[_i++] = U_f[3] >> _down;
++ }
++ for (; _i < 4; ++_i)
++ U_f[_i] = 0;
++ }
++ while (0);
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = (3) / 32;
++ _down = (3) % 32;
++ _up = 32 - _down;
++ if (!_down)
++ for (_i = 0; _i <= 3 - _skip;
++ ++_i)
++ Z_f[_i] = Z_f[_i + _skip];
++ else
++ {
++ for (_i = 0; _i < 3 - _skip;
++ ++_i)
++ Z_f[_i] =
++ Z_f[_i +
++ _skip] >> _down | Z_f[_i
++ +
++ _skip
++ +
++ 1]
++ << _up;
++ Z_f[_i++] = Z_f[3] >> _down;
++ }
++ for (; _i < 4; ++_i)
++ Z_f[_i] = 0;
++ }
++ while (0);
++ do
++ {
++ if (((U_f[3]) &
++ ((unsigned long) 1 << (113 - 2)
++ % 32))
++ && !((Z_f[3]) &
++ ((unsigned long) 1 <<
++ (113 - 2) % 32)))
++ {
++ V_s = Z_s;
++ (V_f[0] = Z_f[0], V_f[1] =
++ Z_f[1], V_f[2] =
++ Z_f[2], V_f[3] = Z_f[3]);
++ }
++ else
++ {
++ V_s = U_s;
++ (V_f[0] = U_f[0], V_f[1] =
++ U_f[1], V_f[2] =
++ U_f[2], V_f[3] = U_f[3]);
++ }
++ V_c = 3;
++ }
++ while (0);
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = (3) / 32;
++ _up = (3) % 32;
++ _down = 32 - _up;
++ if (!_up)
++ for (_i = 3; _i >= _skip; --_i)
++ V_f[_i] = V_f[_i - _skip];
++ else
++ {
++ for (_i = 3; _i > _skip; --_i)
++ V_f[_i] =
++ V_f[_i -
++ _skip] << _up | V_f[_i -
++ _skip
++ -
++ 1]
++ >> _down;
++ V_f[_i--] = V_f[0] << _up;
++ }
++ for (; _i >= 0; --_i)
++ V_f[_i] = 0;
++ }
++ while (0);
++ }
++ while (0);
++ }
++ }
++ goto sub_done;
++ }
++ }
++ V_e = U_e;
++ do
++ {
++ unsigned long _c1, _c2, _c3;
++ V_f[0] = U_f[0] - Z_f[0];
++ _c1 = V_f[0] > U_f[0];
++ V_f[1] = U_f[1] - Z_f[1];
++ _c2 = V_f[1] > U_f[1];
++ V_f[1] -= _c1;
++ _c2 |= _c1 && (Z_f[1] == U_f[1]);
++ V_f[2] = U_f[2] - Z_f[2];
++ _c3 = V_f[2] > U_f[2];
++ V_f[2] -= _c2;
++ _c3 |= _c2 && (Z_f[2] == U_f[2]);
++ V_f[3] = U_f[3] - Z_f[3] - _c3;
++ }
++ while (0);
++ V_s = U_s;
++ if ((V_f[3]) & ((unsigned long) 1 << (113 - 1 + 3) % 32))
++ {
++ do
++ {
++ unsigned long _c1, _c2, _c3;
++ V_f[0] = Z_f[0] - U_f[0];
++ _c1 = V_f[0] > Z_f[0];
++ V_f[1] = Z_f[1] - U_f[1];
++ _c2 = V_f[1] > Z_f[1];
++ V_f[1] -= _c1;
++ _c2 |= _c1 && (U_f[1] == Z_f[1]);
++ V_f[2] = Z_f[2] - U_f[2];
++ _c3 = V_f[2] > Z_f[2];
++ V_f[2] -= _c2;
++ _c3 |= _c2 && (U_f[2] == Z_f[2]);
++ V_f[3] = Z_f[3] - U_f[3] - _c3;
++ }
++ while (0);
++ V_s = Z_s;
++ }
++ else if (((V_f[0] | V_f[1] | V_f[2] | V_f[3]) == 0))
++ {
++ V_e = 0;
++ V_s = (0 == 3);
++ goto sub_done;
++ }
++ goto norm;
++ }
++ sub3:if ((V_f[3]) &
++ ((unsigned long) 1 << (113 - 1 + 3) % 32))
++ {
++ int diff;
++ (V_f[3]) &= ((unsigned long) 1 << (113 - 1 + 3) % 32) - 1;
++ norm:do
++ {
++ if (V_f[3])
++ {
++ do
++ {
++ if (sizeof (unsigned long) ==
++ sizeof (unsigned int))
++ diff = __builtin_clz (V_f[3]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long))
++ diff = __builtin_clzl (V_f[3]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long long))
++ diff = __builtin_clzll (V_f[3]);
++ else
++ abort ();
++ }
++ while (0);
++ }
++ else if (V_f[2])
++ {
++ do
++ {
++ if (sizeof (unsigned long) ==
++ sizeof (unsigned int))
++ diff = __builtin_clz (V_f[2]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long))
++ diff = __builtin_clzl (V_f[2]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long long))
++ diff = __builtin_clzll (V_f[2]);
++ else
++ abort ();
++ }
++ while (0);
++ diff += 32;
++ }
++ else if (V_f[1])
++ {
++ do
++ {
++ if (sizeof (unsigned long) ==
++ sizeof (unsigned int))
++ diff = __builtin_clz (V_f[1]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long))
++ diff = __builtin_clzl (V_f[1]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long long))
++ diff = __builtin_clzll (V_f[1]);
++ else
++ abort ();
++ }
++ while (0);
++ diff += 32 * 2;
++ }
++ else
++ {
++ do
++ {
++ if (sizeof (unsigned long) ==
++ sizeof (unsigned int))
++ diff = __builtin_clz (V_f[0]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long))
++ diff = __builtin_clzl (V_f[0]);
++ else if (sizeof (unsigned long) ==
++ sizeof (unsigned long long))
++ diff = __builtin_clzll (V_f[0]);
++ else
++ abort ();
++ }
++ while (0);
++ diff += 32 * 3;
++ }
++ }
++ while (0);
++ diff -= ((4 * 32) - (3 + 113));
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = (diff) / 32;
++ _up = (diff) % 32;
++ _down = 32 - _up;
++ if (!_up)
++ for (_i = 3; _i >= _skip; --_i)
++ V_f[_i] = V_f[_i - _skip];
++ else
++ {
++ for (_i = 3; _i > _skip; --_i)
++ V_f[_i] =
++ V_f[_i - _skip] << _up | V_f[_i - _skip -
++ 1] >> _down;
++ V_f[_i--] = V_f[0] << _up;
++ }
++ for (; _i >= 0; --_i)
++ V_f[_i] = 0;
++ }
++ while (0);
++ if (V_e <= diff)
++ {
++ diff = diff - V_e + 1;
++ do
++ {
++ int _sticky;
++ do
++ {
++ long _up, _down, _skip, _i;
++ unsigned long _s;
++ _skip = (diff) / 32;
++ _down = (diff) % 32;
++ _up = 32 - _down;
++ for (_s = _i = 0; _i < _skip; ++_i)
++ _s |= V_f[_i];
++ if (!_down)
++ for (_i = 0; _i <= 3 - _skip; ++_i)
++ V_f[_i] = V_f[_i + _skip];
++ else
++ {
++ _s |= V_f[_i] << _up;
++ for (_i = 0; _i < 3 - _skip; ++_i)
++ V_f[_i] =
++ V_f[_i + _skip] >> _down | V_f[_i +
++ _skip +
++ 1] <<
++ _up;
++ V_f[_i++] = V_f[3] >> _down;
++ }
++ for (; _i < 4; ++_i)
++ V_f[_i] = 0;
++ _sticky = (_s != 0);
++ }
++ while (0);
++ V_f[0] |= _sticky;
++ }
++ while (0);
++ V_e = 0;
++ }
++ else
++ {
++ V_e -= diff;
++ (V_f[3]) &=
++ ~(unsigned long) ((unsigned long) 1 << (113 - 1 + 3) %
++ 32);
++ }
++ }
++ sub_done:;
++ }
++ }
++ while (0);
++ }
++ while (0);
++
++/* FP_PACK_SEMIRAW_Q(v,V) */
++ do
++ {
++ do
++ {
++ do
++ {
++ if ((V_f[0]) & 7)
++ _fex |= (0);
++ switch (0)
++ {
++ case 0:
++ do
++ {
++ if (((V_f[0]) & 15) != ((unsigned long) 1 << 2))
++ do
++ {
++ unsigned long _t;
++ _t =
++ ((V_f[0] +=
++ ((unsigned long) 1 << 2)) <
++ ((unsigned long) 1 << 2));
++ V_f[1] += _t;
++ _t = (V_f[1] < _t);
++ V_f[2] += _t;
++ _t = (V_f[2] < _t);
++ V_f[3] += _t;
++ }
++ while (0);
++ }
++ while (0);
++ break;
++ case 1:
++ (void) 0;
++ break;
++ case 2:
++ do
++ {
++ if (!V_s && ((V_f[0]) & 7))
++ do
++ {
++ unsigned long _t;
++ _t =
++ ((V_f[0] +=
++ ((unsigned long) 1 << 3)) <
++ ((unsigned long) 1 << 3));
++ V_f[1] += _t;
++ _t = (V_f[1] < _t);
++ V_f[2] += _t;
++ _t = (V_f[2] < _t);
++ V_f[3] += _t;
++ }
++ while (0);
++ }
++ while (0);
++ break;
++ case 3:
++ do
++ {
++ if (V_s && ((V_f[0]) & 7))
++ do
++ {
++ unsigned long _t;
++ _t =
++ ((V_f[0] +=
++ ((unsigned long) 1 << 3)) <
++ ((unsigned long) 1 << 3));
++ V_f[1] += _t;
++ _t = (V_f[1] < _t);
++ V_f[2] += _t;
++ _t = (V_f[2] < _t);
++ V_f[3] += _t;
++ }
++ while (0);
++ }
++ while (0);
++ break;
++ }
++ }
++ while (0);
++ if ((V_f[3]) & (((unsigned long) 1 << ((3 + 113) % 32)) >> 1))
++ {
++ (V_f[3]) &= ~(((unsigned long) 1 << ((3 + 113) % 32)) >> 1);
++ V_e++;
++ if (V_e == 32767)
++ do
++ {
++ if (0 == 0 || (0 == 2 && !V_s) || (0 == 3 && V_s))
++ {
++ V_e = 32767;
++ (V_f[3] = 0, V_f[2] = 0, V_f[1] = 0, V_f[0] = 0);
++ }
++ else
++ {
++ V_e = 32767 - 1;
++ _fex |= (0);
++ _fex |= (0);
++ (V_f[3] = (~(signed long) 0), V_f[2] =
++ (~(signed long) 0), V_f[1] =
++ (~(signed long) 0), V_f[0] = (~(signed long) 0));
++ }
++ }
++ while (0);
++ }
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = (3) / 32;
++ _down = (3) % 32;
++ _up = 32 - _down;
++ if (!_down)
++ for (_i = 0; _i <= 3 - _skip; ++_i)
++ V_f[_i] = V_f[_i + _skip];
++ else
++ {
++ for (_i = 0; _i < 3 - _skip; ++_i)
++ V_f[_i] =
++ V_f[_i + _skip] >> _down | V_f[_i + _skip + 1] << _up;
++ V_f[_i++] = V_f[3] >> _down;
++ }
++ for (; _i < 4; ++_i)
++ V_f[_i] = 0;
++ }
++ while (0);
++ if (!(((V_e + 1) & 32767) > 1)
++ && !((V_f[0] | V_f[1] | V_f[2] | V_f[3]) == 0))
++ {
++ if (V_e == 0)
++ _fex |= (0);
++ else
++ {
++ if (!1)
++ {
++ (V_f[3] =
++ ((((unsigned long) 1 << (113 - 2) % 32) << 1) - 1),
++ V_f[2] = -1, V_f[1] = -1, V_f[0] = -1);
++ V_s = 0;
++ }
++ else
++ (V_f[3]) |= ((unsigned long) 1 << (113 - 2) % 32);
++ }
++ }
++ }
++ while (0);
++ do
++ {
++ union _FP_UNION_Q _flo;
++ _flo.bits.frac0 = V_f[0];
++ _flo.bits.frac1 = V_f[1];
++ _flo.bits.frac2 = V_f[2];
++ _flo.bits.frac3 = V_f[3];
++ _flo.bits.exp = V_e;
++ _flo.bits.sign = V_s;
++ (v) = _flo.flt;
++ }
++ while (0);
++ }
++ while (0);
++
++/* FP_HANDLE_EXCEPTIONS */
++ do
++ {
++ }
++ while (0);
++
++ /* Truncate quad to double. */
++/* FP_INIT_ROUNDMODE */
++ do
++ {
++ }
++ while (0);
++
++/* FP_UNPACK_SEMIRAW_Q(V,v) */
++ do
++ {
++ do
++ {
++ union _FP_UNION_Q _flo;
++ _flo.flt = (v);
++ V_f[0] = _flo.bits.frac0;
++ V_f[1] = _flo.bits.frac1;
++ V_f[2] = _flo.bits.frac2;
++ V_f[3] = _flo.bits.frac3;
++ V_e = _flo.bits.exp;
++ V_s = _flo.bits.sign;
++ }
++ while (0);
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = (3) / 32;
++ _up = (3) % 32;
++ _down = 32 - _up;
++ if (!_up)
++ for (_i = 3; _i >= _skip; --_i)
++ V_f[_i] = V_f[_i - _skip];
++ else
++ {
++ for (_i = 3; _i > _skip; --_i)
++ V_f[_i] =
++ V_f[_i - _skip] << _up | V_f[_i - _skip - 1] >> _down;
++ V_f[_i--] = V_f[0] << _up;
++ }
++ for (; _i >= 0; --_i)
++ V_f[_i] = 0;
++ }
++ while (0);
++ }
++ while (0);
++
++/* FP_TRUNC(D,Q,2,4,R,V) */
++ do
++ {
++ if (113 < 53 || 16383 < 1023 + 53 - 1)
++ abort ();
++ R_s = V_s;
++ if ((((V_e + 1) & 32767) > 1))
++ {
++ R_e = V_e + 1023 - 16383;
++ if (R_e >= 2047)
++ do
++ {
++ if (0 == 0 || (0 == 2 && !R_s) || (0 == 3 && R_s))
++ {
++ R_e = 2047;
++ (R_f0 = 0, R_f1 = 0);
++ }
++ else
++ {
++ R_e = 2047 - 1;
++ _fex |= (0);
++ _fex |= (0);
++ (R_f0 = (~(signed long) 0), R_f1 = (~(signed long) 0));
++ }
++ }
++ while (0);
++ else
++ {
++ if (R_e <= 0)
++ {
++ if (R_e <= 1 - 53)
++ (V_f[3] = 0, V_f[2] = 0, V_f[1] = 0, V_f[0] = 0);
++ else
++ {
++ (V_f[3]) |= ((unsigned long) 1 << (113 - 1 + 3) % 32);
++ do
++ {
++ int _sticky;
++ do
++ {
++ long _up, _down, _skip, _i;
++ unsigned long _s;
++ _skip = (((3 + 113) - (3 + 53) + 1 - R_e)) / 32;
++ _down = (((3 + 113) - (3 + 53) + 1 - R_e)) % 32;
++ _up = 32 - _down;
++ for (_s = _i = 0; _i < _skip; ++_i)
++ _s |= V_f[_i];
++ if (!_down)
++ for (_i = 0; _i <= 3 - _skip; ++_i)
++ V_f[_i] = V_f[_i + _skip];
++ else
++ {
++ _s |= V_f[_i] << _up;
++ for (_i = 0; _i < 3 - _skip; ++_i)
++ V_f[_i] =
++ V_f[_i + _skip] >> _down | V_f[_i +
++ _skip +
++ 1] <<
++ _up;
++ V_f[_i++] = V_f[3] >> _down;
++ }
++ for (; _i < 4; ++_i)
++ V_f[_i] = 0;
++ _sticky = (_s != 0);
++ }
++ while (0);
++ V_f[0] |= _sticky;
++ }
++ while (0);
++ }
++ R_e = 0;
++ }
++ else
++ do
++ {
++ int _sticky;
++ do
++ {
++ long _up, _down, _skip, _i;
++ unsigned long _s;
++ _skip = (((3 + 113) - (3 + 53))) / 32;
++ _down = (((3 + 113) - (3 + 53))) % 32;
++ _up = 32 - _down;
++ for (_s = _i = 0; _i < _skip; ++_i)
++ _s |= V_f[_i];
++ if (!_down)
++ for (_i = 0; _i <= 3 - _skip; ++_i)
++ V_f[_i] = V_f[_i + _skip];
++ else
++ {
++ _s |= V_f[_i] << _up;
++ for (_i = 0; _i < 3 - _skip; ++_i)
++ V_f[_i] =
++ V_f[_i + _skip] >> _down | V_f[_i + _skip +
++ 1] << _up;
++ V_f[_i++] = V_f[3] >> _down;
++ }
++ for (; _i < 4; ++_i)
++ V_f[_i] = 0;
++ _sticky = (_s != 0);
++ }
++ while (0);
++ V_f[0] |= _sticky;
++ }
++ while (0);
++ do
++ {
++ R_f0 = V_f[0];
++ R_f1 = V_f[1];
++ }
++ while (0);
++ }
++ }
++ else
++ {
++ if (V_e == 0)
++ {
++ R_e = 0;
++ (R_f0 = 0, R_f1 = 0);
++ if (!((V_f[0] | V_f[1] | V_f[2] | V_f[3]) == 0))
++ {
++ _fex |= (0);
++ _fex |= (0);
++ }
++ }
++ else
++ {
++ R_e = 2047;
++ if (((V_f[0] | V_f[1] | V_f[2] | V_f[3]) == 0))
++ (R_f0 = 0, R_f1 = 0);
++ else
++ {
++ do
++ {
++ if (V_e == 32767
++ && !((V_f[0] | V_f[1] | V_f[2] | V_f[3]) == 0)
++ && !((V_f[3]) &
++ ((unsigned long) 1 << (113 - 2 + 3) % 32)))
++ _fex |= (0);
++ }
++ while (0);
++ do
++ {
++ long _up, _down, _skip, _i;
++ _skip = (((3 + 113) - (3 + 53))) / 32;
++ _down = (((3 + 113) - (3 + 53))) % 32;
++ _up = 32 - _down;
++ if (!_down)
++ for (_i = 0; _i <= 3 - _skip; ++_i)
++ V_f[_i] = V_f[_i + _skip];
++ else
++ {
++ for (_i = 0; _i < 3 - _skip; ++_i)
++ V_f[_i] =
++ V_f[_i + _skip] >> _down | V_f[_i + _skip +
++ 1] << _up;
++ V_f[_i++] = V_f[3] >> _down;
++ }
++ for (; _i < 4; ++_i)
++ V_f[_i] = 0;
++ }
++ while (0);
++ do
++ {
++ R_f0 = V_f[0];
++ R_f1 = V_f[1];
++ }
++ while (0);
++ (R_f1) |= ((unsigned long) 1 << (53 - 2 + 3) % 32);
++ }
++ }
++ }
++ }
++ while (0);
++
++/* FP_PACK_SEMIRAW_D(r,R) */
++ do
++ {
++ do
++ {
++ do
++ {
++ if ((R_f0) & 7)
++ _fex |= (0);
++ switch (0)
++ {
++ case 0:
++ do
++ {
++ if (((R_f0) & 15) != ((unsigned long) 1 << 2))
++ do
++ {
++ if (__builtin_constant_p (0) && (0) == 0)
++ __asm__ ("{a%I4|add%I4c} %1,%3,%4\n\t{aze|addze} %0,%2": "=r" (R_f1), "=&r" (R_f0):"r" (R_f1), "%r" (R_f0),
++ "rI" (((unsigned long) 1 <<
++ 2)));
++ else if (__builtin_constant_p (0)
++ && (0) == ~(USItype) 0)
++ __asm__ ("{a%I4|add%I4c} %1,%3,%4\n\t{ame|addme} %0,%2": "=r" (R_f1), "=&r" (R_f0):"r" (R_f1), "%r" (R_f0),
++ "rI" (((unsigned long) 1 <<
++ 2)));
++ else
++ __asm__ ("{a%I5|add%I5c} %1,%4,%5\n\t{ae|adde} %0,%2,%3": "=r" (R_f1), "=&r" (R_f0):"%r" (R_f1), "r" (0), "%r" (R_f0),
++ "rI" (((unsigned long) 1 <<
++ 2)));
++ }
++ while (0);
++ }
++ while (0);
++ break;
++ case 1:
++ (void) 0;
++ break;
++ case 2:
++ do
++ {
++ if (!R_s && ((R_f0) & 7))
++ do
++ {
++ if (__builtin_constant_p (0) && (0) == 0)
++ __asm__ ("{a%I4|add%I4c} %1,%3,%4\n\t{aze|addze} %0,%2": "=r" (R_f1), "=&r" (R_f0):"r" (R_f1), "%r" (R_f0),
++ "rI" (((unsigned long) 1 <<
++ 3)));
++ else if (__builtin_constant_p (0)
++ && (0) == ~(USItype) 0)
++ __asm__ ("{a%I4|add%I4c} %1,%3,%4\n\t{ame|addme} %0,%2": "=r" (R_f1), "=&r" (R_f0):"r" (R_f1), "%r" (R_f0),
++ "rI" (((unsigned long) 1 <<
++ 3)));
++ else
++ __asm__ ("{a%I5|add%I5c} %1,%4,%5\n\t{ae|adde} %0,%2,%3": "=r" (R_f1), "=&r" (R_f0):"%r" (R_f1), "r" (0), "%r" (R_f0),
++ "rI" (((unsigned long) 1 <<
++ 3)));
++ }
++ while (0);
++ }
++ while (0);
++ break;
++ case 3:
++ do
++ {
++ if (R_s && ((R_f0) & 7))
++ do
++ {
++ if (__builtin_constant_p (0) && (0) == 0)
++ __asm__ ("{a%I4|add%I4c} %1,%3,%4\n\t{aze|addze} %0,%2": "=r" (R_f1), "=&r" (R_f0):"r" (R_f1), "%r" (R_f0),
++ "rI" (((unsigned long) 1 <<
++ 3)));
++ else if (__builtin_constant_p (0)
++ && (0) == ~(USItype) 0)
++ __asm__ ("{a%I4|add%I4c} %1,%3,%4\n\t{ame|addme} %0,%2": "=r" (R_f1), "=&r" (R_f0):"r" (R_f1), "%r" (R_f0),
++ "rI" (((unsigned long) 1 <<
++ 3)));
++ else
++ __asm__ ("{a%I5|add%I5c} %1,%4,%5\n\t{ae|adde} %0,%2,%3": "=r" (R_f1), "=&r" (R_f0):"%r" (R_f1), "r" (0), "%r" (R_f0),
++ "rI" (((unsigned long) 1 <<
++ 3)));
++ }
++ while (0);
++ }
++ while (0);
++ break;
++ }
++ }
++ while (0);
++ if ((R_f1) & (((unsigned long) 1 << (3 + 53) % 32) >> 1))
++ {
++ (R_f1) &= ~(((unsigned long) 1 << (3 + 53) % 32) >> 1);
++ R_e++;
++ if (R_e == 2047)
++ do
++ {
++ if (0 == 0 || (0 == 2 && !R_s) || (0 == 3 && R_s))
++ {
++ R_e = 2047;
++ (R_f0 = 0, R_f1 = 0);
++ }
++ else
++ {
++ R_e = 2047 - 1;
++ _fex |= (0);
++ _fex |= (0);
++ (R_f0 = (~(signed long) 0), R_f1 =
++ (~(signed long) 0));
++ }
++ }
++ while (0);
++ }
++ (void) (((3) < 32) ? (
++ {
++ R_f0 = R_f0 >> (3) | R_f1 << (32 - (3)); R_f1 >>= (3);}):(
++ {
++ R_f0 = R_f1 >> ((3) - 32); R_f1 = 0;}));
++ if (!(((R_e + 1) & 2047) > 1) && !((R_f1 | R_f0) == 0))
++ {
++ if (R_e == 0)
++ _fex |= (0);
++ else
++ {
++ if (!1)
++ {
++ (R_f0 = -1, R_f1 =
++ ((((unsigned long) 1 << (53 - 2) % 32) << 1) - 1));
++ R_s = 0;
++ }
++ else
++ (R_f1) |= ((unsigned long) 1 << (53 - 2) % 32);
++ }
++ }
++ }
++ while (0);
++ do
++ {
++ union _FP_UNION_D _flo;
++ _flo.bits.frac0 = R_f0;
++ _flo.bits.frac1 = R_f1;
++ _flo.bits.exp = R_e;
++ _flo.bits.sign = R_s;
++ (r) = _flo.flt;
++ }
++ while (0);
++ }
++ while (0);
++
++/* FP_HANDLE_EXCEPTIONS */
++ do
++ {
++ }
++ while (0);
++
++ return r;
++}
++
++
++#endif
++
+ #endif
+diff -urN gcc42-trunc-20060802/gcc/config/rs6000/libgcc-ppc-glibc.ver gcc42-patched-20060802/gcc/config/rs6000/libgcc-ppc-glibc.ver
+--- gcc42-trunc-20060802/gcc/config/rs6000/libgcc-ppc-glibc.ver 2006-08-02 11:07:16.000000000 -0500
++++ gcc42-patched-20060802/gcc/config/rs6000/libgcc-ppc-glibc.ver 2006-09-01 08:28:29.000000000 -0500
+@@ -21,11 +21,32 @@
+ %else
+ GCC_3.4.4 {
+ %endif
++%else
++GCC_4.2.0 {
++%endif
+
+ # long double support
+ __gcc_qadd
+ __gcc_qsub
+ __gcc_qmul
+ __gcc_qdiv
+-}
++
++%ifdef _SOFT_FLOAT
++ __gcc_qneg
++ __gcc_qeq
++ __gcc_qne
++ __gcc_ggt
++ __gcc_qge
++ __gcc_qlt
++ __gcc_qle
++ __gcc_qunord
++ __gcc_stoq
++ __gcc_dtoq
++ __gcc_qtos
++ __gcc_qtod
++ __gcc_qtoi
++ __gcc_qtou
++ __gcc_itoq
++ __gcc_utoq
+ %endif
++}
+diff -urN gcc42-trunc-20060802/gcc/config/rs6000/rs6000.c gcc42-patched-20060802/gcc/config/rs6000/rs6000.c
+--- gcc42-trunc-20060802/gcc/config/rs6000/rs6000.c 2006-08-02 11:07:16.000000000 -0500
++++ gcc42-patched-20060802/gcc/config/rs6000/rs6000.c 2006-09-01 08:28:29.000000000 -0500
+@@ -4016,8 +4016,7 @@
+
+ /* 128-bit constant floating-point values on Darwin should really be
+ loaded as two parts. */
+- if (!TARGET_IEEEQUAD
+- && TARGET_HARD_FLOAT && TARGET_FPRS && TARGET_LONG_DOUBLE_128
++ if (!TARGET_IEEEQUAD && TARGET_LONG_DOUBLE_128
+ && mode == TFmode && GET_CODE (operands[1]) == CONST_DOUBLE)
+ {
+ /* DImode is used, not DFmode, because simplify_gen_subreg doesn't
+@@ -9175,9 +9174,6 @@
+ static void
+ rs6000_init_libfuncs (void)
+ {
+- if (!TARGET_HARD_FLOAT)
+- return;
+-
+ if (DEFAULT_ABI != ABI_V4 && TARGET_XCOFF
+ && !TARGET_POWER2 && !TARGET_POWERPC)
+ {
+@@ -9196,6 +9192,27 @@
+ set_optab_libfunc (sub_optab, TFmode, "__gcc_qsub");
+ set_optab_libfunc (smul_optab, TFmode, "__gcc_qmul");
+ set_optab_libfunc (sdiv_optab, TFmode, "__gcc_qdiv");
++
++ if (TARGET_SOFT_FLOAT)
++ {
++ set_optab_libfunc (neg_optab, TFmode, "__gcc_qneg");
++ set_optab_libfunc (eq_optab, TFmode, "__gcc_qeq");
++ set_optab_libfunc (ne_optab, TFmode, "__gcc_qne");
++ set_optab_libfunc (gt_optab, TFmode, "__gcc_qgt");
++ set_optab_libfunc (ge_optab, TFmode, "__gcc_qge");
++ set_optab_libfunc (lt_optab, TFmode, "__gcc_qlt");
++ set_optab_libfunc (le_optab, TFmode, "__gcc_qle");
++ set_optab_libfunc (unord_optab, TFmode, "__gcc_qunord");
++
++ set_conv_libfunc (sext_optab, TFmode, SFmode, "__gcc_stoq");
++ set_conv_libfunc (sext_optab, TFmode, DFmode, "__gcc_dtoq");
++ set_conv_libfunc (trunc_optab, SFmode, TFmode, "__gcc_qtos");
++ set_conv_libfunc (trunc_optab, DFmode, TFmode, "__gcc_qtod");
++ set_conv_libfunc (sfix_optab, SImode, TFmode, "__gcc_qtoi");
++ set_conv_libfunc (ufix_optab, SImode, TFmode, "__gcc_qtou");
++ set_conv_libfunc (sfloat_optab, TFmode, SImode, "__gcc_itoq");
++ set_conv_libfunc (ufloat_optab, TFmode, SImode, "__gcc_utoq");
++ }
+ }
+ else
+ {
+diff -urN gcc42-trunc-20060802/gcc/config/rs6000/rs6000.md gcc42-patched-20060802/gcc/config/rs6000/rs6000.md
+--- gcc42-trunc-20060802/gcc/config/rs6000/rs6000.md 2006-08-02 11:07:16.000000000 -0500
++++ gcc42-patched-20060802/gcc/config/rs6000/rs6000.md 2006-09-01 08:28:29.000000000 -0500
+@@ -7920,42 +7920,44 @@
+ "")
+
+ (define_insn "*movcc_internal1"
+- [(set (match_operand:CC 0 "nonimmediate_operand" "=y,x,?y,r,r,r,r,q,cl,r,m")
+- (match_operand:CC 1 "nonimmediate_operand" "y,r,r,x,y,r,h,r,r,m,r"))]
++ [(set (match_operand:CC 0 "nonimmediate_operand" "=y,x,?y,y,r,r,r,r,r,q,cl,r,m")
++ (match_operand:CC 1 "general_operand" "y,r,r,O,x,y,r,I,h,r,r,m,r"))]
+ "register_operand (operands[0], CCmode)
+ || register_operand (operands[1], CCmode)"
+ "@
+ mcrf %0,%1
+ mtcrf 128,%1
+ {rlinm|rlwinm} %1,%1,%F0,0xffffffff\;mtcrf %R0,%1\;{rlinm|rlwinm} %1,%1,%f0,0xffffffff
++ crxor %0,%0,%0
+ mfcr %0%Q1
+ mfcr %0%Q1\;{rlinm|rlwinm} %0,%0,%f1,0xf0000000
+ mr %0,%1
++ {lil|li} %0,%1
+ mf%1 %0
+ mt%0 %1
+ mt%0 %1
+ {l%U1%X1|lwz%U1%X1} %0,%1
+ {st%U0%U1|stw%U0%U1} %1,%0"
+ [(set (attr "type")
+- (cond [(eq_attr "alternative" "0")
++ (cond [(eq_attr "alternative" "0,3")
+ (const_string "cr_logical")
+ (eq_attr "alternative" "1,2")
+ (const_string "mtcr")
+- (eq_attr "alternative" "5,7")
++ (eq_attr "alternative" "6,7,9")
+ (const_string "integer")
+- (eq_attr "alternative" "6")
+- (const_string "mfjmpr")
+ (eq_attr "alternative" "8")
++ (const_string "mfjmpr")
++ (eq_attr "alternative" "10")
+ (const_string "mtjmpr")
+- (eq_attr "alternative" "9")
++ (eq_attr "alternative" "11")
+ (const_string "load")
+- (eq_attr "alternative" "10")
++ (eq_attr "alternative" "12")
+ (const_string "store")
+ (ne (symbol_ref "TARGET_MFCRF") (const_int 0))
+ (const_string "mfcrf")
+ ]
+ (const_string "mfcr")))
+- (set_attr "length" "4,4,12,4,8,4,4,4,4,4,4")])
++ (set_attr "length" "4,4,12,4,4,8,4,4,4,4,4,4,4")])
+ \f
+ ;; For floating-point, we normally deal with the floating-point registers
+ ;; unless -msoft-float is used. The sole exception is that parameter passing
+@@ -8313,8 +8315,7 @@
+ (define_expand "movtf"
+ [(set (match_operand:TF 0 "general_operand" "")
+ (match_operand:TF 1 "any_operand" ""))]
+- "!TARGET_IEEEQUAD
+- && TARGET_HARD_FLOAT && TARGET_FPRS && TARGET_LONG_DOUBLE_128"
++ "!TARGET_IEEEQUAD && TARGET_LONG_DOUBLE_128"
+ "{ rs6000_emit_move (operands[0], operands[1], TFmode); DONE; }")
+
+ ; It's important to list the o->f and f->o moves before f->f because
+@@ -8333,6 +8334,19 @@
+ { rs6000_split_multireg_move (operands[0], operands[1]); DONE; }
+ [(set_attr "length" "8,8,8,20,20,16")])
+
++(define_insn_and_split "*movtf_softfloat"
++ [(set (match_operand:TF 0 "nonimmediate_operand" "=r,Y,r")
++ (match_operand:TF 1 "input_operand" "YGHF,r,r"))]
++ "!TARGET_IEEEQUAD
++ && (TARGET_SOFT_FLOAT || !TARGET_FPRS) && TARGET_LONG_DOUBLE_128
++ && (gpc_reg_operand (operands[0], TFmode)
++ || gpc_reg_operand (operands[1], TFmode))"
++ "#"
++ "&& reload_completed"
++ [(pc)]
++{ rs6000_split_multireg_move (operands[0], operands[1]); DONE; }
++ [(set_attr "length" "20,20,16")])
++
+ (define_expand "extenddftf2"
+ [(parallel [(set (match_operand:TF 0 "nonimmediate_operand" "")
+ (float_extend:TF (match_operand:DF 1 "input_operand" "")))
+diff -urN gcc42-trunc-20060802/gcc/config/rs6000/sysv4.h gcc42-patched-20060802/gcc/config/rs6000/sysv4.h
+--- gcc42-trunc-20060802/gcc/config/rs6000/sysv4.h 2006-08-02 11:07:16.000000000 -0500
++++ gcc42-patched-20060802/gcc/config/rs6000/sysv4.h 2006-09-01 08:28:29.000000000 -0500
+@@ -215,10 +215,6 @@
+ error ("-msecure-plt not supported by your assembler"); \
+ } \
+ \
+- if (TARGET_SOFT_FLOAT && TARGET_LONG_DOUBLE_128 \
+- && rs6000_explicit_options.long_double) \
+- warning (0, "-msoft-float and -mlong-double-128 not supported"); \
+- \
+ /* Treat -fPIC the same as -mrelocatable. */ \
+ if (flag_pic > 1 && DEFAULT_ABI != ABI_AIX) \
+ { \
+diff -urN gcc42-trunc-20060802/gcc/config/rs6000/t-ppccomm gcc42-patched-20060802/gcc/config/rs6000/t-ppccomm
+--- gcc42-trunc-20060802/gcc/config/rs6000/t-ppccomm 2006-08-02 11:07:16.000000000 -0500
++++ gcc42-patched-20060802/gcc/config/rs6000/t-ppccomm 2006-09-01 08:28:29.000000000 -0500
+@@ -12,15 +12,8 @@
+ cat $(srcdir)/config/rs6000/tramp.asm > tramp.S
+
+ ifneq (,$findstring gnu,$(target))
+-TARGET_LIBGCC2_CFLAGS += -specs=ldblspecs
+-
++TARGET_LIBGCC2_CFLAGS += -mlong-double-128
+ SHLIB_MAPFILES += $(srcdir)/config/rs6000/libgcc-ppc-glibc.ver
+-
+-# Hack to use -mlong-double-128 only when not compiling nof libgcc
+-mklibgcc: ldblspecs
+-
+-ldblspecs: specs
+- sed -e '/cc1_options/{ n; s/$$/ %{!msoft-float:-mlong-double-128}/; }' < specs > $@
+ endif
+
+ # Switch synonyms
git.openpandora.org / openembedded.git / commitdiff