1/* 2 { dg-options "-ftrack-macro-expansion=1" } 3 { dg-do compile } 4*/ 5 6#define OPERATE(OPRD1, OPRT, OPRD2) \ 7do \ 8{ \ 9 OPRD1 OPRT OPRD2; /* { dg-message "definition" }*/ \ 10} while (0) 11 12#define SHIFTL(A,B) \ 13 OPERATE (A,<<,B) /* { dg-error "invalid operands" } */ 14 15void 16foo () 17{ 18 SHIFTL (0.1,0.2); /* { dg-message "in expansion of macro \[^\n\r\]SHIFTL" } */ 19} 20