* sysdeps/powerpc/Makefile (sysdep_routines): Don't build the fpr
authorgeoffk <geoffk>
Thu, 6 Dec 2001 23:41:30 +0000 (23:41 +0000)
committergeoffk <geoffk>
Thu, 6 Dec 2001 23:41:30 +0000 (23:41 +0000)
save/restore functions here.
(libm-support): Don't define these functions here.
* sysdeps/powerpc/fpu/Makefile: Build the fpr save/restore
functions here.
* sysdeps/powerpc/fe_nomask.c: Move to...
* sysdeps/powerpc/fpu/fe_nomask.c: ... here.
* sysdeps/powerpc/fprrest.S: Move to...
* sysdeps/powerpc/fpu/fprrest.S: ... here.
* sysdeps/powerpc/fprsave.S: Move to...
* sysdeps/powerpc/fpu/fprsave.S: ... here.

ChangeLog
sysdeps/powerpc/Makefile
sysdeps/powerpc/fe_nomask.c [deleted file]
sysdeps/powerpc/fprrest.S [deleted file]
sysdeps/powerpc/fprsave.S [deleted file]
sysdeps/powerpc/fpu/Makefile
sysdeps/powerpc/fpu/fe_nomask.c [new file with mode: 0644]
sysdeps/powerpc/fpu/fprrest.S [new file with mode: 0644]
sysdeps/powerpc/fpu/fprsave.S [new file with mode: 0644]

index d15a8cb..e6ae9e4 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,17 @@
+2001-12-06  Geoff Keating  <geoffk@redhat.com>
+
+       * sysdeps/powerpc/Makefile (sysdep_routines): Don't build the fpr
+       save/restore functions here.
+       (libm-support): Don't define these functions here.
+       * sysdeps/powerpc/fpu/Makefile: Build the fpr save/restore
+       functions here.
+       * sysdeps/powerpc/fe_nomask.c: Move to...
+       * sysdeps/powerpc/fpu/fe_nomask.c: ... here.
+       * sysdeps/powerpc/fprrest.S: Move to...
+       * sysdeps/powerpc/fpu/fprrest.S: ... here.
+       * sysdeps/powerpc/fprsave.S: Move to...
+       * sysdeps/powerpc/fpu/fprsave.S: ... here.
+
 2001-12-06  Ulrich Drepper  <drepper@redhat.com>
 
        * sysdeps/unix/sysv/linux/opensock.c: New file.
index e5b026d..ac121ee 100644 (file)
@@ -6,10 +6,6 @@ asm-CPPFLAGS += -Wa,-mppc
 ifeq ($(with-fp),no)
 +cflags += -msoft-float
 sysdep-LDFLAGS += -msoft-float
-else
-ifeq ($(subdir),math)
-libm-support += fenv_const fe_nomask
-endif
 endif
 
 ifeq ($(subdir),gmon)
@@ -17,7 +13,7 @@ sysdep_routines += ppc-mcount
 endif
 
 ifeq ($(subdir),misc)
-sysdep_routines += gprsave0 gprrest0 gprsave1 gprrest1 fprsave fprrest
+sysdep_routines += gprsave0 gprrest0 gprsave1 gprrest1
 endif
 
 # On PPC, -fpic works until the GOT contains 2^15 bytes, and possibly
