diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-12-12 11:30:49 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-12-12 11:30:49 +0100 |
| commit | 9c25bb25a88048f3b650c7e036ba6d05d5437425 (patch) | |
| tree | d9ad05791b2582106c5e1254746d32c8d135cd79 /gcc/ada/cstand.adb | |
| parent | 7e529795d0c6a2c9441bb233a140e4b8ec2cf521 (diff) | |
| download | gcc-9c25bb25a88048f3b650c7e036ba6d05d5437425.zip gcc-9c25bb25a88048f3b650c7e036ba6d05d5437425.tar.gz gcc-9c25bb25a88048f3b650c7e036ba6d05d5437425.tar.bz2 | |
[multiple changes]
2011-12-12 Robert Dewar <dewar@adacore.com>
* par_sco.adb, scos.ads, put_scos.adb, get_scos.adb: Minor reformatting.
2011-12-12 Steve Baird <baird@adacore.com>
* sem_ch3.adb (Check_Completion): Improve a comment.
2011-12-12 Tristan Gingold <gingold@adacore.com>
* cstand.adb: Minor comment fix.
From-SVN: r182224
Diffstat (limited to 'gcc/ada/cstand.adb')
| -rw-r--r-- | gcc/ada/cstand.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/cstand.adb b/gcc/ada/cstand.adb index ce46e0f..c77afd2 100644 --- a/gcc/ada/cstand.adb +++ b/gcc/ada/cstand.adb @@ -1369,7 +1369,7 @@ package body CStand is begin -- In 32 bit mode, the size is 32 bits, and the delta and - -- small values are set to 20 milliseconds (20.0**(10.0**(-3)). + -- small values are set to 20 milliseconds (20.0*(10.0**(-3)). if Duration_32_Bits_On_Target then Dlo := Intval (Type_Low_Bound (Standard_Integer_32)); @@ -1377,7 +1377,7 @@ package body CStand is Delta_Val := UR_From_Components (UI_From_Int (20), Uint_3, 10); -- In standard 64-bit mode, the size is 64-bits and the delta and - -- small values are set to nanoseconds (1.0**(10.0**(-9)) + -- small values are set to nanoseconds (1.0*(10.0**(-9)) else Dlo := Intval (Type_Low_Bound (Standard_Integer_64)); |