diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-01-03 15:35:16 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-01-03 15:35:16 +0000 |
commit | 18d552942b888f44f47caeafe766cbb02c888c69 (patch) | |
tree | 53590e1867ac15c4a766621c129b8b6971ad96f6 /gcc/ada/gigi.h | |
parent | f2a06be9b62f7038b9a0939f40364864ce1f4338 (diff) | |
download | gcc-18d552942b888f44f47caeafe766cbb02c888c69.tar.gz |
* decl.c (compatible_signatures_p): New function. The intended purpose
is to check if two function signatures for a call-site and a callee are
compatible enough for the call to be valid. The underlying purpose is
to check if a call to a mapped builtin is using the right interface.
The current code actually does not check antyhing - this a placeholder
for future refinements.
(gnat_to_gnu_entity) <E_Subprogram_Call>: Add preliminary bits to handle
builtin calls for convention Intrinsic.
* gigi.h (builtin_decl_for): Declare (new function).
* utils.c (gnat_install_builtins): Install the target specific builtins.
(builtin_decl_for): New function, provide a dummy body for now.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@92833 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/gigi.h')
-rw-r--r-- | gcc/ada/gigi.h | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/gcc/ada/gigi.h b/gcc/ada/gigi.h index 20784c1b5d2..bb03912a637 100644 --- a/gcc/ada/gigi.h +++ b/gcc/ada/gigi.h @@ -687,6 +687,11 @@ extern bool gnat_mark_addressable (tree); extern tree builtin_function (const char *, tree, int, enum built_in_class, const char *, tree); +/* Search the chain of currently reachable declarations for a builtin + FUNCTION_DECL node corresponding to function NAME (an IDENTIFIER_NODE). + Return the first node found, if any, or NULL_TREE otherwise. */ +extern tree builtin_decl_for (tree); + /* This function is called by the front end to enumerate all the supported modes for the machine. We pass a function which is called back with the following integer parameters: |