2004-07-30 Mike Kestner <mkestner@ximian.com>

* parser/gapi2xml.pl : char const * fixes for clahey's gsf binding.

svn path=/trunk/gtk-sharp/; revision=31687
This commit is contained in:
Mike Kestner 2004-07-30 20:36:39 +00:00
parent 12e3dbe0ad
commit 0cbff45649
2 changed files with 6 additions and 0 deletions

View file

@ -1,3 +1,7 @@
2004-07-30 Mike Kestner <mkestner@ximian.com>
* parser/gapi2xml.pl : char const * fixes for clahey's gsf binding.
2004-07-24 Mike Kestner <mkestner@ximian.com> 2004-07-24 Mike Kestner <mkestner@ximian.com>
* gdk/Gdk.metadata : hide Window.Destroy. * gdk/Gdk.metadata : hide Window.Destroy.

View file

@ -456,6 +456,7 @@ sub addFieldElems
foreach $field (@fields) { foreach $field (@fields) {
next if ($field !~ /\S/); next if ($field !~ /\S/);
$field =~ s/\s+(\*+)/\1 /g; $field =~ s/\s+(\*+)/\1 /g;
$field =~ s/(\w+)\s+const /const \1 /g;
$field =~ s/const /const\-/g; $field =~ s/const /const\-/g;
$field =~ s/struct /struct\-/g; $field =~ s/struct /struct\-/g;
$field =~ s/.*\*\///g; $field =~ s/.*\*\///g;
@ -689,6 +690,7 @@ sub addParamsElem
foreach $parm (@params) { foreach $parm (@params) {
$parm_num++; $parm_num++;
$parm =~ s/\s+(\*+)/\1 /g; $parm =~ s/\s+(\*+)/\1 /g;
$parm =~ s/(\w+)\s+const /const \1 /g;
$parm =~ s/(\*+)\s*const\s+/\1 /g; $parm =~ s/(\*+)\s*const\s+/\1 /g;
$parm =~ s/const\s+/const-/g; $parm =~ s/const\s+/const-/g;
if ($parm =~ /(.*)\(\s*\**\s*(\w+)\)\s+\((.*)\)/) { if ($parm =~ /(.*)\(\s*\**\s*(\w+)\)\s+\((.*)\)/) {