Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
clean-and-itasks
clean-graph-copy
Commits
fdfe59fd
Commit
fdfe59fd
authored
Oct 07, 2016
by
Arjan Oortgiese
Browse files
Fix for 32-bit with PIC flag (e.g. Android).
parent
9833c71c
Changes
1
Hide whitespace changes
Inline
Side-by-side
common/graph_copy_with_names.icl
View file @
fdfe59fd
...
...
@@ -64,7 +64,10 @@ get_thunk_arity_64 a = code {
load_si32
-4
}
get_thunk_descriptor
a
:==
IF_INT_64_OR_32
(
get_thunk_descriptor_64_platform
a
)
(
get_thunk_descriptor_32
a
);
get_thunk_descriptor
a
:==
IF_INT_64_OR_32
(
get_thunk_descriptor_64_platform
a
)
(
get_thunk_descriptor_32_platform
a
);
get_thunk_descriptor_32_platform
::
!
Int
->
Int
;
get_thunk_descriptor_32_platform
a
=
if
(
is_using_desc_relative_to_array
==
0
)
(
get_thunk_descriptor_32
a
)
(
get_thunk_descriptor_32_PIC
a
);
get_thunk_descriptor_64_platform
::
!
Int
->
Int
;
get_thunk_descriptor_64_platform
a
=
if
(
not
isMacOS
)
(
get_thunk_descriptor_64
a
)
(
get_thunk_descriptor_64_MacOS
a
);
...
...
@@ -88,6 +91,15 @@ get_thunk_descriptor_32 a = code {
load_i
-8
}
get_thunk_descriptor_32_PIC
::
!
Int
->
Int
;
get_thunk_descriptor_32_PIC
a
=
code {
push_b
0
load_i
-8
addI
pushI
-8
addI
}
is_Int_D
::
!
Int
->
Bool
;
is_Int_D
d
=
code inline {
eq_desc_b
INT
0
...
...
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