mirror of
https://github.com/Perlmint/glew-cmake.git
synced 2024-11-11 09:33:49 +00:00
*** empty log message ***
git-svn-id: https://glew.svn.sourceforge.net/svnroot/glew/trunk/glew@108 783a27ee-832a-0410-bc00-9f386506c6dd
This commit is contained in:
parent
1fd66bdf78
commit
397ac3fd63
@ -176,15 +176,15 @@ sub parse_spec($)
|
||||
# add line to function list
|
||||
push @fnc, $_;
|
||||
|
||||
my $f = normalize_prototype(@fnc);
|
||||
print STDERR "$f\n";
|
||||
# my $f = normalize_prototype(@fnc);
|
||||
# print STDERR "$f\n";
|
||||
|
||||
# if normalized version of function looks like a function
|
||||
if (normalize_prototype(@fnc) =~ /$regex{function}/)
|
||||
{
|
||||
# get return type, name, and arguments, add them to functions hash
|
||||
my ($return, $name, $parms) = ($1, $2, $3);
|
||||
print STDERR "$1 | $2 | $3\n";
|
||||
# print STDERR "$1 | $2 | $3\n";
|
||||
if (!ignore_function($name, $extname))
|
||||
{
|
||||
$name =~ s/^/gl/ unless $name =~ /$regex{prefix}/;
|
||||
|
Loading…
Reference in New Issue
Block a user