Commit 7bb4d7d9 authored by Elliot Lee's avatar Elliot Lee
Browse files

Fixed functions with no arguments

parent ed1e531c
......@@ -54,7 +54,7 @@ while(chomp($aline = <IL>)) {
.$retval."__".join("_",@params).")(GtkObject *object, ";
$argn = 1;
foreach $it(@params) { print OS $trans{$it}." arg".$argn++.",\n"; }
foreach $it(@params) { if($it ne "NONE") {print OS $trans{$it}." arg".$argn++.",\n"; } }
print OS "gpointer user_data);\n";
print OS "void gtk_marshal_".$retval."__".join("_",@params)."(GtkObject *object, GtkSignalFunc func, gpointer func_data, GtkArg *args)\n";
......@@ -71,6 +71,7 @@ while(chomp($aline = <IL>)) {
print OS "(* rfunc)(object, ";
for($i = 0; $i < (scalar @params); $i++) {
($params[$i] eq "NONE") && next;
print OS "GTK_VALUE_".$params[$i]."(args[$i]), ";
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment