aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/urealp.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/urealp.ads')
-rw-r--r--gcc/ada/urealp.ads4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/urealp.ads b/gcc/ada/urealp.ads
index 323efc8..c7725bf 100644
--- a/gcc/ada/urealp.ads
+++ b/gcc/ada/urealp.ads
@@ -233,7 +233,7 @@ package Urealp is
function UR_Sub (Left : Ureal; Right : Uint) return Ureal;
-- Returns real difference of operands
- function UR_Exponentiate (Real : Ureal; N : Uint) return Ureal;
+ function UR_Exponentiate (Real : Ureal; N : Uint) return Ureal;
-- Returns result of raising Ureal to Uint power.
-- Fatal error if Left is 0 and Right is negative.
@@ -317,7 +317,7 @@ package Urealp is
function "-" (Left : Uint; Right : Ureal) return Ureal renames UR_Sub;
function "-" (Left : Ureal; Right : Uint) return Ureal renames UR_Sub;
- function "**" (Real : Ureal; N : Uint) return Ureal
+ function "**" (Real : Ureal; N : Uint) return Ureal
renames UR_Exponentiate;
function "abs" (Real : Ureal) return Ureal renames UR_Abs;