ryujinx/GtkSharp
1
0
Fork 0
mirror of https://github.com/Ryujinx/GtkSharp.git synced 2025-06-12 04:35:30 +00:00
Code Issues Packages Projects Releases Wiki Activity

2004-11-12 Mike Kestner <mkestner@novell.com>

Browse source 
* parser/gapi_pp.pl : fix multi-line extern parsing.

svn path=/trunk/gtk-sharp/; revision=36086
This commit is contained in:
Mike Kestner 2004-11-13 03:09:14 +00:00
parent 314419c926
commit 220caaa929
2 changed files with 8 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
ChangeLog
View file

@ -1,3 +1,7 @@
2004-11-12 Mike Kestner <mkestner@novell.com>
* parser/gapi_pp.pl : fix multi-line extern parsing.
2004-11-12 Mike Kestner <mkestner@novell.com> 2004-11-12 Mike Kestner <mkestner@novell.com>
* parser/gapi_pp.pl : fix a struct parsing bug. * parser/gapi_pp.pl : fix a struct parsing bug.

6
parser/gapi_pp.pl
View file

@ -8,7 +8,7 @@
# #
# Copyright (c) 2001 Mike Kestner # Copyright (c) 2001 Mike Kestner
# Copyright (c) 2003 Martin Willemoes Hansen # Copyright (c) 2003 Martin Willemoes Hansen
# Copyright (c) 2003 Novell, Inc. # Copyright (c) 2003-2004 Novell, Inc.
# #
# This program is free software; you can redistribute it and/or # This program is free software; you can redistribute it and/or
# modify it under the terms of version 2 of the GNU General Public # modify it under the terms of version 2 of the GNU General Public
@ -26,7 +26,7 @@
$private_regex = "^#if.*(ENABLE_BACKEND|ENABLE_ENGINE)"; $private_regex = "^#if.*(ENABLE_BACKEND|ENABLE_ENGINE)";
$eatit_regex = "^#if.*(__cplusplus|DEBUG|DISABLE_COMPAT|ENABLE_BROKEN)"; $eatit_regex = "^#if.*(__cplusplus|DEBUG|DISABLE_COMPAT|ENABLE_BROKEN)";
$ignoreit_regex = '^\s+\*|#ident|#\s*include|#\s*else|#\s*undef|G_(BEGIN|END)_DECLS|extern|GDKVAR|GTKVAR|GTKMAIN_C_VAR|GTKTYPEUTILS_VAR|VARIABLE|GTKTYPEBUILTIN'; $ignoreit_regex = '^\s+\*|#ident|#\s*include|#\s*else|#\s*undef|G_(BEGIN|END)_DECLS|GDKVAR|GTKVAR|GTKMAIN_C_VAR|GTKTYPEUTILS_VAR|VARIABLE|GTKTYPEBUILTIN';
foreach $arg (@ARGV) { foreach $arg (@ARGV) {
if (-d $arg && -e $arg) { if (-d $arg && -e $arg) {
@ -79,6 +79,8 @@ foreach $fname (@hdrs) {
} }
} elsif ($line =~ /^\s*\/\*/) { } elsif ($line =~ /^\s*\/\*/) {
while ($line !~ /\*\//) {$line = <INFILE>;} while ($line !~ /\*\//) {$line = <INFILE>;}
} elsif ($line =~ /^extern/) {
while ($line !~ /;/) {$line = <INFILE>;}
} elsif ($line =~ /$private_regex/) { } elsif ($line =~ /$private_regex/) {
$nested = 0; $nested = 0;
while ($line = <INFILE>) { while ($line = <INFILE>) {