akr	2007-09-09 01:04:36 +0900 (Sun, 09 Sep 2007)

  New Revision: 13415

  Modified files:
    trunk/marshal.c

  Log:
    abolish warnings.


  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/marshal.c?r1=13415&r2=13414

Index: marshal.c
===================================================================
--- marshal.c	(revision 13414)
+++ marshal.c	(revision 13415)
@@ -503,7 +503,7 @@
             rb_alloc_func_t allocator = rb_get_alloc_func(RBASIC(obj)->klass);
             if (st_lookup(compat_allocator_tbl,
                           (st_data_t)allocator,
-                          (st_data_t*)&compat)) {
+                          (st_data_t*)(void*)&compat)) {
                 VALUE real_obj = obj;
                 obj = compat->dumper(real_obj);
                 st_insert(arg->compat_tbl, (st_data_t)obj, (st_data_t)real_obj);
@@ -978,7 +978,7 @@
     if (st_lookup(arg->compat_tbl, v, &real_obj)) {
         rb_alloc_func_t allocator = rb_get_alloc_func(CLASS_OF(real_obj));
         st_data_t key = v;
-        if (st_lookup(compat_allocator_tbl, (st_data_t)allocator, (st_data_t*)&compat)) {
+        if (st_lookup(compat_allocator_tbl, (st_data_t)allocator, (st_data_t*)(void*)&compat)) {
             compat->loader(real_obj, v);
         }
         st_delete(arg->compat_tbl, &key, 0);
@@ -1034,7 +1034,7 @@
     klass = path2class(path);
 
     allocator = rb_get_alloc_func(klass);
-    if (st_lookup(compat_allocator_tbl, (st_data_t)allocator, (st_data_t*)&compat)) {
+    if (st_lookup(compat_allocator_tbl, (st_data_t)allocator, (st_data_t*)(void*)&compat)) {
         VALUE real_obj = rb_obj_alloc(klass);
         VALUE obj = rb_obj_alloc(compat->oldclass);
         st_insert(arg->compat_tbl, (st_data_t)obj, (st_data_t)real_obj);

--
ML: ruby-changes@q...
Info: http://www.atdot.net/~ko1/quickml