diff options
Diffstat (limited to 'gcc/ada/s-mantis.ads')
-rw-r--r-- | gcc/ada/s-mantis.ads | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/s-mantis.ads b/gcc/ada/s-mantis.ads index 4f031a4057a..7637981441f 100644 --- a/gcc/ada/s-mantis.ads +++ b/gcc/ada/s-mantis.ads @@ -35,7 +35,7 @@ -- fixed-point type with non-static bounds. package System.Mantissa is -pragma Pure (Mantissa); + pragma Pure; function Mantissa_Value (First, Last : Integer) return Natural; -- Compute Mantissa value from the given arguments, which are the First |