2003-12-04 Mike Kestner <mkestner@ximian.com>

* parser/gapi2xml.pl : fix for const param handling [#50295]

svn path=/trunk/gtk-sharp/; revision=20780
This commit is contained in:
Mike Kestner 2003-12-04 17:52:02 +00:00
parent f61ac5c89c
commit 2b71c9172e
2 changed files with 6 additions and 2 deletions

View file

@ -1,3 +1,7 @@
2003-12-04 Mike Kestner <mkestner@ximian.com>
* parser/gapi2xml.pl : fix for const param handling [#50295]
2003-12-03 Mike Kestner <mkestner@speakeasy.net> 2003-12-03 Mike Kestner <mkestner@speakeasy.net>
* generator/CallbackGen.cs : use new sig and isig classes. * generator/CallbackGen.cs : use new sig and isig classes.

View file

@ -4,7 +4,7 @@
# #
# Author: Mike Kestner <mkestner@speakeasy.net> # Author: Mike Kestner <mkestner@speakeasy.net>
# #
# <c> 2001-2003 Mike Kestner # <c> 2001-2003 Mike Kestner, <c> 2003 Novell, Inc.
############################################################## ##############################################################
$debug=0; $debug=0;
@ -655,7 +655,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/(\*+)\s*const/\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+\((.*)\)/) {
my $ret = $1; my $cbn = $2; my $params = $3; my $ret = $1; my $cbn = $2; my $params = $3;