diff --git a/sysdeps/powerpc/fe_nomask.c b/sysdeps/powerpc/fe_nomask.c
deleted file mode 100644 (file)
index ba45d85..0000000
+++ /dev/null
@@ -1,32 +0,0 @@
-/* Procedure definition for FE_NOMASK_ENV.
-   Copyright (C) 1997 Free Software Foundation, Inc.
-   This file is part of the GNU C Library.
-
-   The GNU C Library is free software; you can redistribute it and/or
-   modify it under the terms of the GNU Lesser General Public
-   License as published by the Free Software Foundation; either
-   version 2.1 of the License, or (at your option) any later version.
-
-   The GNU C 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
-   Lesser General Public License for more details.
-
-   You should have received a copy of the GNU Lesser General Public
-   License along with the GNU C Library; if not, write to the Free
-   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
-   02111-1307 USA.  */
-
-#include <fenv.h>
-#include <errno.h>
-
-/* This is presently a stub, until it's decided how the kernels should
-   support this.  */
-
-const fenv_t *
-__fe_nomask_env(void)
-{
-  __set_errno (ENOSYS);
-  return FE_ENABLED_ENV;
-}
-stub_warning (__fe_nomask_env)
diff --git a/sysdeps/powerpc/fprrest.S b/sysdeps/powerpc/fprrest.S
deleted file mode 100644 (file)
index 4231780..0000000
+++ /dev/null
@@ -1,94 +0,0 @@
-/* Copyright (C) 2000, 2001 Free Software Foundation, Inc.
-   This file is part of the GNU C Library.
-
-   The GNU C Library is free software; you can redistribute it and/or
-   modify it under the terms of the GNU Lesser General Public
-   License as published by the Free Software Foundation; either
-   version 2.1 of the License, or (at your option) any later version.
-
-   The GNU C 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
-   Lesser General Public License for more details.
-
-   You should have received a copy of the GNU Lesser General Public
-   License along with the GNU C Library; if not, write to the Free
-   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
-   02111-1307 USA.  */
-
-/*
-    Floating Point Registers (FPRs) restore routine
-*/
-
-#include <sysdep.h>
-
-ENTRY(_restfpr_all)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf14)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_14)
-C_TEXT(_restf14):
-C_TEXT(_restfpr_14):   lfd     fp14,-144(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf15)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_15)
-C_TEXT(_restf15):
-C_TEXT(_restfpr_15):   lfd     fp15,-136(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf16)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_16)
-C_TEXT(_restf16):
-C_TEXT(_restfpr_16):   lfd     fp16,-128(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf17)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_17)
-C_TEXT(_restf17):
-C_TEXT(_restfpr_17):   lfd     fp17,-120(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf18)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_18)
-C_TEXT(_restf18):
-C_TEXT(_restfpr_18):   lfd     fp18,-112(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf19)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_19)
-C_TEXT(_restf19):
-C_TEXT(_restfpr_19):   lfd     fp19,-104(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf20)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_20)
-C_TEXT(_restf20):
-C_TEXT(_restfpr_20):   lfd     fp20,-96(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf21)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_21)
-C_TEXT(_restf21):
-C_TEXT(_restfpr_21):   lfd     fp21,-88(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf22)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_22)
-C_TEXT(_restf22):
-C_TEXT(_restfpr_22):   lfd     fp22,-80(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf23)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_23)
-C_TEXT(_restf23):
-C_TEXT(_restfpr_23):   lfd     fp23,-72(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf24)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_24)
-C_TEXT(_restf24):
-C_TEXT(_restfpr_24):   lfd     fp24,-64(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf25)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_25)
-C_TEXT(_restf25):
-C_TEXT(_restfpr_25):   lfd     fp25,-56(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf26)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_26)
-C_TEXT(_restf26):
-C_TEXT(_restfpr_26):   lfd     fp26,-48(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf27)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_27)
-C_TEXT(_restf27):
-C_TEXT(_restfpr_27):   lfd     fp27,-40(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf28)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_28)
-C_TEXT(_restf28):
-C_TEXT(_restfpr_28):   lfd     fp28,-32(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf29)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_29)
-C_TEXT(_restf29):
-C_TEXT(_restfpr_29):   lwz     r0,8(r1)        #get return address from frame
-                       lfd     fp29,-24(r1)    #restore f29
-                       mtlr    r0              #move return address to LR
-                       lfd     fp30,-16(r1)    #restore f30
-                       lfd     fp31,-8(r1)     #restore f31
-                       blr                     #return
diff --git a/sysdeps/powerpc/fprsave.S b/sysdeps/powerpc/fprsave.S
deleted file mode 100644 (file)
index d7bc1ab..0000000
+++ /dev/null
@@ -1,93 +0,0 @@
-/* Copyright (C) 2000, 2001 Free Software Foundation, Inc.
-   This file is part of the GNU C Library.
-
-   The GNU C Library is free software; you can redistribute it and/or
-   modify it under the terms of the GNU Lesser General Public
-   License as published by the Free Software Foundation; either
-   version 2.1 of the License, or (at your option) any later version.
-
-   The GNU C 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
-   Lesser General Public License for more details.
-
-   You should have received a copy of the GNU Lesser General Public
-   License along with the GNU C Library; if not, write to the Free
-   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
-   02111-1307 USA.  */
-
-/*
-    Floating Point Registers (FPRs) save routine
-*/
-
-#include <sysdep.h>
-
-ENTRY(_savefpr_all)
-                ASM_GLOBAL_DIRECTIVE C_TEXT(_savef14)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_14)
-C_TEXT(_savef14):
-C_TEXT(_savefpr_14):   stfd    fp14,-144(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef15)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_15)
-C_TEXT(_savef15):
-C_TEXT(_savefpr_15):   stfd    fp15,-136(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef16)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_16)
-C_TEXT(_savef16):
-C_TEXT(_savefpr_16):   stfd    fp16,-128(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef17)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_17)
-C_TEXT(_savef17):
-C_TEXT(_savefpr_17):   stfd    fp17,-120(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef18)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_18)
-C_TEXT(_savef18):
-C_TEXT(_savefpr_18):   stfd    fp18,-112(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef19)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_19)
-C_TEXT(_savef19):
-C_TEXT(_savefpr_19):   stfd    fp19,-104(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef20)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_20)
-C_TEXT(_savef20):
-C_TEXT(_savefpr_20):   stfd    fp20,-96(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef21)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_21)
-C_TEXT(_savef21):
-C_TEXT(_savefpr_21):   stfd    fp21,-88(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef22)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_22)
-C_TEXT(_savef22):
-C_TEXT(_savefpr_22):   stfd    fp22,-80(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef23)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_23)
-C_TEXT(_savef23):
-C_TEXT(_savefpr_23):   stfd    fp23,-72(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef24)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_24)
-C_TEXT(_savef24):
-C_TEXT(_savefpr_24):   stfd    fp24,-64(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef25)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_25)
-C_TEXT(_savef25):
-C_TEXT(_savefpr_25):   stfd    fp25,-56(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef26)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_26)
-C_TEXT(_savef26):
-C_TEXT(_savefpr_26):   stfd    fp26,-48(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef27)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_27)
-C_TEXT(_savef27):
-C_TEXT(_savefpr_27):   stfd    fp27,-40(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef28)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_28)
-C_TEXT(_savef28):
-C_TEXT(_savefpr_28):   stfd    fp28,-32(r1)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef29)
-               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_29)
-C_TEXT(_savef29):
-C_TEXT(_savefpr_29):   stfd    fp29,-24(r1)    #save f29
-                       stfd    fp30,-16(r1)    #save f30
-                       stfd    fp31,-8(r1)     #save f31
-                       stw     r0,8(r1)        #save LR in callers frame
-                       blr                     #return
index bf2ed92..391cf3c 100644 (file)
@@ -1,3 +1,6 @@
 ifeq ($(subdir),math)
 libm-support += fenv_const fe_nomask t_sqrt
 endif
