summaryrefslogtreecommitdiff
path: root/gdb/alpha-tdep.c
diff options
context:
space:
mode:
authorRichard Henderson <rth@redhat.com>2003-06-02 16:16:14 +0000
committerRichard Henderson <rth@redhat.com>2003-06-02 16:16:14 +0000
commita202b1b9a4e3bae3d81ba4563df2b771e94b80ed (patch)
tree803289845e162557e6f85c0704f171f790d45514 /gdb/alpha-tdep.c
parente643037bd86768be0218a82c31a0b0c2fbbf5b81 (diff)
downloadgdb-a202b1b9a4e3bae3d81ba4563df2b771e94b80ed.tar.gz
* alpha-tdep.c (alpha_extract_return_value): Handle IEEE Quad floats.
(alpha_store_return_value): Error on IEEE Quad floats.
Diffstat (limited to 'gdb/alpha-tdep.c')
-rw-r--r--gdb/alpha-tdep.c11
1 files changed, 11 insertions, 0 deletions
diff --git a/gdb/alpha-tdep.c b/gdb/alpha-tdep.c
index c45e6590a6d..e97ff30b524 100644
--- a/gdb/alpha-tdep.c
+++ b/gdb/alpha-tdep.c
@@ -401,6 +401,11 @@ alpha_extract_return_value (struct type *valtype, struct regcache *regcache,
regcache_cooked_read (regcache, ALPHA_FP0_REGNUM, valbuf);
break;
+ case 16:
+ regcache_cooked_read_unsigned (regcache, ALPHA_V0_REGNUM, &l);
+ read_memory (l, valbuf, 16);
+ break;
+
default:
abort ();
}
@@ -450,6 +455,12 @@ alpha_store_return_value (struct type *valtype, struct regcache *regcache,
regcache_cooked_write (regcache, ALPHA_FP0_REGNUM, valbuf);
break;
+ case 16:
+ /* FIXME: 128-bit long doubles are returned like structures:
+ by writing into indirect storage provided by the caller
+ as the first argument. */
+ error ("Cannot set a 128-bit long double return value.");
+
default:
abort ();
}