The-Homebrew-Cloud/Ryujinx-GtkSharp
2
0
Fork 0
mirror of https://github.com/Ryujinx/GtkSharp.git synced 2024-09-07 07:23:18 +02:00
Code Issues Packages Projects Releases Wiki Activity

* parser/gapi_pp.pl: Added striping of C comments

Browse Source 
svn path=/trunk/gtk-sharp/; revision=15639
This commit is contained in:
Martin Willemoes Hansen 2003-06-25 21:22:28 +00:00
parent 9185d37ca2
commit ff5b07b97a
2 changed files with 33 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 @@
2003-06-25 Martin Willemoes Hansen <mwh@sysrq.dk>
* parser/gapi_pp.pl: Added striping of C comments
2003-06-23 Martin Willemoes Hansen <mwh@sysrq.dk>
* glib/Type.cs: Added ToString

31
parser/gapi_pp.pl
View File

@ -3,9 +3,11 @@
# gapi_pp.pl : A source preprocessor for the extraction of API info from a
# C library source directory.
#
# Author: Mike Kestner <mkestner@speakeasy.net>
# Authors: Mike Kestner <mkestner@speakeasy.net>
# Martin Willemoes Hansen <mwh@sysrq.dk>
#
# <c> 2001 Mike Kestner
# <c> 2003 Martin Willemoes Hansen
$eatit_regex = "^#if.*(__cplusplus|DEBUG|DISABLE_(DEPRECATED|COMPAT)|ENABLE_BROKEN|COMPILATION)";
$ignoreit_regex = '^\s+\*|#\s*include|#\s*else|#\s*endif|#\s*undef|G_(BEGIN|END)_DECLS|extern|GDKVAR|GTKVAR|GTKMAIN_C_VAR|GTKTYPEUTILS_VAR|VARIABLE|GTKTYPEBUILTIN';
@ -130,8 +132,33 @@ foreach $fname (`ls $ARGV[0]/*.c`, @privhdrs) {
print "private";
}
$comment = 0;
$begin = 0;
$end = 0;
do {
print $line;
# Following ifs strips out // and /* */ C comments
if ($line =~ /\/\*/) {
$comment = 1;
$begin = 1;
}
if ($comment != 1) {
$line =~ s/\/\/.*//;
print $line;
}
if ($line =~ /\*\//) {
$comment = 0;
$end = 1;
}
if ($begin == 1 && $end == 1) {
$line =~ s/\/\*.*\*\///;
print $line;
}
$begin = 0;
$end = 0;
} until (($line = <INFILE>) =~ /^}/);
print $line;
}