ada: Make Error_Msg_Sloc visible for gigi

This is needed to improve the error messages for -gnatw.q.

gcc/ada/ChangeLog:

	* fe.h: Define Error_Msg_Sloc for gigi.

diff --git a/gcc/ada/fe.h b/gcc/ada/fe.h
index cb2a30ba027bc7b4839a1303330aa1acd96ccc1f..398c107805a3576d6b7f6889a0abdd02a9a32e95 100644 (file)
--- a/gcc/ada/fe.h
+++ b/gcc/ada/fe.h
@@ -122,9 +122,11 @@ extern void Set_Identifier_Casing  (void *, const void *);
 
 #define Error_Msg_Uint_1       err_vars__error_msg_uint_1
 #define Error_Msg_Uint_2       err_vars__error_msg_uint_2
+#define Error_Msg_Sloc err_vars__error_msg_sloc
 
 extern Uint Error_Msg_Uint_1;
 extern Uint Error_Msg_Uint_2;
+extern Source_Ptr Error_Msg_Sloc;
 
 /* exp_ch11:  */