1*67e74705SXin Li // RUN: %clang_cc1 %s -Eonly -verify 2*67e74705SXin Li 3*67e74705SXin Li #pragma GCC poison rindex 4*67e74705SXin Li rindex(some_string, 'h'); // expected-error {{attempt to use a poisoned identifier}} 5*67e74705SXin Li 6*67e74705SXin Li #define BAR _Pragma ("GCC poison XYZW") XYZW /*NO ERROR*/ 7*67e74705SXin Li XYZW // ok 8*67e74705SXin Li BAR 9*67e74705SXin Li XYZW // expected-error {{attempt to use a poisoned identifier}} 10*67e74705SXin Li 11*67e74705SXin Li // Pragma poison shouldn't warn from macro expansions defined before the token 12*67e74705SXin Li // is poisoned. 13*67e74705SXin Li 14*67e74705SXin Li #define strrchr rindex2 15*67e74705SXin Li #pragma GCC poison rindex2 16*67e74705SXin Li 17*67e74705SXin Li // Can poison multiple times. 18*67e74705SXin Li #pragma GCC poison rindex2 19*67e74705SXin Li 20*67e74705SXin Li strrchr(some_string, 'h'); // ok. 21