diff options
author | Sheri Bernstein <bernstein@adacore.com> | 2023-08-09 16:04:31 +0000 |
---|---|---|
committer | Marc Poulhiès <poulhies@adacore.com> | 2023-10-19 16:35:22 +0200 |
commit | c1fbfe5acbf02674c9fb411ffcccec5c6ed9a5eb (patch) | |
tree | 7d177d0b01d67a8a17775a3c2901458ee17ae3ba /gcc/ada/sem_ch6.adb | |
parent | 0f3c6348403ad1f6d077f6a09d914f5ec369f784 (diff) | |
download | gcc-c1fbfe5acbf02674c9fb411ffcccec5c6ed9a5eb.zip gcc-c1fbfe5acbf02674c9fb411ffcccec5c6ed9a5eb.tar.gz gcc-c1fbfe5acbf02674c9fb411ffcccec5c6ed9a5eb.tar.bz2 |
ada: Refactor code to remove GNATcheck violation
Rewrite for loop containing an exit (which violates GNATcheck
rule Exits_From_Conditional_Loops), to use a while loop
which contains the exit criteria in its condition.
Also, move special case of first time through loop, to come
before loop.
gcc/ada/
* libgnat/s-imagef.adb (Set_Image_Fixed): Refactor loop.
Diffstat (limited to 'gcc/ada/sem_ch6.adb')
0 files changed, 0 insertions, 0 deletions