Iain Sandoe <iains....@gmail.com> writes: > Tested on x86-64-darwin21. > OK for trunk? > Iain
yes LGTM, thanks, Gaius > --- 8< --- > > Somehow this setting had been missed, and we really need the verbose > flag to enable useful debug output. > > Signed-off-by: Iain Sandoe <i...@sandoe.co.uk> > > gcc/m2/ChangeLog: > > * gm2-gcc/m2options.h (M2Options_SetVerbose): Export the > function. > * gm2-lang.cc: Handle OPT_v, passing it to the compiler. > * lang-specs.h: Pass -v to cc1gm2. > --- > gcc/m2/gm2-gcc/m2options.h | 1 + > gcc/m2/gm2-lang.cc | 3 +++ > gcc/m2/lang-specs.h | 2 +- > 3 files changed, 5 insertions(+), 1 deletion(-) > > diff --git a/gcc/m2/gm2-gcc/m2options.h b/gcc/m2/gm2-gcc/m2options.h > index 4b32c911b09..beaa460ffa9 100644 > --- a/gcc/m2/gm2-gcc/m2options.h > +++ b/gcc/m2/gm2-gcc/m2options.h > @@ -106,6 +106,7 @@ EXTERN int M2Options_GetCpp (void); > EXTERN int M2Options_GetM2g (void); > EXTERN void M2Options_SetM2g (int value); > EXTERN void M2Options_SetLowerCaseKeywords (int value); > +EXTERN void M2Options_SetVerbose (int value); > EXTERN void M2Options_SetUnusedVariableChecking (int value); > EXTERN void M2Options_SetUnusedParameterChecking (int value); > EXTERN void M2Options_SetStrictTypeChecking (int value); > diff --git a/gcc/m2/gm2-lang.cc b/gcc/m2/gm2-lang.cc > index 49f93901d3c..073d1dd55db 100644 > --- a/gcc/m2/gm2-lang.cc > +++ b/gcc/m2/gm2-lang.cc > @@ -451,6 +451,9 @@ gm2_langhook_handle_option ( > case OPT_save_temps_: > M2Options_SetSaveTempsDir (arg); > return 1; > + case OPT_v: > + M2Options_SetVerbose (value); > + return 1; > default: > if (insideCppArgs) > { > diff --git a/gcc/m2/lang-specs.h b/gcc/m2/lang-specs.h > index 0a34b0bc6d7..bf882649b21 100644 > --- a/gcc/m2/lang-specs.h > +++ b/gcc/m2/lang-specs.h > @@ -34,6 +34,6 @@ along with GCC; see the file COPYING3. If not see > {"@modula-2", > "cc1gm2 " M2CPP > " %(cc1_options) %{B*} %{c*} %{+e*} %{I*} " > - " %{i*} %{save-temps*} " > + " %{i*} %{save-temps*} %{v} " > " %i %{!fsyntax-only:%(invoke_as)}", > 0, 0, 0},