Fortran: Fix PR 47485.

[gcc.git] / gcc / testsuite / g++.dg / torture / pr78051.C

extern "C" {
    typedef int FILE;
    int *stdout;
    int fputs(const char *, FILE *);
}
void print_packet() {
    const char *color[]{"", "", ""};
    fputs(color[2], stdout);
}