diff options
Diffstat (limited to 'gcc/ada/system-vxworks-ppc.ads')
| -rw-r--r-- | gcc/ada/system-vxworks-ppc.ads | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/gcc/ada/system-vxworks-ppc.ads b/gcc/ada/system-vxworks-ppc.ads index 1ff83f9ef4b..088811d2eca 100644 --- a/gcc/ada/system-vxworks-ppc.ads +++ b/gcc/ada/system-vxworks-ppc.ads @@ -38,8 +38,9 @@ package System is pragma Pure (System); --- Note that we take advantage of the implementation permission to --- make this unit Pure instead of Preelaborable, see RM 13.7(36) +-- Note that we take advantage of the implementation permission to make this +-- unit Pure instead of Preelaborable; see RM 13.7.1(15). In Ada 2005, this is +-- Pure in any case (AI-362). type Name is (SYSTEM_NAME_GNAT); System_Name : constant Name := SYSTEM_NAME_GNAT; |