]> git.ipfire.org Git - thirdparty/gcc.git/commit
ada: Tune check for restriction No_Relative_Delay and call to Set_Handler
authorPiotr Trojanek <trojanek@adacore.com>
Thu, 3 Jul 2025 08:10:56 +0000 (10:10 +0200)
committerMarc Poulhiès <dkm@gcc.gnu.org>
Tue, 22 Jul 2025 08:35:14 +0000 (10:35 +0200)
commit7e533dbd8ce2b786c5c5d174b992197947fbd70d
tree0e65e62d2fcff7977133cf71bdaf93563e61e1e1
parentb14337e3777ac4525ceedd5df3decb63fc271604
ada: Tune check for restriction No_Relative_Delay and call to Set_Handler

When checking restriction No_Relative_Delay and detecting calls to
Ada.Real_Time.Timing_Events.Set_Handler with a Time_Span parameter,
we looked at the exact type of the actual parameter, while we should
look at its base type.

This patch looks at the type of actual parameter like it is done in
Expand_N_Delay_Until_Statement.

gcc/ada/ChangeLog:

* sem_res.adb (Resolve_Call): Look at the base type of actual parameter
when checking call to Set_Handler.
gcc/ada/sem_res.adb