ada: Tune comment of routine for detecting junk names

Reword comment to avoid repetition between spec and body.

gcc/ada/

	* sem_warn.ads (Has_Junk_Name): Reword comment.

diff --git a/gcc/ada/sem_warn.ads b/gcc/ada/sem_warn.ads
index 1894f36f4b0c6052f2decaf028c379ff91b4c9e7..6681e545a3599f056c021ffe7b4a4e1d328ba516 100644 (file)
--- a/gcc/ada/sem_warn.ads
+++ b/gcc/ada/sem_warn.ads
@@ -257,12 +257,9 @@ package Sem_Warn is
    ----------------------
 
    function Has_Junk_Name (E : Entity_Id) return Boolean;
-   --  Return True if the entity name contains any of the following substrings:
-   --    discard
-   --    dummy
-   --    ignore
-   --    junk
-   --    unused
+   --  Return True if the entity name contains substrings like "junk" or
+   --  "dummy" (see the body for the complete list).
+   --
    --  Used to suppress warnings on names matching these patterns. The contents
    --  of Name_Buffer and Name_Len are destroyed by this call.