+ifeq ($(subdir),misc)
+sysdep_routines += fprsave fprrest
+endif
diff --git a/sysdeps/powerpc/fpu/fe_nomask.c b/sysdeps/powerpc/fpu/fe_nomask.c
new file mode 100644 (file)
index 0000000..ba45d85
--- /dev/null
@@ -0,0 +1,32 @@
+/* Procedure definition for FE_NOMASK_ENV.
+   Copyright (C) 1997 Free Software Foundation, Inc.
+   This file is part of the GNU C Library.
+
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Lesser General Public
+   License as published by the Free Software Foundation; either
+   version 2.1 of the License, or (at your option) any later version.
+
+   The GNU C 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
+   Lesser General Public License for more details.
+
+   You should have received a copy of the GNU Lesser General Public
+   License along with the GNU C Library; if not, write to the Free
+   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+   02111-1307 USA.  */
+
+#include <fenv.h>
+#include <errno.h>
+
+/* This is presently a stub, until it's decided how the kernels should
+   support this.  */
+
+const fenv_t *
+__fe_nomask_env(void)
+{
+  __set_errno (ENOSYS);
+  return FE_ENABLED_ENV;
+}
+stub_warning (__fe_nomask_env)
diff --git a/sysdeps/powerpc/fpu/fprrest.S b/sysdeps/powerpc/fpu/fprrest.S
new file mode 100644 (file)
index 0000000..4231780
--- /dev/null
@@ -0,0 +1,94 @@
+/* Copyright (C) 2000, 2001 Free Software Foundation, Inc.
+   This file is part of the GNU C Library.
+
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Lesser General Public
+   License as published by the Free Software Foundation; either
+   version 2.1 of the License, or (at your option) any later version.
+
+   The GNU C 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
+   Lesser General Public License for more details.
+
+   You should have received a copy of the GNU Lesser General Public
+   License along with the GNU C Library; if not, write to the Free
+   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+   02111-1307 USA.  */
+
+/*
+    Floating Point Registers (FPRs) restore routine
+*/
+
+#include <sysdep.h>
+
+ENTRY(_restfpr_all)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf14)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_14)
+C_TEXT(_restf14):
+C_TEXT(_restfpr_14):   lfd     fp14,-144(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf15)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_15)
+C_TEXT(_restf15):
+C_TEXT(_restfpr_15):   lfd     fp15,-136(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf16)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_16)
+C_TEXT(_restf16):
+C_TEXT(_restfpr_16):   lfd     fp16,-128(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf17)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_17)
+C_TEXT(_restf17):
+C_TEXT(_restfpr_17):   lfd     fp17,-120(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf18)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_18)
+C_TEXT(_restf18):
+C_TEXT(_restfpr_18):   lfd     fp18,-112(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf19)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_19)
+C_TEXT(_restf19):
+C_TEXT(_restfpr_19):   lfd     fp19,-104(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf20)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_20)
+C_TEXT(_restf20):
+C_TEXT(_restfpr_20):   lfd     fp20,-96(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf21)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_21)
+C_TEXT(_restf21):
+C_TEXT(_restfpr_21):   lfd     fp21,-88(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf22)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_22)
+C_TEXT(_restf22):
+C_TEXT(_restfpr_22):   lfd     fp22,-80(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf23)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_23)
+C_TEXT(_restf23):
+C_TEXT(_restfpr_23):   lfd     fp23,-72(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf24)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_24)
+C_TEXT(_restf24):
+C_TEXT(_restfpr_24):   lfd     fp24,-64(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf25)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_25)
+C_TEXT(_restf25):
+C_TEXT(_restfpr_25):   lfd     fp25,-56(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf26)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_26)
+C_TEXT(_restf26):
+C_TEXT(_restfpr_26):   lfd     fp26,-48(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf27)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_27)
+C_TEXT(_restf27):
+C_TEXT(_restfpr_27):   lfd     fp27,-40(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf28)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_28)
+C_TEXT(_restf28):
+C_TEXT(_restfpr_28):   lfd     fp28,-32(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restf29)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_restfpr_29)
+C_TEXT(_restf29):
+C_TEXT(_restfpr_29):   lwz     r0,8(r1)        #get return address from frame
+                       lfd     fp29,-24(r1)    #restore f29
+                       mtlr    r0              #move return address to LR
+                       lfd     fp30,-16(r1)    #restore f30
+                       lfd     fp31,-8(r1)     #restore f31
+                       blr                     #return
diff --git a/sysdeps/powerpc/fpu/fprsave.S b/sysdeps/powerpc/fpu/fprsave.S
new file mode 100644 (file)
index 0000000..d7bc1ab
--- /dev/null
@@ -0,0 +1,93 @@
+/* Copyright (C) 2000, 2001 Free Software Foundation, Inc.
+   This file is part of the GNU C Library.
+
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Lesser General Public
+   License as published by the Free Software Foundation; either
+   version 2.1 of the License, or (at your option) any later version.
+
+   The GNU C 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
+   Lesser General Public License for more details.
+
+   You should have received a copy of the GNU Lesser General Public
+   License along with the GNU C Library; if not, write to the Free
+   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+   02111-1307 USA.  */
+
+/*
+    Floating Point Registers (FPRs) save routine
+*/
+
+#include <sysdep.h>
+
+ENTRY(_savefpr_all)
+                ASM_GLOBAL_DIRECTIVE C_TEXT(_savef14)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_14)
+C_TEXT(_savef14):
+C_TEXT(_savefpr_14):   stfd    fp14,-144(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef15)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_15)
+C_TEXT(_savef15):
+C_TEXT(_savefpr_15):   stfd    fp15,-136(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef16)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_16)
+C_TEXT(_savef16):
+C_TEXT(_savefpr_16):   stfd    fp16,-128(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef17)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_17)
+C_TEXT(_savef17):
+C_TEXT(_savefpr_17):   stfd    fp17,-120(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef18)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_18)
+C_TEXT(_savef18):
+C_TEXT(_savefpr_18):   stfd    fp18,-112(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef19)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_19)
+C_TEXT(_savef19):
+C_TEXT(_savefpr_19):   stfd    fp19,-104(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef20)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_20)
+C_TEXT(_savef20):
+C_TEXT(_savefpr_20):   stfd    fp20,-96(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef21)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_21)
+C_TEXT(_savef21):
+C_TEXT(_savefpr_21):   stfd    fp21,-88(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef22)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_22)
+C_TEXT(_savef22):
+C_TEXT(_savefpr_22):   stfd    fp22,-80(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef23)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_23)
+C_TEXT(_savef23):
+C_TEXT(_savefpr_23):   stfd    fp23,-72(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef24)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_24)
+C_TEXT(_savef24):
+C_TEXT(_savefpr_24):   stfd    fp24,-64(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef25)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_25)
+C_TEXT(_savef25):
+C_TEXT(_savefpr_25):   stfd    fp25,-56(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef26)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_26)
+C_TEXT(_savef26):
+C_TEXT(_savefpr_26):   stfd    fp26,-48(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef27)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_27)
+C_TEXT(_savef27):
+C_TEXT(_savefpr_27):   stfd    fp27,-40(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef28)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_28)
+C_TEXT(_savef28):
+C_TEXT(_savefpr_28):   stfd    fp28,-32(r1)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savef29)
+               ASM_GLOBAL_DIRECTIVE C_TEXT(_savefpr_29)
+C_TEXT(_savef29):
+C_TEXT(_savefpr_29):   stfd    fp29,-24(r1)    #save f29
+                       stfd    fp30,-16(r1)    #save f30
+                       stfd    fp31,-8(r1)     #save f31
+                       stw     r0,8(r1)        #save LR in callers frame
+                       blr                     #return