diff options
| -rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/testsuite/gnat.dg/subp_inst_pkg.adb | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 8488ae9..9174880 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2019-12-12 Pierre-Marie de Rodat <derodat@adacore.com> + + * gnat.dg/subp_inst_pkg.adb: Remove implicit anonymous access + conversion. + 2019-12-11 Jakub Jelinek <jakub@redhat.com> PR target/92723 diff --git a/gcc/testsuite/gnat.dg/subp_inst_pkg.adb b/gcc/testsuite/gnat.dg/subp_inst_pkg.adb index 8fd2663..72b4fe8 100644 --- a/gcc/testsuite/gnat.dg/subp_inst_pkg.adb +++ b/gcc/testsuite/gnat.dg/subp_inst_pkg.adb @@ -14,7 +14,7 @@ package body Subp_Inst_Pkg is function Convert is new Ada.Unchecked_Conversion (T_Access, System.Address); begin - return System.Address_Image (Convert (Val)); + return System.Address_Image (Convert (T_Access (Val))); end T_Image; end Subp_Inst_Pkg; |