summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ChangeLog13
-rw-r--r--array.c1
-rw-r--r--dir.c1
-rw-r--r--eval.c1
-rw-r--r--ext/digest/digest.c3
-rw-r--r--ext/sdbm/init.c5
-rw-r--r--ext/tcltklib/tcltklib.c1
-rw-r--r--ext/win32ole/win32ole.c2
-rw-r--r--file.c1
-rw-r--r--hash.c1
-rw-r--r--io.c1
-rw-r--r--object.c2
-rw-r--r--re.c2
-rw-r--r--string.c1
-rw-r--r--time.c1
15 files changed, 32 insertions, 4 deletions
diff --git a/ChangeLog b/ChangeLog
index 6e4a426fd0..7a632e844b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,16 @@
+Sun Dec 22 02:49:25 2002 NAKAMURA Usaku <usa@ruby-lang.org>
+
+ * array.c (ary_alloc), dir.c (dir_s_alloc), eval.c (thgroup_s_alloc),
+ file.c (rb_stat_s_alloc), hash.c (hash_alloc), io.c (io_alloc),
+ object.c (rb_module_s_alloc, rb_class_allocate_instance),
+ re.c (match_alloc, rb_reg_s_alloc), string.c (str_alloc),
+ time.c (time_s_alloc), ext/digest/digest.c (rb_digest_base_alloc),
+ ext/tcltklib/tcltklib.c (ip_alloc),
+ ext/win32ole/win32ole.c (fole_s_allocate, fev_s_allocate)
+ : add prototype to get rid of VC++ warnings.
+
+ * ext/sdbm/init.c (fsdbm_alloc): allocator takes only one argument.
+
Sun Dec 22 00:36:43 2002 WATANABE Hirofumi <eban@ruby-lang.org>
* lib/mkmf.rb (create_makefile): accept pure ruby libraries.
diff --git a/array.c b/array.c
index 9c880e04bc..3429d7e1af 100644
--- a/array.c
+++ b/array.c
@@ -86,6 +86,7 @@ rb_ary_frozen_p(ary)
return Qfalse;
}
+static VALUE ary_alloc _((VALUE));
static VALUE
ary_alloc(klass)
VALUE klass;
diff --git a/dir.c b/dir.c
index e04fac67d6..7a5e0a3e1e 100644
--- a/dir.c
+++ b/dir.c
@@ -248,6 +248,7 @@ free_dir(dir)
static VALUE dir_close _((VALUE));
+static VALUE dir_s_alloc _((VALUE));
static VALUE
dir_s_alloc(klass)
VALUE klass;
diff --git a/eval.c b/eval.c
index 5630d34314..e9f07a61ba 100644
--- a/eval.c
+++ b/eval.c
@@ -9408,6 +9408,7 @@ struct thgroup {
int gid;
};
+static VALUE thgroup_s_alloc _((VALUE));
static VALUE
thgroup_s_alloc(klass)
VALUE klass;
diff --git a/ext/digest/digest.c b/ext/digest/digest.c
index 0d058bbfd4..a170678cf0 100644
--- a/ext/digest/digest.c
+++ b/ext/digest/digest.c
@@ -57,7 +57,8 @@ get_digest_base_metadata(klass)
return algo;
}
-
+
+static VALUE rb_digest_base_alloc _((VALUE));
static VALUE
rb_digest_base_alloc(klass)
VALUE klass;
diff --git a/ext/sdbm/init.c b/ext/sdbm/init.c
index 81dc59a080..a2b90438f6 100644
--- a/ext/sdbm/init.c
+++ b/ext/sdbm/init.c
@@ -56,10 +56,9 @@ fsdbm_close(obj)
return Qnil;
}
+static VALUE fsdbm_alloc _((VALUE));
static VALUE
-fsdbm_alloc(argc, argv, klass)
- int argc;
- VALUE *argv;
+fsdbm_alloc(klass)
VALUE klass;
{
return Data_Wrap_Struct(klass, 0, free_sdbm, 0);
diff --git a/ext/tcltklib/tcltklib.c b/ext/tcltklib/tcltklib.c
index 5e68f04241..95abb5a8c1 100644
--- a/ext/tcltklib/tcltklib.c
+++ b/ext/tcltklib/tcltklib.c
@@ -469,6 +469,7 @@ ip_free(ptr)
}
/* create and initialize interpreter */
+static VALUE ip_alloc _((VALUE));
static VALUE
ip_alloc(self)
VALUE self;
diff --git a/ext/win32ole/win32ole.c b/ext/win32ole/win32ole.c
index 1eb09e0a5e..a2744ed8c9 100644
--- a/ext/win32ole/win32ole.c
+++ b/ext/win32ole/win32ole.c
@@ -715,6 +715,7 @@ ole_set_member(self, dispatch)
return self;
}
+static VALUE fole_s_allocate _((VALUE));
static VALUE
fole_s_allocate(klass)
VALUE klass;
@@ -5071,6 +5072,7 @@ ole_event_free(poleev)
}
}
+static VALUE fev_s_allocate _((VALUE));
static VALUE
fev_s_allocate(klass)
VALUE klass;
diff --git a/file.c b/file.c
index add70d2697..5b2d62757d 100644
--- a/file.c
+++ b/file.c
@@ -1973,6 +1973,7 @@ rb_f_test(argc, argv)
return Qnil; /* not reached */
}
+static VALUE rb_stat_s_alloc _((VALUE));
static VALUE
rb_stat_s_alloc(klass)
VALUE klass;
diff --git a/hash.c b/hash.c
index 16b89bfacd..d579e307d6 100644
--- a/hash.c
+++ b/hash.c
@@ -178,6 +178,7 @@ rb_hash_foreach(hash, func, farg)
return rb_ensure(rb_hash_foreach_call, (VALUE)&arg, rb_hash_foreach_ensure, hash);
}
+static VALUE hash_alloc _((VALUE));
static VALUE
hash_alloc(klass)
VALUE klass;
diff --git a/io.c b/io.c
index 043a66552b..a7e1047e7b 100644
--- a/io.c
+++ b/io.c
@@ -275,6 +275,7 @@ ruby_dup(orig)
return fd;
}
+static VALUE io_alloc _((VALUE));
static VALUE
io_alloc(klass)
VALUE klass;
diff --git a/object.c b/object.c
index 7a5329cb1e..3624ab2c09 100644
--- a/object.c
+++ b/object.c
@@ -684,6 +684,7 @@ rb_class_initialize(argc, argv, klass)
return rb_mod_initialize(klass);
}
+static VALUE rb_module_s_alloc _((VALUE));
static VALUE
rb_module_s_alloc(klass)
VALUE klass;
@@ -724,6 +725,7 @@ rb_obj_alloc(klass)
return obj;
}
+static VALUE rb_class_allocate_instance _((VALUE));
static VALUE
rb_class_allocate_instance(klass)
VALUE klass;
diff --git a/re.c b/re.c
index 1757e968c7..10451bcb12 100644
--- a/re.c
+++ b/re.c
@@ -511,6 +511,7 @@ make_regexp(s, len, flags)
static VALUE rb_cMatch;
+static VALUE match_alloc _((VALUE));
static VALUE
match_alloc(klass)
VALUE klass;
@@ -1002,6 +1003,7 @@ rb_reg_initialize(obj, s, len, options)
}
}
+static VALUE rb_reg_s_alloc _((VALUE));
static VALUE
rb_reg_s_alloc(klass)
VALUE klass;
diff --git a/string.c b/string.c
index d9de50bf6c..d1cbd09cc4 100644
--- a/string.c
+++ b/string.c
@@ -36,6 +36,7 @@ VALUE rb_cString;
VALUE rb_fs;
+static VALUE str_alloc _((VALUE));
static VALUE
str_alloc(klass)
VALUE klass;
diff --git a/time.c b/time.c
index 2d533d156c..f1cb34cd71 100644
--- a/time.c
+++ b/time.c
@@ -41,6 +41,7 @@ time_free(tobj)
if (tobj) free(tobj);
}
+static VALUE time_s_alloc _((VALUE));
static VALUE
time_s_alloc(klass)
VALUE klass;