Match only XCB-namespaced XID generators when converting to xcb_generate_id.
authorJamey Sharp <jamey@minilop.net>
Sun, 15 Oct 2006 19:34:30 +0000 (12:34 -0700)
committerJamey Sharp <jamey@minilop.net>
Sun, 15 Oct 2006 19:34:30 +0000 (12:34 -0700)
Thanks to Vincent Torri for pointing out that I screwed up. :-)

tools/api_conv.pl

index 83fd82d..5b3c18d 100755 (executable)
@@ -59,6 +59,7 @@ sub convert($$)
        local $_ = shift;
        my ($fun) = @_;
 
+       return "xcb_generate_id" if /^xcb_[a-z0-9_]+_new$/ or /^XCB[A-Z0-9]+New$/;
        return "uint$1_t" if /^CARD(8|16|32)$/;
        return "int$1_t" if /^INT(8|16|32)$/;
        return "uint8_t" if $_ eq 'BOOL' or $_ eq 'BYTE';
@@ -95,4 +96,3 @@ sub convert($$)
 
 s/^(\s*#\s*include\s*<)X11\/XCB\//$1xcb\//;
 s/([_A-Za-z][_A-Za-z0-9]*)([ \t]*\()?/convert($1, defined $2) . ($2 or "")/eg;
-s/xcb_[a-z0-9_]*_new/xcb_generate_id/g;