summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ChangeLog7
-rw-r--r--README.EXT.ja58
-rw-r--r--dir.c2
-rw-r--r--eval.c10
-rw-r--r--eval_intern.h12
-rw-r--r--keywords2
-rw-r--r--lex.c.blt2
-rw-r--r--lex.c.src2
-rw-r--r--load.c2
-rw-r--r--thread.c2
10 files changed, 52 insertions, 47 deletions
diff --git a/ChangeLog b/ChangeLog
index ed0c9b25f6..701e031442 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+Tue Dec 25 13:13:09 2007 Yukihiro Matsumoto <matz@ruby-lang.org>
+
+ * README.EXT.ja, dir.c, eval.c, eval_intern.h, lex.c.src,
+ lex.c.blt, keywords, load.c, thread.c: more ANSI'ize.
+ a patch from Tadashi Saito <shiba AT mail2.accsnet.ne.jp>
+ in [ruby-dev:32725]
+
Tue Dec 25 13:07:56 2007 Koichi Sasada <ko1@atdot.net>
* vm_core.h, thread.c, cont.c: add RUBY_VM_SET_INTERRUPT(),
diff --git a/README.EXT.ja b/README.EXT.ja
index 7db7285c6f..09555ee13f 100644
--- a/README.EXT.ja
+++ b/README.EXT.ja
@@ -107,16 +107,16 @@ FIXNUMとNILに関してはより高速な判別マクロが用意されています.
発生する).同様にチェック無しで使える変換マクロはdoubleを
取り出す「NUM2DBL()」があります。
-char* を取り出す場合、version 1.6 以前では「STR2CSTR()」と
-いうマクロを使っていましたが、これは to_str() による暗黙の
-型変換結果が GC される可能性があるため、version 1.7 以降では
-obsolete となり、代わりに StringValue() と StringValuePtr()
-を使う事を推奨しています。StringValue(var) は var が String
- であれば何もせず、そうでなければ var を var.to_str() の結果に
-置き換えるマクロ、StringValuePtr(var) は同様に var を置き換え
-てから var の文字列表現に対する char* を返すマクロです。var の
-内容を直接置き換える処理が入るので、var は lvalue である必要が
-あります。
+char* を取り出す場合、version 1.6 以前では「STR2CSTR()」とい
+うマクロを使っていましたが、これは to_str() による暗黙の型変
+換結果が GC される可能性があるため、version 1.7 以降では
+obsolete となり、代わりに StringValue() と StringValuePtr()
+を使う事を推奨しています。StringValue(var) は var が String
+であれば何もせず、そうでなければ var を var.to_str() の結果
+に置き換えるマクロ、StringValuePtr(var) は同様に var を置き
+換えてから var の文字列表現に対する char* を返すマクロです。
+var の内容を直接置き換える処理が入るので、var は lvalue であ
+る必要があります。
それ以外のデータタイプは対応するCの構造体があります.対応す
る構造体のあるVALUEはそのままキャスト(型変換)すれば構造体の
@@ -576,7 +576,8 @@ Rubyは拡張ライブラリをロードする時に「Init_ライブラリ名」と
定義を行います.dbm.cから一部引用します.
--
-Init_dbm()
+void
+Init_dbm(void)
{
/* DBMクラスを定義する */
cDBM = rb_define_class("DBM", rb_cObject);
@@ -638,8 +639,7 @@ fdbm_delete()はこのようになっています.
--
static VALUE
-fdbm_delete(obj, keystr)
- VALUE obj, keystr;
+fdbm_delete(VALUE obj, VALUE keystr)
{
:
}
@@ -655,10 +655,7 @@ fdbm_delete(obj, keystr)
--
static VALUE
-fdbm_s_open(argc, argv, klass)
- int argc;
- VALUE *argv;
- VALUE klass;
+fdbm_s_open(int argc, VALUE *argv, VALUE klass)
{
:
if (rb_scan_args(argc, argv, "11", &file, &vmode) == 1) {
@@ -687,8 +684,7 @@ Rubyの配列で引数を受け取るものはindexesがあります.実装はこ
--
static VALUE
-fdbm_indexes(obj, args)
- VALUE obj, args;
+fdbm_indexes(VALUE obj, VALUE args)
{
:
}
@@ -1049,8 +1045,8 @@ char *rb_id2name(ID id)
char *rb_class2name(VALUE klass)
- クラスの名前を返す(デバッグ用).クラスが名前を持たない時には,
- 祖先を遡って名前を持つクラスの名前を返す.
+ クラスの名前を返す(デバッグ用).クラスが名前を持たない時に
+ は, 祖先を遡って名前を持つクラスの名前を返す.
int rb_respond_to(VALUE obj, ID id)
@@ -1193,10 +1189,10 @@ find_library(lib, func, path...)
have_func(func, header)
- ヘッダファイルheaderをインクルードして関数funcの存在をチェッ
- クする.funcが標準ではリンクされないライブラリ内のものであ
- る時には先にhave_libraryでそのライブラリをチェックしておく
- 事.関数が存在する時trueを返す.
+ ヘッダファイルheaderをインクルードして関数funcの存在をチェ
+ ックする.funcが標準ではリンクされないライブラリ内のもので
+ ある時には先にhave_libraryでそのライブラリをチェックしてお
+ く事.関数が存在する時trueを返す.
have_var(var, header)
@@ -1247,7 +1243,8 @@ find_executable(command, path)
with_config(withval[, default=nil])
- コマンドライン上の--with-<withval>で指定されたオプション値を得る.
+ コマンドライン上の--with-<withval>で指定されたオプション値
+ を得る.
enable_config(config, *defaults)
disable_config(config, *defaults)
@@ -1256,8 +1253,9 @@ disable_config(config, *defaults)
--disable-<config>で指定された真偽値を得る.
--enable-<config>が指定されていた場合はtrue,
--disable-<config>が指定されていた場合はfalseを返す.
- どちらも指定されていない場合は,ブロックつきで呼び出されている場合は
- *defaultsをyieldした結果,ブロックなしなら*defaultsを返す.
+ どちらも指定されていない場合は,ブロックつきで呼び出されて
+ いる場合は*defaultsをyieldした結果,ブロックなしなら
+ *defaultsを返す.
dir_config(target[, default_dir])
dir_config(target[, default_include, default_lib])
@@ -1266,8 +1264,8 @@ dir_config(target[, default_include, default_lib])
--with-<target>-libのいずれかで指定されるディレクトリを
$CFLAGS や $LDFLAGS に追加する.--with-<target>-dir=/pathは
--with-<target>-include=/path/include --with-<target>-lib=/path/lib
- と等価である.追加された include ディレクトリと lib ディレクトリの
- 配列を返す. ([include_dir, lib_dir])
+ と等価である.追加された include ディレクトリと lib ディレ
+ クトリの配列を返す. ([include_dir, lib_dir])
pkg_config(pkg)
diff --git a/dir.c b/dir.c
index 9e90dca2d9..8163a639de 100644
--- a/dir.c
+++ b/dir.c
@@ -922,7 +922,7 @@ sys_warning_1(const char* mesg)
#define GLOB_VERBOSE (1UL << (sizeof(int) * CHAR_BIT - 1))
#define sys_warning(val) \
- (void)((flags & GLOB_VERBOSE) && rb_protect((VALUE (*)_((VALUE)))sys_warning_1, (VALUE)(val), 0))
+ (void)((flags & GLOB_VERBOSE) && rb_protect((VALUE (*)(VALUE))sys_warning_1, (VALUE)(val), 0))
#define GLOB_ALLOC(type) (type *)malloc(sizeof(type))
#define GLOB_ALLOC_N(type, n) (type *)malloc(sizeof(type) * (n))
diff --git a/eval.c b/eval.c
index 3fdd24fe60..270d160ba0 100644
--- a/eval.c
+++ b/eval.c
@@ -55,10 +55,10 @@ char **rb_origenviron;
void rb_clear_trace_func(void);
void rb_thread_stop_timer_thread(void);
-void rb_call_inits _((void));
-void Init_stack _((VALUE *));
-void Init_heap _((void));
-void Init_ext _((void));
+void rb_call_inits(void);
+void Init_stack(VALUE *);
+void Init_heap(void);
+void Init_ext(void);
void Init_BareVM(void);
void
@@ -268,7 +268,7 @@ rb_eval_string(const char *str)
VALUE
rb_eval_string_protect(const char *str, int *state)
{
- return rb_protect((VALUE (*)_((VALUE)))rb_eval_string, (VALUE)str, state);
+ return rb_protect((VALUE (*)(VALUE))rb_eval_string, (VALUE)str, state);
}
VALUE
diff --git a/eval_intern.h b/eval_intern.h
index 15202fa2f8..884d7c42a0 100644
--- a/eval_intern.h
+++ b/eval_intern.h
@@ -62,7 +62,7 @@ void *alloca();
#endif
#ifndef HAVE_STRING_H
-char *strrchr _((const char *, const char));
+char *strrchr(const char *, const char);
#endif
#ifdef HAVE_UNISTD_H
@@ -192,19 +192,19 @@ char *strrchr _((const char *, const char));
} \
while (0)
-void rb_thread_cleanup _((void));
-void rb_thread_wait_other_threads _((void));
+void rb_thread_cleanup(void);
+void rb_thread_wait_other_threads(void);
int thread_set_raised(rb_thread_t *th);
int thread_reset_raised(rb_thread_t *th);
VALUE rb_f_eval(int argc, VALUE *argv, VALUE self);
-VALUE rb_make_exception _((int argc, VALUE *argv));
+VALUE rb_make_exception(int argc, VALUE *argv);
NORETURN(void rb_fiber_start(void));
-NORETURN(void rb_raise_jump _((VALUE)));
-NORETURN(void rb_print_undef _((VALUE, ID, int)));
+NORETURN(void rb_raise_jump(VALUE));
+NORETURN(void rb_print_undef(VALUE, ID, int));
NORETURN(void vm_localjump_error(const char *, VALUE, int));
NORETURN(void vm_jump_tag_but_local_jump(int, VALUE));
diff --git a/keywords b/keywords
index e89cff6538..76cd2437a9 100644
--- a/keywords
+++ b/keywords
@@ -1,6 +1,6 @@
%{
struct kwtable {char *name; int id[2]; enum lex_state_e state;};
-const struct kwtable *rb_reserved_word _((const char *, unsigned int));
+const struct kwtable *rb_reserved_word(const char *, unsigned int);
#ifndef RIPPER
%}
diff --git a/lex.c.blt b/lex.c.blt
index 5a9d7f6a0f..1b6c31e964 100644
--- a/lex.c.blt
+++ b/lex.c.blt
@@ -31,7 +31,7 @@ error "gperf generated tables don't work with this execution character set. Plea
#line 1 "keywords"
struct kwtable {char *name; int id[2]; enum lex_state_e state;};
-const struct kwtable *rb_reserved_word _((const char *, unsigned int));
+const struct kwtable *rb_reserved_word(const char *, unsigned int);
#ifndef RIPPER
#line 7 "keywords"
struct kwtable;
diff --git a/lex.c.src b/lex.c.src
index e89cff6538..76cd2437a9 100644
--- a/lex.c.src
+++ b/lex.c.src
@@ -1,6 +1,6 @@
%{
struct kwtable {char *name; int id[2]; enum lex_state_e state;};
-const struct kwtable *rb_reserved_word _((const char *, unsigned int));
+const struct kwtable *rb_reserved_word(const char *, unsigned int);
#ifndef RIPPER
%}
diff --git a/load.c b/load.c
index a334fd6ee7..541e6c81bc 100644
--- a/load.c
+++ b/load.c
@@ -215,7 +215,7 @@ rb_provide(const char *feature)
rb_provide_feature(rb_str_new2(feature));
}
-NORETURN(static void load_failed _((VALUE)));
+NORETURN(static void load_failed(VALUE));
void
rb_load(VALUE fname, int wrap)
diff --git a/thread.c b/thread.c
index a96806d773..5bf5299221 100644
--- a/thread.c
+++ b/thread.c
@@ -1998,7 +1998,7 @@ struct thgroup {
* were created.
*/
-static VALUE thgroup_s_alloc _((VALUE));
+static VALUE thgroup_s_alloc(VALUE);
static VALUE
thgroup_s_alloc(VALUE klass)
{