From: Ian Lance Taylor <ian@airs.com>
Date: Tue, 17 Jan 1995 19:08:31 +0000 (+0000)
Subject: 	* config/mips/tm-mips.h (enum mips_fpu_type): New enum.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=daa4c5f8a17f8d895d7f2981afea6cdb96dd8594;p=binutils-gdb.git

	* config/mips/tm-mips.h (enum mips_fpu_type): New enum.
	(mips_fpu): Change type to enum mips_fpu_type.
	(FIX_CALL_DUMMY): Handle mips_fpu == MIPS_FPU_SINGLE.
	* mips-tdep.c (mips_fpu): Change type to enum mips_fpu_type.
	Don't initialize.
	(mips_fpu_string): New static variable.
	(mips_push_dummy_frame): Handle mips_fpu == MIPS_FPU_SINGLE.
	(mips_pop_frame): Likewise.
	(mips_extract_return_value): Likewise.
	(mips_store_return_value): Likewise.
	(mips_set_fpu_command): New static function.
	(mips_show_fpu_command): New static function.
	(_initialize_mips_tdep): Change handling of set/show mipsfpu.
---

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index d7924cc7064..2b81adc101d 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,19 @@
+Tue Jan 17 14:00:58 1995  Ian Lance Taylor  <ian@sanguine.cygnus.com>
+
+	* config/mips/tm-mips.h (enum mips_fpu_type): New enum.
+	(mips_fpu): Change type to enum mips_fpu_type.
+	(FIX_CALL_DUMMY): Handle mips_fpu == MIPS_FPU_SINGLE.
+	* mips-tdep.c (mips_fpu): Change type to enum mips_fpu_type.
+	Don't initialize.
+	(mips_fpu_string): New static variable.
+	(mips_push_dummy_frame): Handle mips_fpu == MIPS_FPU_SINGLE.
+	(mips_pop_frame): Likewise.
+	(mips_extract_return_value): Likewise.
+	(mips_store_return_value): Likewise.
+	(mips_set_fpu_command): New static function.
+	(mips_show_fpu_command): New static function.
+	(_initialize_mips_tdep): Change handling of set/show mipsfpu.
+
 Tue Jan 17 09:48:38 1995  Jim Kingdon  <kingdon@lioth.cygnus.com>
 
 	* a29k-tdep.c (gdb_print_insn_a29k): Fix typo (&info -> info).
diff --git a/gdb/config/mips/tm-mips.h b/gdb/config/mips/tm-mips.h
index cb20c683454..8c93366a20b 100644
--- a/gdb/config/mips/tm-mips.h
+++ b/gdb/config/mips/tm-mips.h
@@ -35,9 +35,18 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
 #define IEEE_FLOAT
 
 /* Some MIPS boards are provided both with and without a floating
-   point coprocessor; we provide a user settable variable to tell gdb
-   whether there is one or not.  */
-extern int mips_fpu;
+   point coprocessor.  The MIPS R4650 chip has only single precision
+   floating point.  We provide a user settable variable to tell gdb
+   what type of floating point to use.  */
+
+enum mips_fpu_type
+{
+  MIPS_FPU_DOUBLE,	/* Full double precision floating point.  */
+  MIPS_FPU_SINGLE,	/* Single precision floating point (R4650).  */
+  MIPS_FPU_NONE		/* No floating point.  */
+};
+
+extern enum mips_fpu_type mips_fpu;
 
 /* The name of the usual type of MIPS processor that is in the target
    system.  */
@@ -370,7 +379,7 @@ extern int in_sigtramp PARAMS ((CORE_ADDR, char *));
 	(dummyname + 12 * 4, 4,						\
 	 (extract_unsigned_integer (dummyname + 12 * 4, 4)		\
 	  | ((fun) & 0xffff)));						\
-      if (! mips_fpu)							\
+      if (mips_fpu == MIPS_FPU_NONE)					\
 	{								\
 	  store_unsigned_integer (dummyname + 3 * 4, 4,			\
 				  (unsigned LONGEST) 0);		\
@@ -381,6 +390,18 @@ extern int in_sigtramp PARAMS ((CORE_ADDR, char *));
 	  store_unsigned_integer (dummyname + 6 * 4, 4,			\
 				  (unsigned LONGEST) 0);		\
 	}								\
+      else if (mips_fpu == MIPS_FPU_SINGLE)				\
+	{								\
+	  /* This isn't right.  mips_push_arguments will call		\
+             value_arg_coerce, which will convert all float arguments	\
+             to doubles.  If the function prototype is float, though,	\
+             it will be expecting a float argument in a float		\
+             register.  */						\
+	  store_unsigned_integer (dummyname + 4 * 4, 4,			\
+				  (unsigned LONGEST) 0);		\
+	  store_unsigned_integer (dummyname + 6 * 4, 4,			\
+				  (unsigned LONGEST) 0);		\
+	}								\
       else if (TARGET_BYTE_ORDER == BIG_ENDIAN				\
 	       && ! GDB_TARGET_IS_MIPS64)				\
 	{								\