Zengtudor
/
glew-cmake
mirror of https://github.com/Perlmint/glew-cmake.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

*** 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:
ikits 2003-07-16 07:49:57 +00:00
parent 1fd66bdf78
commit 397ac3fd63
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
auto/bin/parse_spec.pl
View File

@ -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}/;