/* n_18.c:  #define directive.  */

/* Excerpts from ISO C 6.8.3 "Examples".    */
#define OBJ_LIKE        (1-1)
#define FTN_LIKE(a)     ( a )

#define ZERO_TOKEN

/* 18.1:    Definition of an object-like macro. */
/*  (1-1);  */
    OBJ_LIKE;
/* Macro defined to no token.   */
/*  ;   */
    ZERO_TOKEN;

/* 18.2:    Definition of a function-like macro.    */
/*  ( c );  */
    FTN_LIKE( c);

/* 18.3:    Spelling in string identical to parameter is not a parameter.   */
/*  "n1:n2";    */
#define STR( n1, n2)    "n1:n2"
    STR( 1, 2);

/* { dg-do preprocess }
   { dg-final { if ![file exist n_18.i] { return }                      } }
   { dg-final { if \{ [grep n_18.i "\\(1-1\\)"] != ""           \} \{   } }
   { dg-final { if \{ [grep n_18.i "^\[ \]*;\[ \]*$"] != ""     \} \{   } }
   { dg-final { if \{ [grep n_18.i "\\( *c *\\)"] != ""         \} \{   } }
   { dg-final { if \{ [grep n_18.i "\"n1:n2\""] != ""           \} \{   } }
   { dg-final { return \} \} \} \}                                      } }
   { dg-final { fail "n_18.c: #define directive"                        } }
 */