mirror of
https://github.com/Perlmint/glew-cmake.git
synced 2024-11-11 09:33:49 +00:00
Ungreedy prefix match for function name -> __glew prefixing
This commit is contained in:
parent
5de43d97fc
commit
9bca6b44ea
@ -19,7 +19,7 @@ my %regex = (
|
||||
sub prefixname($)
|
||||
{
|
||||
my $name = $_[0];
|
||||
$name =~ s/^(.*)gl/__$1glew/;
|
||||
$name =~ s/^(.*?)gl/__$1glew/;
|
||||
return $name;
|
||||
}
|
||||
|
||||
@ -27,7 +27,7 @@ sub prefixname($)
|
||||
sub prefix_varname($)
|
||||
{
|
||||
my $name = $_[0];
|
||||
$name =~ s/^(.*)GL(X*)EW/__$1GL$2EW/;
|
||||
$name =~ s/^(.*?)GL(X*?)EW/__$1GL$2EW/;
|
||||
return $name;
|
||||
}
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user