Ensure api_conv.pl is idempotent on names of constants: XCB_[A-Z0-9_]+.

This commit is contained in:
Jamey Sharp 2006-09-25 04:14:26 -07:00
parent 0bccf7d2ee
commit d04e7777d3

View File

@ -62,7 +62,7 @@ sub convert($$)
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';
return $_ if /^[A-Z]*_[A-Z_]*$/ or !/^XCB(.+)/;
return $_ if /^[A-Z0-9]*_[A-Z0-9_]*$/ or !/^XCB(.+)/;
my $const = defined $::const{$_};
$_ = $1;