summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPiotr Trojanek <trojanek@adacore.com>2022-09-07 21:36:04 +0200
committerMarc Poulhiès <poulhies@adacore.com>2022-11-08 09:34:59 +0100
commit7857d873293d2333e1cc8e67ff9bb963fc8b4d1f (patch)
treedf6190120f877e84c1cd7f8eae1cd3d5a7dc78ab
parentd96a20bf2ef939c0dd9d2bb32c59267842279c29 (diff)
ada: Fix inconsistent whitespace in Ada.Numerics.Generic_Complex_Arrays
Cleanup only. gcc/ada/ * libgnat/a-ngcoar.ads, libgnat/a-ngcoar.adb: Remove extra spaces.
-rw-r--r--gcc/ada/libgnat/a-ngcoar.adb4
-rw-r--r--gcc/ada/libgnat/a-ngcoar.ads4
2 files changed, 4 insertions, 4 deletions
diff --git a/gcc/ada/libgnat/a-ngcoar.adb b/gcc/ada/libgnat/a-ngcoar.adb
index 8dfbc3b174a..1b9118cd3b2 100644
--- a/gcc/ada/libgnat/a-ngcoar.adb
+++ b/gcc/ada/libgnat/a-ngcoar.adb
@@ -902,7 +902,7 @@ package body Ada.Numerics.Generic_Complex_Arrays is
function "-"
(Left : Real_Vector;
Right : Complex_Vector) return Complex_Vector
- renames Instantiations."-";
+ renames Instantiations."-";
function "-"
(Left : Complex_Vector;
@@ -956,7 +956,7 @@ package body Ada.Numerics.Generic_Complex_Arrays is
-----------
function "abs" (Right : Complex_Vector) return Real'Base
- renames Instantiations."abs";
+ renames Instantiations."abs";
--------------
-- Argument --
diff --git a/gcc/ada/libgnat/a-ngcoar.ads b/gcc/ada/libgnat/a-ngcoar.ads
index 8f8f37a7906..05295caa655 100644
--- a/gcc/ada/libgnat/a-ngcoar.ads
+++ b/gcc/ada/libgnat/a-ngcoar.ads
@@ -135,7 +135,7 @@ package Ada.Numerics.Generic_Complex_Arrays is
function Compose_From_Cartesian (Re : Real_Matrix) return Complex_Matrix;
function Compose_From_Cartesian
- (Re, Im : Real_Matrix) return Complex_Matrix;
+ (Re, Im : Real_Matrix) return Complex_Matrix;
function Modulus (X : Complex_Matrix) return Real_Matrix;
function "abs" (Right : Complex_Matrix) return Real_Matrix renames Modulus;
@@ -229,7 +229,7 @@ package Ada.Numerics.Generic_Complex_Arrays is
function "*"
(Left : Complex;
- Right : Complex_Matrix) return Complex_Matrix;
+ Right : Complex_Matrix) return Complex_Matrix;
function "*"
(Left : Complex_Matrix;