From 7a08b9393c7b36c4dca8fca9a5cda261594f61d6 Mon Sep 17 00:00:00 2001 From: Bob Duff Date: Fri, 21 Oct 2022 11:09:49 -0400 Subject: ada: Move warnings switches -- initial work This patch prepares to move warning switches from Opt into Warnsw. gcc/ada/ * warnsw.ads, warnsw.adb, fe.h, err_vars.ads, errout.ads: Move Warning_Doc_Switch from Err_Vars to Warnsw. Access Warn_On_Questionable_Layout on the C side via a function rather than a variable, because we plan to turn the variables into renamings, and you can't Export renamings. * erroutc.adb, switch-c.adb, errout.adb: Likewise. * gcc-interface/decl.cc: Use Get_Warn_On_Questionable_Layout instead of Warn_On_Questionable_Layout. * gcc-interface/Makefile.in (GNATMAKE_OBJS): Add warnsw.o, because it is indirectly imported via Errout. * gcc-interface/Make-lang.in (GNATBIND_OBJS): Likewise and remove restrict.o (not needed). --- gcc/ada/fe.h | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'gcc/ada/fe.h') diff --git a/gcc/ada/fe.h b/gcc/ada/fe.h index 79a1b58836e..8102c6d5ec4 100644 --- a/gcc/ada/fe.h +++ b/gcc/ada/fe.h @@ -366,9 +366,9 @@ extern Boolean Stack_Check_Probes_On_Target; /* warnsw: */ -#define Warn_On_Questionable_Layout warnsw__warn_on_questionable_layout +#define Get_Warn_On_Questionable_Layout warnsw__get_warn_on_questionable_layout -extern Boolean Warn_On_Questionable_Layout; +extern Boolean Get_Warn_On_Questionable_Layout (); // The following corresponds to Ada code in Einfo.Utils. -- cgit v1.2.1 From 0ed20c72aa044c3fa4a20fad77218114c7310f52 Mon Sep 17 00:00:00 2001 From: Eric Botcazou Date: Sat, 22 Oct 2022 12:48:13 +0200 Subject: ada: Small consistency fix gcc/ada/ * fe.h (Get_Warn_On_Questionable_Layout): Add void parameter. --- gcc/ada/fe.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'gcc/ada/fe.h') diff --git a/gcc/ada/fe.h b/gcc/ada/fe.h index 8102c6d5ec4..12ad15b6d35 100644 --- a/gcc/ada/fe.h +++ b/gcc/ada/fe.h @@ -368,7 +368,7 @@ extern Boolean Stack_Check_Probes_On_Target; #define Get_Warn_On_Questionable_Layout warnsw__get_warn_on_questionable_layout -extern Boolean Get_Warn_On_Questionable_Layout (); +extern Boolean Get_Warn_On_Questionable_Layout (void); // The following corresponds to Ada code in Einfo.Utils. -- cgit v1.2.1