1 /* 2 { dg-options "-ftrack-macro-expansion=1" } 3 { dg-do compile } 4 */ 5 6 #define OPERATE(OPRD1, OPRT, OPRD2) \ 7 OPRD1 OPRT OPRD2; /* { dg-message "in definition of macro 'OPERATE'" } */ 8 9 #define SHIFTL(A,B) \ 10 OPERATE (A,<<,B) /* { dg-message "invalid operands to binary <<" } */ 11 12 #define MULT(A) \ 13 SHIFTL (A,1) /* { dg-message "in expansion of macro 'SHIFTL'" } */ 14 15 void foo()16foo () 17 { 18 MULT (1.0); /* { dg-message "in expansion of macro 'MULT'" } */ 19 } 20 21