1 /* Target-dependent definitions for Intel x86 running DJGPP.
2 Copyright 1995, 1996, 1997 Free Software Foundation, Inc.
4 This file is part of GDB.
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA. */
21 #undef HAVE_SSE_REGS /* FIXME! go32-nat.c needs to support XMMi registers */
22 #define HAVE_I387_REGS
24 #include "i386/tm-i386.h"
26 /* The host and target are i386 machines and the compiler supports
27 long doubles. Long doubles on the host therefore have the same
28 layout as a 387 FPU stack register. */
30 #if defined(HAVE_LONG_DOUBLE) && defined(HOST_I386)
35 /* Allow floating point numbers to be specified by a raw long double
36 10 hex bytes number, e.g. 1.0 can be input as
37 0x3fff8000000000000000 */
40 #define HEX_LONG_DOUBLE_INPUT(base,p,len,target) \
41 ((base) == 16 && (len) == 20 \
42 && i387_hex_long_double_input ((p), (target)))
45 extern int i387_hex_long_double_input (char *p
, long double *putithere
);
47 #ifdef LD_I387 /* otherwise, definitions from tm-i386.h are good enough */
49 #undef REGISTER_CONVERT_TO_VIRTUAL
50 #define REGISTER_CONVERT_TO_VIRTUAL(REGNUM,TYPE,FROM,TO) \
52 long double val = *((long double *)(FROM)); \
53 store_floating ((TO), TYPE_LENGTH (TYPE), val); \
56 #undef REGISTER_CONVERT_TO_RAW
57 #define REGISTER_CONVERT_TO_RAW(TYPE,REGNUM,FROM,TO) \
59 long double val = extract_floating ((FROM), TYPE_LENGTH (TYPE)); \
60 *((long double *)(TO)) = val; \
63 /* Return the GDB type object for the "standard" data type of data in
64 register N. Perhaps si and di should go here, but potentially they
65 could be used for things other than address. */
67 #define REGISTER_VIRTUAL_TYPE(N) \
68 (((N) == PC_REGNUM || (N) == FP_REGNUM || (N) == SP_REGNUM) \
69 ? lookup_pointer_type (builtin_type_void) \
70 : IS_FP_REGNUM(N) ? builtin_type_long_double \
71 : IS_SSE_REGNUM(N) ? builtin_type_v4sf \
76 #undef TARGET_LONG_DOUBLE_BIT
77 #define TARGET_LONG_DOUBLE_BIT 96