summaryrefslogtreecommitdiff
path: root/gcc/ada/s-exnllf.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/s-exnllf.ads')
-rw-r--r--gcc/ada/s-exnllf.ads10
1 files changed, 5 insertions, 5 deletions
diff --git a/gcc/ada/s-exnllf.ads b/gcc/ada/s-exnllf.ads
index 20a91d3fb22..20a0bb96d39 100644
--- a/gcc/ada/s-exnllf.ads
+++ b/gcc/ada/s-exnllf.ads
@@ -6,7 +6,7 @@
-- --
-- S p e c --
-- --
--- Copyright (C) 1992,1993,1994 Free Software Foundation, Inc. --
+-- Copyright (C) 1992-2003, Free Software Foundation, Inc. --
-- --
-- GNAT is free software; you can redistribute it and/or modify it under --
-- terms of the GNU General Public License as published by the Free Soft- --
@@ -33,12 +33,12 @@
-- Long_Long_Float exponentiation (checks off)
-with System.Exn_Gen;
-
package System.Exn_LLF is
pragma Pure (Exn_LLF);
- function Exn_Long_Long_Float is
- new System.Exn_Gen.Exn_Float_Type (Long_Long_Float);
+ function Exn_Long_Long_Float
+ (Left : Long_Long_Float;
+ Right : Integer)
+ return Long_Long_Float;
end System.Exn_LLF;