aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/sem_case.adb
diff options
context:
space:
mode:
authorPiotr Trojanek <trojanek@adacore.com>2022-02-03 21:28:44 +0100
committerPierre-Marie de Rodat <derodat@adacore.com>2022-05-11 08:53:20 +0000
commitbd97da66c886a69c2d831dad1b3ffe06aa1879fe (patch)
tree99a0af3601a25ec03b08e5ad39b5cfe3b1263a8c /gcc/ada/sem_case.adb
parente6f7d5ff4f990c8f614c654353a3aa843f009349 (diff)
downloadgcc-bd97da66c886a69c2d831dad1b3ffe06aa1879fe.zip
gcc-bd97da66c886a69c2d831dad1b3ffe06aa1879fe.tar.gz
gcc-bd97da66c886a69c2d831dad1b3ffe06aa1879fe.tar.bz2
[Ada] Fix style of body header boxes
gcc/ada/ * sem_case.adb (Free_Value_Sets): Fix style in body header box. * sem_ch12.adb (Build_Subprogram_Wrappers): Likewise. * sem_util.adb (Statically_Denotes_Entity): Likewise.
Diffstat (limited to 'gcc/ada/sem_case.adb')
-rw-r--r--gcc/ada/sem_case.adb1
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/ada/sem_case.adb b/gcc/ada/sem_case.adb
index ccd4b18..0bb358a 100644
--- a/gcc/ada/sem_case.adb
+++ b/gcc/ada/sem_case.adb
@@ -2667,6 +2667,7 @@ package body Sem_Case is
---------------------
-- Free_Value_Sets --
---------------------
+
procedure Free_Value_Sets is
begin
Value_Index_Set_Table.Free;