From 3af132b801a6e58c530a6571117df51bca6f6572 Mon Sep 17 00:00:00 2001 From: Thomas Quinot Date: Thu, 6 Feb 2020 19:03:24 +0100 Subject: [PATCH] [Ada] Add note about gnatcov reliance on thunk names 2020-06-05 Thomas Quinot gcc/ada/ * exp_disp.adb (Expand_Interface_Thunk): Add comment about gnatcov reliance on specific name used for thunks. --- gcc/ada/exp_disp.adb | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/gcc/ada/exp_disp.adb b/gcc/ada/exp_disp.adb index 69c536f..a812556 100644 --- a/gcc/ada/exp_disp.adb +++ b/gcc/ada/exp_disp.adb @@ -2137,6 +2137,11 @@ package body Exp_Disp is end loop; Thunk_Id := Make_Temporary (Loc, 'T'); + + -- Note: any change to this symbol name needs to be coordinated + -- with GNATcoverage, as that tool relies on it to identify + -- thunks and exclude them from source coverage analysis. + Set_Ekind (Thunk_Id, Ekind (Prim)); Set_Is_Thunk (Thunk_Id); Set_Convention (Thunk_Id, Convention (Prim)); -- 2.7.4