summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ChangeLog4
-rw-r--r--ext/probeprofiler/probeprofiler.c16
2 files changed, 11 insertions, 9 deletions
diff --git a/ChangeLog b/ChangeLog
index bab4088259..54e91b2933 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Sun Jun 10 18:37:13 2007 Nobuyoshi Nakada <nobu@ruby-lang.org>
+
+ * ext/probeprofiler/probeprofiler.c: clean warnings.
+
Sun Jun 10 18:32:24 2007 Nobuyoshi Nakada <nobu@ruby-lang.org>
* missing/isinf.c, missing/dup2.c, missing/strtod.c, missing/x68.c,
diff --git a/ext/probeprofiler/probeprofiler.c b/ext/probeprofiler/probeprofiler.c
index fba4d85f46..cff793039e 100644
--- a/ext/probeprofiler/probeprofiler.c
+++ b/ext/probeprofiler/probeprofiler.c
@@ -1,12 +1,16 @@
#include <ruby/ruby.h>
#include <yarvcore.h>
+VALUE rb_thread_current_status(rb_thread_t *);
+void rb_add_event_hook(rb_event_hook_func_t, rb_event_flag_t, VALUE);
+int rb_remove_event_hook(rb_event_hook_func_t);
+
static void
hash_inc(VALUE data, VALUE key)
{
VALUE num = INT2FIX(0);
- if (num = rb_hash_aref(data, key)) {
+ if (RTEST(num = rb_hash_aref(data, key))) {
num = INT2FIX(FIX2INT(num) + 1);
}
@@ -15,7 +19,7 @@ hash_inc(VALUE data, VALUE key)
static void
pprof_hook(rb_event_flag_t flag, VALUE data,
- VALUE dmyid, VALUE dmyklass)
+ VALUE self, ID dmyid, VALUE dmyklass)
{
rb_thread_t *th = GET_THREAD();
VALUE sig = rb_thread_current_status(th);
@@ -43,13 +47,7 @@ pprof_stop(VALUE self)
return Qnil;
}
-static int
-hash_to_ary_i(VALUE key, VALUE value, VALUE ary)
-{
- rb_ary_push(ary, rb_ary_new3(2, value, key));
- return ST_CONTINUE;
-}
-
+void
Init_probeprofiler(void)
{
VALUE mPProf;