summaryrefslogtreecommitdiff
path: root/gcc/ada/a-ngcoty.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/a-ngcoty.ads')
-rw-r--r--gcc/ada/a-ngcoty.ads8
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/ada/a-ngcoty.ads b/gcc/ada/a-ngcoty.ads
index 0e006d24cb9..33e818a6824 100644
--- a/gcc/ada/a-ngcoty.ads
+++ b/gcc/ada/a-ngcoty.ads
@@ -6,7 +6,7 @@
-- --
-- S p e c --
-- --
--- Copyright (C) 1992-2005, Free Software Foundation, Inc. --
+-- Copyright (C) 1992-2006, Free Software Foundation, Inc. --
-- --
-- This specification is derived from the Ada Reference Manual for use with --
-- GNAT. The copyright notice above, and the license provisions that follow --
@@ -56,9 +56,9 @@ package Ada.Numerics.Generic_Complex_Types is
function Im (X : Complex) return Real'Base;
function Im (X : Imaginary) return Real'Base;
- procedure Set_Re (X : in out Complex; Re : in Real'Base);
- procedure Set_Im (X : in out Complex; Im : in Real'Base);
- procedure Set_Im (X : out Imaginary; Im : in Real'Base);
+ procedure Set_Re (X : in out Complex; Re : Real'Base);
+ procedure Set_Im (X : in out Complex; Im : Real'Base);
+ procedure Set_Im (X : out Imaginary; Im : Real'Base);
function Compose_From_Cartesian (Re, Im : Real'Base) return Complex;
function Compose_From_Cartesian (Re : Real'Base) return Complex;