From 5cea137308eb2e3912e052132131c7b7d9e19e63 Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Fri, 3 Jan 2020 11:58:37 +0100 Subject: [PATCH] [Ada] Remove -gnatt switch processing 2020-06-03 Arnaud Charlet gcc/ada/ * switch-c.adb (Scan_Front_End_Switches): Remove processing of -gnatt. * usage.adb (Usage): Remove mention of -gnatt. --- gcc/ada/switch-c.adb | 7 ------- gcc/ada/usage.adb | 5 ----- 2 files changed, 12 deletions(-) diff --git a/gcc/ada/switch-c.adb b/gcc/ada/switch-c.adb index 1b7259c9fcf..319188b3d75 100644 --- a/gcc/ada/switch-c.adb +++ b/gcc/ada/switch-c.adb @@ -1250,13 +1250,6 @@ package body Switch.C is Print_Standard := True; Ptr := Ptr + 1; - -- -gnatt (output tree) - - when 't' => - Ptr := Ptr + 1; - Tree_Output := True; - Back_Annotate_Rep_Info := True; - -- -gnatT (change start of internal table sizes) when 'T' => diff --git a/gcc/ada/usage.adb b/gcc/ada/usage.adb index 532dd5720d1..2afd3fc54ea 100644 --- a/gcc/ada/usage.adb +++ b/gcc/ada/usage.adb @@ -418,11 +418,6 @@ begin Write_Switch_Char ("S"); Write_Line ("Print listing of package Standard"); - -- Line for -gnatt switch - - Write_Switch_Char ("t"); - Write_Line ("Tree output file to be generated"); - -- Line for -gnatTnn switch Write_Switch_Char ("Tnn"); -- 2.30.2