MatCat.OpenSource/8sa1-binutils-gdb
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

2000-11-07 Kazu Hirata <kazu@hxi.com>

Browse Source 
* aix386-core.c: Fix formatting.
	* aoutf1.h: Likewise.
	* aoutx.h: Likewise.
	* archures.c: Likewise.
	* armnetbsd.c: Likewise.
This commit is contained in:
Kazu Hirata 2000-11-07 19:11:31 +00:00
parent 025d2eabfc
commit 0ef5a5bdcb
6 changed files with 70 additions and 89 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
bfd/ChangeLog
View File

@ -1,3 +1,11 @@
2000-11-07 Kazu Hirata <kazu@hxi.com>
* aix386-core.c: Fix formatting.
* aoutf1.h: Likewise.
* aoutx.h: Likewise.
* archures.c: Likewise.
* armnetbsd.c: Likewise.
2000-11-07 Alan Modra <alan@linuxcare.com.au> 2000-11-07 Alan Modra <alan@linuxcare.com.au>
* coff-h8300.c (special): Adjust reloc address. * coff-h8300.c (special): Adjust reloc address.

17
bfd/aoutf1.h
View File

@ -33,7 +33,7 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
/* This is needed to reject a NewsOS file, e.g. in /* This is needed to reject a NewsOS file, e.g. in
gdb/testsuite/gdb.t10/crossload.exp. <kingdon@cygnus.com> gdb/testsuite/gdb.t10/crossload.exp. <kingdon@cygnus.com>
I needed to add M_UNKNOWN to recognize a 68000 object, so this will I needed to add M_UNKNOWN to recognize a 68000 object, so this will
probably no longer reject a NewsOS object. <ian@cygnus.com>. */ probably no longer reject a NewsOS object. <ian@cygnus.com>. */
#ifndef MACHTYPE_OK #ifndef MACHTYPE_OK
#define MACHTYPE_OK(mtype) \ #define MACHTYPE_OK(mtype) \
(((mtype) == M_SPARC && bfd_lookup_arch (bfd_arch_sparc, 0) != NULL) \ (((mtype) == M_SPARC && bfd_lookup_arch (bfd_arch_sparc, 0) != NULL) \
@ -123,7 +123,7 @@ sunos_set_arch_mach (abfd, machtype)
case M_UNKNOWN: case M_UNKNOWN:
/* Some Sun3s make magic numbers without cpu types in them, so /* Some Sun3s make magic numbers without cpu types in them, so
we'll default to the 68000. */ we'll default to the 68000. */
arch = bfd_arch_m68k; arch = bfd_arch_m68k;
machine = bfd_mach_m68000; machine = bfd_mach_m68000;
break; break;
@ -275,11 +275,11 @@ sunos_write_object_contents (abfd)
Unfortunately, they don't document the FPA structure, or at least I Unfortunately, they don't document the FPA structure, or at least I
can't find it easily. Fortunately the core header contains its own can't find it easily. Fortunately the core header contains its own
length. So this shouldn't cause problems, except for c_ucode, which length. So this shouldn't cause problems, except for c_ucode, which
so far we don't use but is easy to find with a little arithmetic. */ so far we don't use but is easy to find with a little arithmetic. */
/* But the reg structure can be gotten from the SPARC processor handbook. /* But the reg structure can be gotten from the SPARC processor handbook.
This really should be in a GNU include file though so that gdb can use This really should be in a GNU include file though so that gdb can use
the same info. */ the same info. */
struct regs struct regs
{ {
int r_psr; int r_psr;
@ -439,7 +439,7 @@ swapcore_sun3 (abfd, ext, intcore)
intcore->c_ssize = bfd_h_get_32 (abfd, (unsigned char *) &extcore->c_ssize); intcore->c_ssize = bfd_h_get_32 (abfd, (unsigned char *) &extcore->c_ssize);
memcpy (intcore->c_cmdname, extcore->c_cmdname, sizeof (intcore->c_cmdname)); memcpy (intcore->c_cmdname, extcore->c_cmdname, sizeof (intcore->c_cmdname));
intcore->fp_stuff_pos = (long) (((struct external_sun3_core *) 0)->fp_stuff); intcore->fp_stuff_pos = (long) (((struct external_sun3_core *) 0)->fp_stuff);
/* FP stuff takes up whole rest of struct, except c_ucode. */ /* FP stuff takes up whole rest of struct, except c_ucode. */
intcore->fp_stuff_size = intcore->c_len - (sizeof extcore->c_ucode) - intcore->fp_stuff_size = intcore->c_len - (sizeof extcore->c_ucode) -
(file_ptr) (((struct external_sun3_core *) 0)->fp_stuff); (file_ptr) (((struct external_sun3_core *) 0)->fp_stuff);
/* Ucode is the last thing in the struct -- just before the end */ /* Ucode is the last thing in the struct -- just before the end */
@ -449,7 +449,6 @@ swapcore_sun3 (abfd, ext, intcore)
intcore->c_stacktop = 0x0E000000; /* By experimentation */ intcore->c_stacktop = 0x0E000000; /* By experimentation */
} }
/* byte-swap in the Sparc core structure */ /* byte-swap in the Sparc core structure */
static void static void
swapcore_sparc (abfd, ext, intcore) swapcore_sparc (abfd, ext, intcore)
@ -476,7 +475,7 @@ swapcore_sparc (abfd, ext, intcore)
intcore->c_ssize = bfd_h_get_32 (abfd, (unsigned char *) &extcore->c_ssize); intcore->c_ssize = bfd_h_get_32 (abfd, (unsigned char *) &extcore->c_ssize);
memcpy (intcore->c_cmdname, extcore->c_cmdname, sizeof (intcore->c_cmdname)); memcpy (intcore->c_cmdname, extcore->c_cmdname, sizeof (intcore->c_cmdname));
intcore->fp_stuff_pos = (long) (((struct external_sparc_core *) 0)->fp_stuff); intcore->fp_stuff_pos = (long) (((struct external_sparc_core *) 0)->fp_stuff);
/* FP stuff takes up whole rest of struct, except c_ucode. */ /* FP stuff takes up whole rest of struct, except c_ucode. */
intcore->fp_stuff_size = intcore->c_len - (sizeof extcore->c_ucode) - intcore->fp_stuff_size = intcore->c_len - (sizeof extcore->c_ucode) -
(file_ptr) (((struct external_sparc_core *) 0)->fp_stuff); (file_ptr) (((struct external_sparc_core *) 0)->fp_stuff);
/* Ucode is the last thing in the struct -- just before the end */ /* Ucode is the last thing in the struct -- just before the end */
@ -544,7 +543,7 @@ swapcore_solaris_bcp (abfd, ext, intcore)
memcpy (intcore->c_cmdname, extcore->c_cmdname, sizeof (intcore->c_cmdname)); memcpy (intcore->c_cmdname, extcore->c_cmdname, sizeof (intcore->c_cmdname));
intcore->fp_stuff_pos = intcore->fp_stuff_pos =
(long) (((struct external_solaris_bcp_core *) 0)->fp_stuff); (long) (((struct external_solaris_bcp_core *) 0)->fp_stuff);
/* FP stuff takes up whole rest of struct, except c_ucode. */ /* FP stuff takes up whole rest of struct, except c_ucode. */
intcore->fp_stuff_size = intcore->c_len - (sizeof extcore->c_ucode) - intcore->fp_stuff_size = intcore->c_len - (sizeof extcore->c_ucode) -
(file_ptr) (((struct external_solaris_bcp_core *) 0)->fp_stuff); (file_ptr) (((struct external_solaris_bcp_core *) 0)->fp_stuff);
/* Ucode is the last thing in the struct -- just before the end */ /* Ucode is the last thing in the struct -- just before the end */
@ -764,7 +763,7 @@ sunos4_core_file_matches_executable_p (core_bfd, exec_bfd)
return false; return false;
} }
/* Solaris core files do not include an aouthdr. */ /* Solaris core files do not include an aouthdr. */
if ((core_hdr (core_bfd)->hdr)->c_len == SOLARIS_BCP_CORE_LEN) if ((core_hdr (core_bfd)->hdr)->c_len == SOLARIS_BCP_CORE_LEN)
return true; return true;

