An updated EBCDIC tr patch.
[p5sagit/p5-mst-13.2.git] / embed.pl
index 5ae80eb..9e05b1b 100755 (executable)
--- a/embed.pl
+++ b/embed.pl
@@ -138,7 +138,7 @@ sub write_protos {
        if( $flags =~ /f/ ) {
            my $prefix = $flags =~ /n/ ? '' : 'pTHX_';
            my $args = scalar @args;
-           $ret .= "\n#ifdef HASATTRIBUTE\n";
+           $ret .= "\n#ifdef CHECK_FORMAT\n";
            $ret .= sprintf " __attribute__((format(printf,%s%d,%s%d)))",
                                    $prefix, $args - 1, $prefix, $args;
            $ret .= "\n#endif\n";