https://gcc.gnu.org/g:a846b4cfc7383e7a2550993cbf669b94db838069
commit r15-2667-ga846b4cfc7383e7a2550993cbf669b94db838069
Author: Steve Baird <ba...@adacore.com>
Date: Mon Jul 8 14:45:55 2024 -0700
ada: Type conversion in instance incorrectly rejected.
In some cases, a legal type conversion in a generic package is correctly
accepted but the corresponding type conversion in an instance of the generic
is incorrectly rejected.
gcc/ada/
* sem_res.adb (Valid_Conversion): Test In_Instance instead of
In_Instance_Body.
Diff:
---
gcc/ada/sem_res.adb | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/gcc/ada/sem_res.adb b/gcc/ada/sem_res.adb
index 8a18430ff585..9a3b6ddbb534 100644
--- a/gcc/ada/sem_res.adb
+++ b/gcc/ada/sem_res.adb
@@ -14697,7 +14697,7 @@ package body Sem_Res is
-- If it was legal in the generic, it's legal in the instance
- elsif In_Instance_Body then
+ elsif In_Instance then
return True;
-- Ignore privacy for streaming or Put_Image routines