40
bfd/aoutx.h
View File

@ -23,7 +23,6 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
SECTION SECTION
a.out backends a.out backends
DESCRIPTION DESCRIPTION
BFD supports a number of different flavours of a.out format, BFD supports a number of different flavours of a.out format,
@ -363,7 +362,7 @@ NAME(aout,swap_exec_header_in) (abfd, raw_bytes, execp)
/* The internal_exec structure has some fields that are unused in this /* The internal_exec structure has some fields that are unused in this
configuration (IE for i960), so ensure that all such uninitialized configuration (IE for i960), so ensure that all such uninitialized
fields are zero'd out. There are places where two of these structs fields are zero'd out. There are places where two of these structs
are memcmp'd, and thus the contents do matter. */ are memcmp'd, and thus the contents do matter. */
memset ((PTR) execp, 0, sizeof (struct internal_exec)); memset ((PTR) execp, 0, sizeof (struct internal_exec));
/* Now fill in fields in the execp, from the bytes in the raw data. */ /* Now fill in fields in the execp, from the bytes in the raw data. */
execp->a_info = bfd_h_get_32 (abfd, bytes->e_info); execp->a_info = bfd_h_get_32 (abfd, bytes->e_info);
@ -400,7 +399,7 @@ NAME(aout,swap_exec_header_out) (abfd, execp, raw_bytes)
{ {
struct external_exec *bytes = (struct external_exec *)raw_bytes; struct external_exec *bytes = (struct external_exec *)raw_bytes;
/* Now fill in fields in the raw data, from the fields in the exec struct. */ /* Now fill in fields in the raw data, from the fields in the exec struct. */
bfd_h_put_32 (abfd, execp->a_info , bytes->e_info); bfd_h_put_32 (abfd, execp->a_info , bytes->e_info);
PUT_WORD (abfd, execp->a_text , bytes->e_text); PUT_WORD (abfd, execp->a_text , bytes->e_text);
PUT_WORD (abfd, execp->a_data , bytes->e_data); PUT_WORD (abfd, execp->a_data , bytes->e_data);
@ -517,7 +516,7 @@ NAME(aout,some_aout_object_p) (abfd, execp, callback_to_real_object_p)
/* The default relocation entry size is that of traditional V7 Unix. */ /* The default relocation entry size is that of traditional V7 Unix. */
obj_reloc_entry_size (abfd) = RELOC_STD_SIZE; obj_reloc_entry_size (abfd) = RELOC_STD_SIZE;
/* The default symbol entry size is that of traditional Unix. */ /* The default symbol entry size is that of traditional Unix. */
obj_symbol_entry_size (abfd) = EXTERNAL_NLIST_SIZE; obj_symbol_entry_size (abfd) = EXTERNAL_NLIST_SIZE;
#ifdef USE_MMAP #ifdef USE_MMAP
@ -616,7 +615,7 @@ NAME(aout,some_aout_object_p) (abfd, execp, callback_to_real_object_p)
To fix this, we now accept any non-zero entry point as an indication of To fix this, we now accept any non-zero entry point as an indication of
executability. This will work most of the time, since only the linker executability. This will work most of the time, since only the linker
sets the entry point, and that is likely to be non-zero for most systems. */ sets the entry point, and that is likely to be non-zero for most systems. */
if (execp->a_entry != 0 if (execp->a_entry != 0
|| (execp->a_entry >= obj_textsec(abfd)->vma || (execp->a_entry >= obj_textsec(abfd)->vma
@ -693,7 +692,6 @@ NAME(aout,mkobject) (abfd)
return true; return true;
} }
/* /*
FUNCTION FUNCTION
aout_@var{size}_machine_type aout_@var{size}_machine_type
@ -814,7 +812,6 @@ NAME(aout,machine_type) (arch, machine, unknown)
return arch_flags; return arch_flags;
} }
/* /*
FUNCTION FUNCTION
aout_@var{size}_set_arch_mach aout_@var{size}_set_arch_mach
@ -1114,7 +1111,7 @@ NAME(aout,adjust_sizes_and_vmas) (abfd, text_size, text_end)
(TARGET_PAGE_SIZE). However, newer versions of SUNOS start the text (TARGET_PAGE_SIZE). However, newer versions of SUNOS start the text
segment right after the exec header; the latter is counted in the segment right after the exec header; the latter is counted in the
text segment size, and is paged in by the kernel with the rest of text segment size, and is paged in by the kernel with the rest of
the text. */ the text. */
/* This perhaps isn't the right way to do this, but made it simpler for me /* This perhaps isn't the right way to do this, but made it simpler for me
to understand enough to implement it. Better would probably be to go to understand enough to implement it. Better would probably be to go
@ -1201,7 +1198,6 @@ NAME(aout,new_section_hook) (abfd, newsect)
/* align to double at least */ /* align to double at least */
newsect->alignment_power = bfd_get_arch_info(abfd)->section_align_power; newsect->alignment_power = bfd_get_arch_info(abfd)->section_align_power;
if (bfd_get_format (abfd) == bfd_object) if (bfd_get_format (abfd) == bfd_object)
{ {
if (obj_textsec(abfd) == NULL && !strcmp(newsect->name, ".text")) { if (obj_textsec(abfd) == NULL && !strcmp(newsect->name, ".text")) {
@ -1722,7 +1718,7 @@ translate_to_native_sym_flags (abfd, cache_ptr, sym_pointer)
return true; return true;
} }
/* Native-level interface to symbols. */ /* Native-level interface to symbols. */
asymbol * asymbol *
NAME(aout,make_empty_symbol) (abfd) NAME(aout,make_empty_symbol) (abfd)
@ -1789,7 +1785,7 @@ NAME(aout,translate_symbol_table) (abfd, in, ext, count, str, strsize, dynamic)
/* We read the symbols into a buffer, which is discarded when this /* We read the symbols into a buffer, which is discarded when this
function exits. We read the strings into a buffer large enough to function exits. We read the strings into a buffer large enough to
hold them all plus all the cached symbol entries. */ hold them all plus all the cached symbol entries. */
boolean boolean
NAME(aout,slurp_symbol_table) (abfd) NAME(aout,slurp_symbol_table) (abfd)
@ -1997,7 +1993,7 @@ NAME(aout,get_symtab) (abfd, location)
/* Standard reloc stuff */ /* Standard reloc stuff */
/* Output standard relocation information to a file in target byte order. */ /* Output standard relocation information to a file in target byte order. */
extern void NAME(aout,swap_std_reloc_out) extern void NAME(aout,swap_std_reloc_out)
PARAMS ((bfd *, arelent *, struct reloc_std_external *)); PARAMS ((bfd *, arelent *, struct reloc_std_external *));
@ -2040,7 +2036,6 @@ NAME(aout,swap_std_reloc_out) (abfd, g, natptr)
check for that here check for that here
*/ */
if (bfd_is_com_section (output_section) if (bfd_is_com_section (output_section)
|| bfd_is_abs_section (output_section) || bfd_is_abs_section (output_section)
|| bfd_is_und_section (output_section)) || bfd_is_und_section (output_section))
@ -2093,9 +2088,8 @@ NAME(aout,swap_std_reloc_out) (abfd, g, natptr)
} }
} }
/* Extended stuff */ /* Extended stuff */
/* Output extended relocation information to a file in target byte order. */ /* Output extended relocation information to a file in target byte order. */
extern void NAME(aout,swap_ext_reloc_out) extern void NAME(aout,swap_ext_reloc_out)
PARAMS ((bfd *, arelent *, struct reloc_ext_external *)); PARAMS ((bfd *, arelent *, struct reloc_ext_external *));
@ -2177,7 +2171,6 @@ NAME(aout,swap_ext_reloc_out) (abfd, g, natptr)
contain 60. This macro subs the base of each section from the value contain 60. This macro subs the base of each section from the value
to give the true offset from the section */ to give the true offset from the section */
#define MOVE_ADDRESS(ad) \ #define MOVE_ADDRESS(ad) \
if (r_extern) { \ if (r_extern) { \
/* undefined symbol */ \ /* undefined symbol */ \
@ -2552,7 +2545,6 @@ NAME(aout,get_symtab_upper_bound) (abfd)
return (bfd_get_symcount (abfd)+1) * (sizeof (aout_symbol_type *)); return (bfd_get_symcount (abfd)+1) * (sizeof (aout_symbol_type *));
} }
/*ARGSUSED*/
alent * alent *
NAME(aout,get_lineno) (ignore_abfd, ignore_symbol) NAME(aout,get_lineno) (ignore_abfd, ignore_symbol)
bfd *ignore_abfd ATTRIBUTE_UNUSED; bfd *ignore_abfd ATTRIBUTE_UNUSED;
@ -2561,7 +2553,6 @@ NAME(aout,get_lineno) (ignore_abfd, ignore_symbol)
return (alent *)NULL; return (alent *)NULL;
} }
/*ARGSUSED*/
void void
NAME(aout,get_symbol_info) (ignore_abfd, symbol, ret) NAME(aout,get_symbol_info) (ignore_abfd, symbol, ret)
bfd *ignore_abfd ATTRIBUTE_UNUSED; bfd *ignore_abfd ATTRIBUTE_UNUSED;
@ -2589,7 +2580,6 @@ NAME(aout,get_symbol_info) (ignore_abfd, symbol, ret)
} }
} }
/*ARGSUSED*/
void void
NAME(aout,print_symbol) (ignore_abfd, afile, symbol, how) NAME(aout,print_symbol) (ignore_abfd, afile, symbol, how)
bfd *ignore_abfd ATTRIBUTE_UNUSED; bfd *ignore_abfd ATTRIBUTE_UNUSED;
@ -2613,7 +2603,6 @@ NAME(aout,print_symbol) (ignore_abfd, afile, symbol, how)
{ {
CONST char *section_name = symbol->section->name; CONST char *section_name = symbol->section->name;
bfd_print_symbol_vandf((PTR)file,symbol); bfd_print_symbol_vandf((PTR)file,symbol);
fprintf(file," %-5s %04x %02x %02x", fprintf(file," %-5s %04x %02x %02x",
@ -2722,8 +2711,8 @@ NAME(aout,find_nearest_line)
CONST char *directory_name = NULL; CONST char *directory_name = NULL;
CONST char *main_file_name = NULL; CONST char *main_file_name = NULL;
CONST char *current_file_name = NULL; CONST char *current_file_name = NULL;
CONST char *line_file_name = NULL; /* Value of current_file_name at line number. */ CONST char *line_file_name = NULL; /* Value of current_file_name at line number. */
CONST char *line_directory_name = NULL; /* Value of directory_name at line number. */ CONST char *line_directory_name = NULL; /* Value of directory_name at line number. */
bfd_vma low_line_vma = 0; bfd_vma low_line_vma = 0;
bfd_vma low_func_vma = 0; bfd_vma low_func_vma = 0;
asymbol *func = 0; asymbol *func = 0;
@ -2782,7 +2771,7 @@ NAME(aout,find_nearest_line)
} }
main_file_name = current_file_name = q->symbol.name; main_file_name = current_file_name = q->symbol.name;
/* Look ahead to next symbol to check if that too is an N_SO. */ /* Look ahead to next symbol to check if that too is an N_SO. */
p++; p++;
if (*p == NULL) if (*p == NULL)
break; break;
@ -2790,7 +2779,7 @@ NAME(aout,find_nearest_line)
if (q->type != (int)N_SO) if (q->type != (int)N_SO)
goto next; goto next;
/* Found a second N_SO First is directory; second is filename. */ /* Found a second N_SO First is directory; second is filename. */
directory_name = current_file_name; directory_name = current_file_name;
main_file_name = current_file_name = q->symbol.name; main_file_name = current_file_name = q->symbol.name;
if (obj_textsec(abfd) != section) if (obj_textsec(abfd) != section)
@ -2898,7 +2887,6 @@ NAME(aout,find_nearest_line)
return true; return true;
} }
/*ARGSUSED*/
int int
NAME(aout,sizeof_headers) (abfd, execable) NAME(aout,sizeof_headers) (abfd, execable)
bfd *abfd; bfd *abfd;
@ -4142,7 +4130,7 @@ aout_link_write_symbols (finfo, input_bfd)
/* We have saved the hash table entry for this symbol, if /* We have saved the hash table entry for this symbol, if
there is one. Note that we could just look it up again there is one. Note that we could just look it up again
in the hash table, provided we first check that it is an in the hash table, provided we first check that it is an
external symbol. */ external symbol. */
h = *sym_hash; h = *sym_hash;
/* Use the name from the hash table, in case the symbol was /* Use the name from the hash table, in case the symbol was

18
bfd/archures.c
View File

@ -240,7 +240,6 @@ DESCRIPTION
. bfd_arch_last . bfd_arch_last
. }; . };
*/ */
/* /*
@ -384,8 +383,6 @@ bfd_printable_name (abfd)
return abfd->arch_info->printable_name; return abfd->arch_info->printable_name;
} }
/* /*
FUNCTION FUNCTION
bfd_scan_arch bfd_scan_arch
@ -419,8 +416,6 @@ bfd_scan_arch (string)
return NULL; return NULL;
} }
/* /*
FUNCTION FUNCTION
bfd_arch_list bfd_arch_list
@ -474,8 +469,6 @@ bfd_arch_list ()
return name_list; return name_list;
} }
/* /*
FUNCTION FUNCTION
bfd_arch_get_compatible bfd_arch_get_compatible
@ -509,7 +502,6 @@ bfd_arch_get_compatible (abfd, bbfd)
return abfd->arch_info->compatible (abfd->arch_info, bbfd->arch_info); return abfd->arch_info->compatible (abfd->arch_info, bbfd->arch_info);
} }
/* /*
INTERNAL_DEFINITION INTERNAL_DEFINITION
bfd_default_arch_struct bfd_default_arch_struct
@ -595,7 +587,6 @@ bfd_default_set_arch_mach (abfd, arch, mach)
return false; return false;
} }
/* /*
FUNCTION FUNCTION
bfd_get_arch bfd_get_arch
@ -674,7 +665,6 @@ bfd_arch_bits_per_address (abfd)
return abfd->arch_info->bits_per_address; return abfd->arch_info->bits_per_address;
} }
/* /*
INTERNAL_FUNCTION INTERNAL_FUNCTION
bfd_default_compatible bfd_default_compatible
@ -705,7 +695,6 @@ bfd_default_compatible (a,b)
return a; return a;
} }
/* /*
INTERNAL_FUNCTION INTERNAL_FUNCTION
bfd_default_scan bfd_default_scan
@ -775,7 +764,7 @@ bfd_default_scan (info, string)
/* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>; Do not /* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>; Do not
attempt to match just <mach>, it could be ambigious. This test attempt to match just <mach>, it could be ambigious. This test
is left until later. */ is left until later. */
/* NOTE: The below is retained for compatibility only. Please do not /* NOTE: The below is retained for compatibility only. Please do not
add to this code */ add to this code */
@ -811,7 +800,7 @@ bfd_default_scan (info, string)
} }
/* NOTE: The below is retained for compatibility only. /* NOTE: The below is retained for compatibility only.
PLEASE DO NOT ADD TO THIS CODE. */ PLEASE DO NOT ADD TO THIS CODE. */
switch (number) switch (number)
{ {
@ -908,7 +897,6 @@ bfd_default_scan (info, string)
return true; return true;
} }
/* /*
FUNCTION FUNCTION
bfd_get_arch_info bfd_get_arch_info
@ -927,7 +915,6 @@ bfd_get_arch_info (abfd)
return abfd->arch_info; return abfd->arch_info;
} }
/* /*
FUNCTION FUNCTION
bfd_lookup_arch bfd_lookup_arch
@ -966,7 +953,6 @@ bfd_lookup_arch (arch, machine)
return NULL; return NULL;
} }
/* /*
FUNCTION FUNCTION
bfd_printable_arch_mach bfd_printable_arch_mach

2
bfd/armnetbsd.c
View File

@ -15,7 +15,7 @@ GNU General Public License for more details.
You should have received a copy of the GNU General Public License You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
#define BYTES_IN_WORD 4 #define BYTES_IN_WORD 4
#undef TARGET_IS_BIG_ENDIAN_P #undef TARGET_IS_BIG_ENDIAN_P