* config/tc-xtensa.c (xtensa_mark_literal_pool_location): Remove
[deliverable/binutils-gdb.git] / gdb / symm-tdep.c
CommitLineData
2fbce691
AC
1// OBSOLETE /* Sequent Symmetry target interface, for GDB.
2// OBSOLETE Copyright 1986, 1987, 1989, 1991, 1992, 1993, 1994, 1995, 2000
3// OBSOLETE Free Software Foundation, Inc.
4// OBSOLETE
5// OBSOLETE This file is part of GDB.
6// OBSOLETE
7// OBSOLETE This program is free software; you can redistribute it and/or modify
8// OBSOLETE it under the terms of the GNU General Public License as published by
9// OBSOLETE the Free Software Foundation; either version 2 of the License, or
10// OBSOLETE (at your option) any later version.
11// OBSOLETE
12// OBSOLETE This program is distributed in the hope that it will be useful,
13// OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of
14// OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15// OBSOLETE GNU General Public License for more details.
16// OBSOLETE
17// OBSOLETE You should have received a copy of the GNU General Public License
18// OBSOLETE along with this program; if not, write to the Free Software
19// OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330,
20// OBSOLETE Boston, MA 02111-1307, USA. */
21// OBSOLETE
22// OBSOLETE /* many 387-specific items of use taken from i386-dep.c */
23// OBSOLETE
24// OBSOLETE #include "defs.h"
25// OBSOLETE #include "frame.h"
26// OBSOLETE #include "inferior.h"
27// OBSOLETE #include "symtab.h"
28// OBSOLETE
29// OBSOLETE #include <signal.h>
30// OBSOLETE #include <sys/param.h>
31// OBSOLETE #include <sys/user.h>
32// OBSOLETE #include <sys/dir.h>
33// OBSOLETE #include <sys/ioctl.h>
34// OBSOLETE #include "gdb_stat.h"
35// OBSOLETE #include "gdbcore.h"
36// OBSOLETE #include <fcntl.h>
37// OBSOLETE
38// OBSOLETE void
39// OBSOLETE symmetry_extract_return_value (struct type *type, char *regbuf, char *valbuf)
40// OBSOLETE {
41// OBSOLETE union
42// OBSOLETE {
43// OBSOLETE double d;
44// OBSOLETE int l[2];
45// OBSOLETE }
46// OBSOLETE xd;
47// OBSOLETE struct minimal_symbol *msymbol;
48// OBSOLETE float f;
49// OBSOLETE
50// OBSOLETE if (TYPE_CODE_FLT == TYPE_CODE (type))
51// OBSOLETE {
52// OBSOLETE msymbol = lookup_minimal_symbol ("1167_flt", NULL, NULL);
53// OBSOLETE if (msymbol != NULL)
54// OBSOLETE {
55// OBSOLETE /* found "1167_flt" means 1167, %fp2-%fp3 */
56// OBSOLETE /* float & double; 19= %fp2, 20= %fp3 */
57// OBSOLETE /* no single precision on 1167 */
58// OBSOLETE xd.l[1] = *((int *) &regbuf[REGISTER_BYTE (19)]);
59// OBSOLETE xd.l[0] = *((int *) &regbuf[REGISTER_BYTE (20)]);
60// OBSOLETE switch (TYPE_LENGTH (type))
61// OBSOLETE {
62// OBSOLETE case 4:
63// OBSOLETE /* FIXME: broken for cross-debugging. */
64// OBSOLETE f = (float) xd.d;
65// OBSOLETE memcpy (valbuf, &f, TYPE_LENGTH (type));
66// OBSOLETE break;
67// OBSOLETE case 8:
68// OBSOLETE /* FIXME: broken for cross-debugging. */
69// OBSOLETE memcpy (valbuf, &xd.d, TYPE_LENGTH (type));
70// OBSOLETE break;
71// OBSOLETE default:
72// OBSOLETE error ("Unknown floating point size");
73// OBSOLETE break;
74// OBSOLETE }
75// OBSOLETE }
76// OBSOLETE else
77// OBSOLETE {
78// OBSOLETE /* 387 %st(0), gcc uses this */
79// OBSOLETE i387_to_double (((int *) &regbuf[REGISTER_BYTE (3)]),
80// OBSOLETE &xd.d);
81// OBSOLETE switch (TYPE_LENGTH (type))
82// OBSOLETE {
83// OBSOLETE case 4: /* float */
84// OBSOLETE f = (float) xd.d;
85// OBSOLETE /* FIXME: broken for cross-debugging. */
86// OBSOLETE memcpy (valbuf, &f, 4);
87// OBSOLETE break;
88// OBSOLETE case 8: /* double */
89// OBSOLETE /* FIXME: broken for cross-debugging. */
90// OBSOLETE memcpy (valbuf, &xd.d, 8);
91// OBSOLETE break;
92// OBSOLETE default:
93// OBSOLETE error ("Unknown floating point size");
94// OBSOLETE break;
95// OBSOLETE }
96// OBSOLETE }
97// OBSOLETE }
98// OBSOLETE else
99// OBSOLETE {
100// OBSOLETE memcpy (valbuf, regbuf, TYPE_LENGTH (type));
101// OBSOLETE }
102// OBSOLETE }
This page took 0.074537 seconds and 4 git commands to generate.