Skip to content

R
riscv-gcc-1
Commit 4060ebd4 by Robert Dewar Committed by Arnaud Charlet
Options

g-allein.ads, [...]: Minor reformatting 

2015-02-20  Robert Dewar  <dewar@adacore.com>

	* g-allein.ads, g-alveop.adb, g-alveop.ads, opt.ads: Minor reformatting

From-SVN: r220867
parent 9ec98e13
Showing with 29 additions and 25 deletions
gcc/ada/ChangeLog
2015-02-20 Robert Dewar <dewar@adacore.com>
* g-allein.ads, g-alveop.adb, g-alveop.ads, opt.ads: Minor reformatting
2015-02-20 Tristan Gingold <gingold@adacore.com> 2015-02-20 Tristan Gingold <gingold@adacore.com>
* opt.ads (GNAT_Mode_Config): New variable. * opt.ads (GNAT_Mode_Config): New variable.
......
gcc/ada/g-allein.ads
...@@ -33,8 +33,8 @@ ...@@ -33,8 +33,8 @@
-- both bindings (Hard or Soft), and relevant to the interfacing with the -- both bindings (Hard or Soft), and relevant to the interfacing with the
-- underlying Low Level support. -- underlying Low Level support.
with GNAT.Altivec.Vector_Types; use GNAT.Altivec.Vector_Types; with GNAT.Altivec.Vector_Types; use GNAT.Altivec.Vector_Types;
with GNAT.Altivec.Low_Level_Vectors; use GNAT.Altivec.Low_Level_Vectors; with GNAT.Altivec.Low_Level_Vectors; use GNAT.Altivec.Low_Level_Vectors;
with Ada.Unchecked_Conversion; with Ada.Unchecked_Conversion;
...@@ -53,8 +53,8 @@ package GNAT.Altivec.Low_Level_Interface is ...@@ -53,8 +53,8 @@ package GNAT.Altivec.Low_Level_Interface is
function To_LL_VBC is new Ada.Unchecked_Conversion (LL_VBI, LL_VBC); function To_LL_VBC is new Ada.Unchecked_Conversion (LL_VBI, LL_VBC);
function To_LL_VBC is new Ada.Unchecked_Conversion (LL_VUI, LL_VBC); function To_LL_VBC is new Ada.Unchecked_Conversion (LL_VUI, LL_VBC);
function To_LL_VBC is new Ada.Unchecked_Conversion (LL_VSI, LL_VBC); function To_LL_VBC is new Ada.Unchecked_Conversion (LL_VSI, LL_VBC);
function To_LL_VBC is new Ada.Unchecked_Conversion (LL_VF, LL_VBC); function To_LL_VBC is new Ada.Unchecked_Conversion (LL_VF, LL_VBC);
function To_LL_VBC is new Ada.Unchecked_Conversion (LL_VP, LL_VBC); function To_LL_VBC is new Ada.Unchecked_Conversion (LL_VP, LL_VBC);
function To_LL_VUC is new Ada.Unchecked_Conversion (LL_VBC, LL_VUC); function To_LL_VUC is new Ada.Unchecked_Conversion (LL_VBC, LL_VUC);
function To_LL_VUC is new Ada.Unchecked_Conversion (LL_VUC, LL_VUC); function To_LL_VUC is new Ada.Unchecked_Conversion (LL_VUC, LL_VUC);
...@@ -65,8 +65,8 @@ package GNAT.Altivec.Low_Level_Interface is ...@@ -65,8 +65,8 @@ package GNAT.Altivec.Low_Level_Interface is
function To_LL_VUC is new Ada.Unchecked_Conversion (LL_VBI, LL_VUC); function To_LL_VUC is new Ada.Unchecked_Conversion (LL_VBI, LL_VUC);
function To_LL_VUC is new Ada.Unchecked_Conversion (LL_VUI, LL_VUC); function To_LL_VUC is new Ada.Unchecked_Conversion (LL_VUI, LL_VUC);
function To_LL_VUC is new Ada.Unchecked_Conversion (LL_VSI, LL_VUC); function To_LL_VUC is new Ada.Unchecked_Conversion (LL_VSI, LL_VUC);
function To_LL_VUC is new Ada.Unchecked_Conversion (LL_VF, LL_VUC); function To_LL_VUC is new Ada.Unchecked_Conversion (LL_VF, LL_VUC);
function To_LL_VUC is new Ada.Unchecked_Conversion (LL_VP, LL_VUC); function To_LL_VUC is new Ada.Unchecked_Conversion (LL_VP, LL_VUC);
function To_LL_VSC is new Ada.Unchecked_Conversion (LL_VBC, LL_VSC); function To_LL_VSC is new Ada.Unchecked_Conversion (LL_VBC, LL_VSC);
function To_LL_VSC is new Ada.Unchecked_Conversion (LL_VUC, LL_VSC); function To_LL_VSC is new Ada.Unchecked_Conversion (LL_VUC, LL_VSC);
...@@ -77,8 +77,8 @@ package GNAT.Altivec.Low_Level_Interface is ...@@ -77,8 +77,8 @@ package GNAT.Altivec.Low_Level_Interface is
function To_LL_VSC is new Ada.Unchecked_Conversion (LL_VBI, LL_VSC); function To_LL_VSC is new Ada.Unchecked_Conversion (LL_VBI, LL_VSC);
function To_LL_VSC is new Ada.Unchecked_Conversion (LL_VUI, LL_VSC); function To_LL_VSC is new Ada.Unchecked_Conversion (LL_VUI, LL_VSC);
function To_LL_VSC is new Ada.Unchecked_Conversion (LL_VSI, LL_VSC); function To_LL_VSC is new Ada.Unchecked_Conversion (LL_VSI, LL_VSC);
function To_LL_VSC is new Ada.Unchecked_Conversion (LL_VF, LL_VSC); function To_LL_VSC is new Ada.Unchecked_Conversion (LL_VF, LL_VSC);
function To_LL_VSC is new Ada.Unchecked_Conversion (LL_VP, LL_VSC); function To_LL_VSC is new Ada.Unchecked_Conversion (LL_VP, LL_VSC);
function To_LL_VBS is new Ada.Unchecked_Conversion (LL_VBC, LL_VBS); function To_LL_VBS is new Ada.Unchecked_Conversion (LL_VBC, LL_VBS);
function To_LL_VBS is new Ada.Unchecked_Conversion (LL_VUC, LL_VBS); function To_LL_VBS is new Ada.Unchecked_Conversion (LL_VUC, LL_VBS);
...@@ -101,8 +101,8 @@ package GNAT.Altivec.Low_Level_Interface is ...@@ -101,8 +101,8 @@ package GNAT.Altivec.Low_Level_Interface is
function To_LL_VUS is new Ada.Unchecked_Conversion (LL_VBI, LL_VUS); function To_LL_VUS is new Ada.Unchecked_Conversion (LL_VBI, LL_VUS);
function To_LL_VUS is new Ada.Unchecked_Conversion (LL_VUI, LL_VUS); function To_LL_VUS is new Ada.Unchecked_Conversion (LL_VUI, LL_VUS);
function To_LL_VUS is new Ada.Unchecked_Conversion (LL_VSI, LL_VUS); function To_LL_VUS is new Ada.Unchecked_Conversion (LL_VSI, LL_VUS);
function To_LL_VUS is new Ada.Unchecked_Conversion (LL_VF, LL_VUS); function To_LL_VUS is new Ada.Unchecked_Conversion (LL_VF, LL_VUS);
function To_LL_VUS is new Ada.Unchecked_Conversion (LL_VP, LL_VUS); function To_LL_VUS is new Ada.Unchecked_Conversion (LL_VP, LL_VUS);
function To_LL_VSS is new Ada.Unchecked_Conversion (LL_VBC, LL_VSS); function To_LL_VSS is new Ada.Unchecked_Conversion (LL_VBC, LL_VSS);
function To_LL_VSS is new Ada.Unchecked_Conversion (LL_VUC, LL_VSS); function To_LL_VSS is new Ada.Unchecked_Conversion (LL_VUC, LL_VSS);
...@@ -113,8 +113,8 @@ package GNAT.Altivec.Low_Level_Interface is ...@@ -113,8 +113,8 @@ package GNAT.Altivec.Low_Level_Interface is
function To_LL_VSS is new Ada.Unchecked_Conversion (LL_VBI, LL_VSS); function To_LL_VSS is new Ada.Unchecked_Conversion (LL_VBI, LL_VSS);
function To_LL_VSS is new Ada.Unchecked_Conversion (LL_VUI, LL_VSS); function To_LL_VSS is new Ada.Unchecked_Conversion (LL_VUI, LL_VSS);
function To_LL_VSS is new Ada.Unchecked_Conversion (LL_VSI, LL_VSS); function To_LL_VSS is new Ada.Unchecked_Conversion (LL_VSI, LL_VSS);
function To_LL_VSS is new Ada.Unchecked_Conversion (LL_VF, LL_VSS); function To_LL_VSS is new Ada.Unchecked_Conversion (LL_VF, LL_VSS);
function To_LL_VSS is new Ada.Unchecked_Conversion (LL_VP, LL_VSS); function To_LL_VSS is new Ada.Unchecked_Conversion (LL_VP, LL_VSS);
function To_LL_VBI is new Ada.Unchecked_Conversion (LL_VBC, LL_VBI); function To_LL_VBI is new Ada.Unchecked_Conversion (LL_VBC, LL_VBI);
function To_LL_VBI is new Ada.Unchecked_Conversion (LL_VUC, LL_VBI); function To_LL_VBI is new Ada.Unchecked_Conversion (LL_VUC, LL_VBI);
...@@ -125,8 +125,8 @@ package GNAT.Altivec.Low_Level_Interface is ...@@ -125,8 +125,8 @@ package GNAT.Altivec.Low_Level_Interface is
function To_LL_VBI is new Ada.Unchecked_Conversion (LL_VBI, LL_VBI); function To_LL_VBI is new Ada.Unchecked_Conversion (LL_VBI, LL_VBI);
function To_LL_VBI is new Ada.Unchecked_Conversion (LL_VUI, LL_VBI); function To_LL_VBI is new Ada.Unchecked_Conversion (LL_VUI, LL_VBI);
function To_LL_VBI is new Ada.Unchecked_Conversion (LL_VSI, LL_VBI); function To_LL_VBI is new Ada.Unchecked_Conversion (LL_VSI, LL_VBI);
function To_LL_VBI is new Ada.Unchecked_Conversion (LL_VF, LL_VBI); function To_LL_VBI is new Ada.Unchecked_Conversion (LL_VF, LL_VBI);
function To_LL_VBI is new Ada.Unchecked_Conversion (LL_VP, LL_VBI); function To_LL_VBI is new Ada.Unchecked_Conversion (LL_VP, LL_VBI);
function To_LL_VUI is new Ada.Unchecked_Conversion (LL_VBC, LL_VUI); function To_LL_VUI is new Ada.Unchecked_Conversion (LL_VBC, LL_VUI);
function To_LL_VUI is new Ada.Unchecked_Conversion (LL_VUC, LL_VUI); function To_LL_VUI is new Ada.Unchecked_Conversion (LL_VUC, LL_VUI);
...@@ -137,8 +137,8 @@ package GNAT.Altivec.Low_Level_Interface is ...@@ -137,8 +137,8 @@ package GNAT.Altivec.Low_Level_Interface is
function To_LL_VUI is new Ada.Unchecked_Conversion (LL_VBI, LL_VUI); function To_LL_VUI is new Ada.Unchecked_Conversion (LL_VBI, LL_VUI);
function To_LL_VUI is new Ada.Unchecked_Conversion (LL_VUI, LL_VUI); function To_LL_VUI is new Ada.Unchecked_Conversion (LL_VUI, LL_VUI);
function To_LL_VUI is new Ada.Unchecked_Conversion (LL_VSI, LL_VUI); function To_LL_VUI is new Ada.Unchecked_Conversion (LL_VSI, LL_VUI);
function To_LL_VUI is new Ada.Unchecked_Conversion (LL_VF, LL_VUI); function To_LL_VUI is new Ada.Unchecked_Conversion (LL_VF, LL_VUI);
function To_LL_VUI is new Ada.Unchecked_Conversion (LL_VP, LL_VUI); function To_LL_VUI is new Ada.Unchecked_Conversion (LL_VP, LL_VUI);
function To_LL_VSI is new Ada.Unchecked_Conversion (LL_VBC, LL_VSI); function To_LL_VSI is new Ada.Unchecked_Conversion (LL_VBC, LL_VSI);
function To_LL_VSI is new Ada.Unchecked_Conversion (LL_VUC, LL_VSI); function To_LL_VSI is new Ada.Unchecked_Conversion (LL_VUC, LL_VSI);
...@@ -149,8 +149,8 @@ package GNAT.Altivec.Low_Level_Interface is ...@@ -149,8 +149,8 @@ package GNAT.Altivec.Low_Level_Interface is
function To_LL_VSI is new Ada.Unchecked_Conversion (LL_VBI, LL_VSI); function To_LL_VSI is new Ada.Unchecked_Conversion (LL_VBI, LL_VSI);
function To_LL_VSI is new Ada.Unchecked_Conversion (LL_VUI, LL_VSI); function To_LL_VSI is new Ada.Unchecked_Conversion (LL_VUI, LL_VSI);
function To_LL_VSI is new Ada.Unchecked_Conversion (LL_VSI, LL_VSI); function To_LL_VSI is new Ada.Unchecked_Conversion (LL_VSI, LL_VSI);
function To_LL_VSI is new Ada.Unchecked_Conversion (LL_VF, LL_VSI); function To_LL_VSI is new Ada.Unchecked_Conversion (LL_VF, LL_VSI);
function To_LL_VSI is new Ada.Unchecked_Conversion (LL_VP, LL_VSI); function To_LL_VSI is new Ada.Unchecked_Conversion (LL_VP, LL_VSI);
function To_LL_VF is new Ada.Unchecked_Conversion (LL_VBC, LL_VF); function To_LL_VF is new Ada.Unchecked_Conversion (LL_VBC, LL_VF);
function To_LL_VF is new Ada.Unchecked_Conversion (LL_VUC, LL_VF); function To_LL_VF is new Ada.Unchecked_Conversion (LL_VUC, LL_VF);
...@@ -161,8 +161,8 @@ package GNAT.Altivec.Low_Level_Interface is ...@@ -161,8 +161,8 @@ package GNAT.Altivec.Low_Level_Interface is
function To_LL_VF is new Ada.Unchecked_Conversion (LL_VBI, LL_VF); function To_LL_VF is new Ada.Unchecked_Conversion (LL_VBI, LL_VF);
function To_LL_VF is new Ada.Unchecked_Conversion (LL_VUI, LL_VF); function To_LL_VF is new Ada.Unchecked_Conversion (LL_VUI, LL_VF);
function To_LL_VF is new Ada.Unchecked_Conversion (LL_VSI, LL_VF); function To_LL_VF is new Ada.Unchecked_Conversion (LL_VSI, LL_VF);
function To_LL_VF is new Ada.Unchecked_Conversion (LL_VF, LL_VF); function To_LL_VF is new Ada.Unchecked_Conversion (LL_VF, LL_VF);
function To_LL_VF is new Ada.Unchecked_Conversion (LL_VP, LL_VF); function To_LL_VF is new Ada.Unchecked_Conversion (LL_VP, LL_VF);
function To_LL_VP is new Ada.Unchecked_Conversion (LL_VBC, LL_VP); function To_LL_VP is new Ada.Unchecked_Conversion (LL_VBC, LL_VP);
function To_LL_VP is new Ada.Unchecked_Conversion (LL_VUC, LL_VP); function To_LL_VP is new Ada.Unchecked_Conversion (LL_VUC, LL_VP);
...@@ -173,11 +173,11 @@ package GNAT.Altivec.Low_Level_Interface is ...@@ -173,11 +173,11 @@ package GNAT.Altivec.Low_Level_Interface is
function To_LL_VP is new Ada.Unchecked_Conversion (LL_VBI, LL_VP); function To_LL_VP is new Ada.Unchecked_Conversion (LL_VBI, LL_VP);
function To_LL_VP is new Ada.Unchecked_Conversion (LL_VUI, LL_VP); function To_LL_VP is new Ada.Unchecked_Conversion (LL_VUI, LL_VP);
function To_LL_VP is new Ada.Unchecked_Conversion (LL_VSI, LL_VP); function To_LL_VP is new Ada.Unchecked_Conversion (LL_VSI, LL_VP);
function To_LL_VP is new Ada.Unchecked_Conversion (LL_VF, LL_VP); function To_LL_VP is new Ada.Unchecked_Conversion (LL_VF, LL_VP);
function To_LL_VP is new Ada.Unchecked_Conversion (LL_VP, LL_VP); function To_LL_VP is new Ada.Unchecked_Conversion (LL_VP, LL_VP);
---------------------------------------------- ----------------------------------------------
-- Conversions between pointer/access types -- -- Conversions Between Pointer/Access Types --
---------------------------------------------- ----------------------------------------------
function To_PTR is function To_PTR is
......
gcc/ada/opt.ads
...@@ -2158,9 +2158,9 @@ package Opt is ...@@ -2158,9 +2158,9 @@ package Opt is
-- GNAT -- GNAT
-- True if -gnatg switch is present. GNAT_Mode may be temporary set to -- True if -gnatg switch is present. GNAT_Mode may be temporary set to
-- True during the analysis of a system unit, but GNAT_Mode_Config must -- True during the analysis of a system unit, but GNAT_Mode_Config must
-- not changed once scanned. -- not change once scanned and set.
-- Setting this switch has the following effects on the language that is -- Setting GNAT mode has the following effects on the language that is
-- accepted. Note that several of the following have the effect of changing -- accepted. Note that several of the following have the effect of changing
-- an error to a warning. But warnings are usually treated as fatal errors -- an error to a warning. But warnings are usually treated as fatal errors
-- in -gnatg mode, so to actually take advantage of such a change, it is -- in -gnatg mode, so to actually take advantage of such a change, it is
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment