diff options
| -rw-r--r-- | gcc/ada/a-reatim.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/a-reatim.adb b/gcc/ada/a-reatim.adb index c313d50..0405a0b 100644 --- a/gcc/ada/a-reatim.adb +++ b/gcc/ada/a-reatim.adb @@ -281,7 +281,7 @@ package body Ada.Real_Time is Dist_To_Boundary : constant Time_Span := TS - Time_Span (Closest_Boundary); -- Distance between TS and Closest_Boundary expressed in Time_Span - -- Both operands in the substraction have the same sign, hence + -- Both operands in the subtraction have the same sign, hence -- avoiding overflow. begin |