FreeChainXenon/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* src/ia64/ffi.c: Replace FALSE/TRUE with false/true.

Browse source 
From-SVN: r72797
This commit is contained in:
Andreas Schwab 2003-10-22 13:57:12 +00:00 • committed by Andreas Schwab
parent 77c018b7b8
commit 2461c08bab
2 changed files with 17 additions and 13 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
libffi/ChangeLog
View file

@ -1,3 +1,7 @@
2003-10-22 Andreas Schwab <schwab@suse.de>
* src/ia64/ffi.c: Replace FALSE/TRUE with false/true.
2003-10-21 Andreas Tobler <a.tobler@schweiz.ch> 2003-10-21 Andreas Tobler <a.tobler@schweiz.ch>
* configure.in: AC_LINK_FILES(ffitarget.h). * configure.in: AC_LINK_FILES(ffitarget.h).

26
libffi/src/ia64/ffi.c
View file

@ -93,33 +93,33 @@ static bool is_homogeneous_fp_aggregate(ffi_type * type, int n,
switch((*ptr) -> type) { switch((*ptr) -> type) {
case FFI_TYPE_FLOAT: case FFI_TYPE_FLOAT:
if (type_set && element != FFI_TYPE_FLOAT) return 0; if (type_set && element != FFI_TYPE_FLOAT) return 0;
if (--n < 0) return FALSE; if (--n < 0) return false;
type_set = 1; type_set = 1;
element = FFI_TYPE_FLOAT; element = FFI_TYPE_FLOAT;
break; break;
case FFI_TYPE_DOUBLE: case FFI_TYPE_DOUBLE:
if (type_set && element != FFI_TYPE_DOUBLE) return 0; if (type_set && element != FFI_TYPE_DOUBLE) return 0;
if (--n < 0) return FALSE; if (--n < 0) return false;
type_set = 1; type_set = 1;
element = FFI_TYPE_DOUBLE; element = FFI_TYPE_DOUBLE;
break; break;
case FFI_TYPE_STRUCT: case FFI_TYPE_STRUCT:
if (!is_homogeneous_fp_aggregate(type, n, &struct_element)) if (!is_homogeneous_fp_aggregate(type, n, &struct_element))
return FALSE; return false;
if (type_set && struct_element != element) return FALSE; if (type_set && struct_element != element) return false;
n -= (type -> size)/float_type_size(element); n -= (type -> size)/float_type_size(element);
element = struct_element; element = struct_element;
if (n < 0) return FALSE; if (n < 0) return false;
break; break;
/* case FFI_TYPE_LONGDOUBLE: /* case FFI_TYPE_LONGDOUBLE:
Not yet implemented. */ Not yet implemented. */
default: default:
return FALSE; return false;
} }
ptr++; ptr++;
} }
*element_type = element; *element_type = element;
return TRUE; return true;
} }
@ -252,7 +252,7 @@ ffi_status
ffi_prep_cif_machdep(ffi_cif *cif) ffi_prep_cif_machdep(ffi_cif *cif)
{ {
long i, avn; long i, avn;
bool is_simple = TRUE; bool is_simple = true;
long simple_flag = FFI_SIMPLE_V; long simple_flag = FFI_SIMPLE_V;
/* Adjust cif->bytes to include space for the 2 scratch words, /* Adjust cif->bytes to include space for the 2 scratch words,
r8 register contents, spare word, r8 register contents, spare word,
@ -282,11 +282,11 @@ ffi_prep_cif_machdep(ffi_cif *cif)
simple_flag = FFI_ADD_LONG_ARG(simple_flag); simple_flag = FFI_ADD_LONG_ARG(simple_flag);
break; break;
default: default:
is_simple = FALSE; is_simple = false;
} }
} }
} else { } else {
is_simple = FALSE; is_simple = false;
} }
/* Set the return type flag */ /* Set the return type flag */
@ -301,7 +301,7 @@ ffi_prep_cif_machdep(ffi_cif *cif)
size_t sz = cif -> rtype -> size; size_t sz = cif -> rtype -> size;
unsigned short element_type; unsigned short element_type;
is_simple = FALSE; is_simple = false;
if (is_homogeneous_fp_aggregate(cif -> rtype, 8, &element_type)) { if (is_homogeneous_fp_aggregate(cif -> rtype, 8, &element_type)) {
int nelements = sz/float_type_size(element_type); int nelements = sz/float_type_size(element_type);
if (nelements <= 1) { if (nelements <= 1) {
@ -342,12 +342,12 @@ ffi_prep_cif_machdep(ffi_cif *cif)
break; break;
case FFI_TYPE_FLOAT: case FFI_TYPE_FLOAT:
is_simple = FALSE; is_simple = false;
cif->flags = FFI_TYPE_FLOAT; cif->flags = FFI_TYPE_FLOAT;
break; break;
case FFI_TYPE_DOUBLE: case FFI_TYPE_DOUBLE:
is_simple = FALSE; is_simple = false;
cif->flags = FFI_TYPE_DOUBLE; cif->flags = FFI_TYPE_DOUBLE;
break; break;