Skip to content
Projects
Groups
Snippets
Help
This project
Loading...
Sign in / Register
Toggle navigation
R
riscv-gcc-1
Overview
Overview
Details
Activity
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
lvzhengyang
riscv-gcc-1
Commits
2461c08b
Commit
2461c08b
authored
Oct 22, 2003
by
Andreas Schwab
Committed by
Andreas Schwab
Oct 22, 2003
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
* src/ia64/ffi.c: Replace FALSE/TRUE with false/true.
From-SVN: r72797
parent
77c018b7
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
17 additions
and
13 deletions
+17
-13
libffi/ChangeLog
+4
-0
libffi/src/ia64/ffi.c
+13
-13
No files found.
libffi/ChangeLog
View file @
2461c08b
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).
...
...
libffi/src/ia64/ffi.c
View file @
2461c08b
...
@@ -93,33 +93,33 @@ static bool is_homogeneous_fp_aggregate(ffi_type * type, int n,
...
@@ -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
...
@@ -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)
...
@@ -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)
...
@@ -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)
...
@@ -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
;
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment