summaryrefslogtreecommitdiff
path: root/ext
diff options
context:
space:
mode:
Diffstat (limited to 'ext')
-rw-r--r--ext/extmk.rb.in15
-rw-r--r--ext/gtk/gtk.c10
2 files changed, 12 insertions, 13 deletions
diff --git a/ext/extmk.rb.in b/ext/extmk.rb.in
index b60951538d..e1623529b6 100644
--- a/ext/extmk.rb.in
+++ b/ext/extmk.rb.in
@@ -313,11 +313,11 @@ archdir = $(pkglibdir)/@arch@
mfile.printf $objs.join(" ")
mfile.printf "\n"
- mfile.printf "\
-TARGET = %s.%s
+ mfile.printf << EOS
+TARGET = #{target}.#{$static ? "a" : "@DLEXT@"}
-INSTALL = %s@INSTALL@
-INSTALL_DATA = %s@INSTALL_DATA@
+INSTALL = #{$dots}@INSTALL@
+INSTALL_DATA = @INSTALL_DATA@
binsuffix = @binsuffix@
@@ -328,16 +328,15 @@ clean:; @rm -f *.o *.a *.so *.sl
@rm -f core ruby$(binsuffix) *~
realclean: clean
-", target,
- if $static then "a" else "@DLEXT@" end, $dots, $dots
+EOS
- mfile.printf "\
+ mfile.printf <<EOS
install:
@test -d $(DESTDIR)$(libdir) || mkdir $(DESTDIR)$(libdir)
@test -d $(DESTDIR)$(pkglibdir) || mkdir $(DESTDIR)$(pkglibdir)
@test -d $(DESTDIR)$(archdir) || mkdir $(DESTDIR)$(archdir)
-"
+EOS
if !$static
mfile.printf "\
$(INSTALL) $(TARGET) $(DESTDIR)$(archdir)/$(TARGET)
diff --git a/ext/gtk/gtk.c b/ext/gtk/gtk.c
index fb7c5918a4..1afe083d9e 100644
--- a/ext/gtk/gtk.c
+++ b/ext/gtk/gtk.c
@@ -6647,11 +6647,11 @@ idle()
return Qtrue;
}
-static void
+static VALUE
exec_interval(proc)
VALUE proc;
{
- rb_funcall(proc, id_call, 0);
+ return rb_funcall(proc, id_call, 0);
}
static VALUE
@@ -6660,8 +6660,8 @@ timeout_add(self, interval)
{
int id;
- id = gtk_timeout_add_interp(NUM2INT(interval), exec_interval,
- (gpointer)rb_f_lambda(), 0);
+ id = gtk_timeout_add(NUM2INT(interval), (GtkFunction)exec_interval,
+ (gpointer)rb_f_lambda());
return INT2FIX(id);
}
@@ -6679,7 +6679,7 @@ idle_add(self)
{
int id;
- id = gtk_idle_add_interp(exec_interval, (gpointer)rb_f_lambda(), 0);
+ id = gtk_idle_add((GtkFunction)exec_interval, (gpointer)rb_f_lambda());
return INT2FIX(id);
}