/* l_37_3.c:    Translation limits larger than C99 / 3. */

/* 37.3L:   Significant initial characters in an internal identifier or a

        macro name. */

/*  Name of 127 bytes long. */

    int

A123456789abcdef0123456789abcdef0123456789abcdef0123456789abcdef\

B123456789abcdef0123456789abcdef0123456789abcdef0123456789abcde = 127;

#ifndef X7F

/*  Name of 255 bytes long. */

    int

A123456789abcdef0123456789abcdef0123456789abcdef0123456789abcdef\

B123456789abcdef0123456789abcdef0123456789abcdef0123456789abcdef\

C123456789abcdef0123456789abcdef0123456789abcdef0123456789abcdef\

D123456789abcdef0123456789abcdef0123456789abcdef0123456789abcde = 255;

#endif

/* { dg-do preprocess }

   { dg-options "-std=c99 -pedantic" }

   { dg-warning "| Identifier longer than 63 bytes" "translation limit" { target *-*-* } 9  }

   { dg-warning "| Identifier longer than 63 bytes" "translation limit" { target *-*-* } 16 }

   { dg-final { if ![file exist l_37_3.i] { return }                } }

   { dg-final { if \{ [grep l_37_3.i "A123456789abcdef0123456789abcdef0123456789abcdef0123456789abcdefB123456789abcdef0123456789abcdef0123456789abcdef0123456789abcdefC123456789abcdef0123456789abcdef0123456789abcdef0123456789abcdefD123456789abcdef0123456789abcdef0123456789abcdef0123456789abcde"] != "" \} \{   } }

   { dg-final { return \}                                           } }

   { dg-final { fail "l_37_3.c: identifier longer than 63 bytes"    } }

 */