aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/libgnat/s-exnlli.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/libgnat/s-exnlli.ads')
-rw-r--r--gcc/ada/libgnat/s-exnlli.ads9
1 files changed, 4 insertions, 5 deletions
diff --git a/gcc/ada/libgnat/s-exnlli.ads b/gcc/ada/libgnat/s-exnlli.ads
index f6d94de..3c2786b 100644
--- a/gcc/ada/libgnat/s-exnlli.ads
+++ b/gcc/ada/libgnat/s-exnlli.ads
@@ -31,12 +31,11 @@
-- Long_Long_Integer exponentiation (checks off)
+with System.Exponn;
+
package System.Exn_LLI is
- pragma Pure;
- function Exn_Long_Long_Integer
- (Left : Long_Long_Integer;
- Right : Natural)
- return Long_Long_Integer;
+ function Exn_Long_Long_Integer is new Exponn (Long_Long_Integer);
+ pragma Pure_Function (Exn_Long_Long_Integer);
end System.Exn_LLI;