skipping2.c   [plain text]


/* Copyright (C) 2001 Free Software Foundation, Inc.  */

/* { dg-do preprocess } */
/* APPLE LOCAL -Wextra-tokens */
/* { dg-options "-Wextra-tokens" } */

/* Tests that excess tokens in skipped conditional blocks don't warn.  */

/* Source: Neil Booth, 25 Jul 2001.  */

#if 0
#if foo
#else foo   /* { dg-bogus "extra tokens" "extra tokens in skipped block" } */
#endif foo  /* { dg-bogus "extra tokens" "extra tokens in skipped block" } */
#endif bar  /* { dg-warning "extra tokens" "tokens after #endif" } */