[Ada] Fix internal error on library-level type extended locally

[Eric Botcazou]

This is a regression present on the mainline, 10 and 9 branches: the compiler 
aborts on the local extension of a tagged type declared at library level, with 
a progenitor given by an interface type having a primitive that is a homograph 
of a primitive of the tagged type.

Tested on x86-64/Linux, applied on the mainline, 10 and 9 branches.


2020-12-07  Eric Botcazou  <ebotcazou@adacore.com>

	* gcc-interface/trans.c (maybe_make_gnu_thunk): Return false if the
	target is local and thunk and target do not have the same context.

-- 
Eric Botcazou
-------------- next part --------------
A non-text attachment was scrubbed...
Name: p.diff
Type: text/x-patch
Size: 909 bytes
Desc: not available
URL: <https://gcc.gnu.org/pipermail/gcc-patches/attachments/20201207/4442d6b8/attachment.bin>