ada: Add Ada RM clause reference in comment

gcc/ada/ChangeLog:

	* libgnat/s-valuer.adb (Scan_Raw_Real): Add RM reference.

diff --git a/gcc/ada/libgnat/s-valuer.adb b/gcc/ada/libgnat/s-valuer.adb
index 4b444c2f8a771a35c36e5623cc7fcaca940650f5..2410b6bd4e14d69d4b11299535da739805bf0fcb 100644 (file)
--- a/gcc/ada/libgnat/s-valuer.adb
+++ b/gcc/ada/libgnat/s-valuer.adb
@@ -604,7 +604,8 @@ package body System.Value_R is
          Bad_Value (Str);
       end if;
 
-      --  Check if the first number encountered is a base
+      --  Check if the first number encountered is a base. ':' is allowed in
+      --  place of '#' in virtue of RM J.2 (3).
 
       pragma Assert (Index >= Str'First);