From 19c6e49cf41cd483601dca9c1e69e1bfb486dd2e Mon Sep 17 00:00:00 2001 From: Pierre-Marie de Rodat Date: Thu, 16 Nov 2017 10:12:15 +0000 Subject: [multiple changes] 2017-11-16 Hristian Kirtchev * sem_elab.adb (Include): Including a node which is also a compilation unit terminates the search because there are no more lists to examine. 2017-11-16 Hristian Kirtchev * sem_ch8.adb (Analyze_Subprogram_Renaming): Ensure that a renaming declaration does not define a primitive operation of a tagged type for SPARK. (Check_SPARK_Primitive_Operation): New routine. 2017-11-16 Arnaud Charlet * libgnat/a-elchha.adb (Last_Chance_Handler): Display Argv (0) in message when using -E binder switch. 2017-11-16 Piotr Trojanek * errout.ads: Fix minor typo in comment. From-SVN: r254804 --- gcc/ada/errout.ads | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'gcc/ada/errout.ads') diff --git a/gcc/ada/errout.ads b/gcc/ada/errout.ads index d3de0ad..1d8b8fc 100644 --- a/gcc/ada/errout.ads +++ b/gcc/ada/errout.ads @@ -218,7 +218,7 @@ package Errout is -- Insertion character } (Right brace: insert type reference) -- The character } is replaced by a string describing the type -- referenced by the entity whose Id is stored in Error_Msg_Node_1. - -- the string gives the name or description of the type, and also + -- The string gives the name or description of the type, and also -- where appropriate the location of its declaration. Special cases -- like "some integer type" are handled appropriately. Only one } is -- allowed in a message, since there is not enough room for two (the -- cgit v1.1