* m17n baseline.

git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@1107 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
FooBarWidget · Jan 10, 2001 · fedb850 · fedb850
1 parent 10293da
commit fedb850
Show file tree

Hide file tree

Showing 11 changed files with 809 additions and 30 deletions.
diff --git a/Makefile.in b/Makefile.in
@@ -58,6 +58,7 @@ OBJS	      = array.@OBJEXT@ \
 		hash.@OBJEXT@ \
 		inits.@OBJEXT@ \
 		io.@OBJEXT@ \
+		m17n.@OBJEXT@ \
 		marshal.@OBJEXT@ \
 		math.@OBJEXT@ \
 		numeric.@OBJEXT@ \
@@ -252,7 +253,8 @@ file.@OBJEXT@: file.c ruby.h config.h defines.h intern.h rubyio.h rubysig.h dln.
 gc.@OBJEXT@: gc.c ruby.h config.h defines.h intern.h rubysig.h st.h node.h env.h re.h regex.h
 hash.@OBJEXT@: hash.c ruby.h config.h defines.h intern.h st.h rubysig.h util.h
 inits.@OBJEXT@: inits.c ruby.h config.h defines.h intern.h
-io.@OBJEXT@: io.c ruby.h config.h defines.h intern.h rubyio.h rubysig.h env.h util.h
+io.@OBJEXT@: io.c ruby.h config.h defines.h intern.h rubyio.h rubysig.h env.h util.h m17n.h
+m17n.@OBJEXT@: m17n.c m17n.h config.h
 main.@OBJEXT@: main.c ruby.h config.h defines.h intern.h
 marshal.@OBJEXT@: marshal.c ruby.h config.h defines.h intern.h rubyio.h st.h
 prec.@OBJEXT@: prec.c ruby.h config.h defines.h intern.h

diff --git a/array.c b/array.c
@@ -1440,7 +1440,7 @@ ary_make_hash(ary1, ary2)
     VALUE ary1, ary2;
 {
     VALUE hash = rb_hash_new();
-    int i, n;
+    int i;
 
     for (i=0; i<RARRAY(ary1)->len; i++) {
 	rb_hash_aset(hash, RARRAY(ary1)->ptr[i], Qtrue);

diff --git a/eval.c b/eval.c
@@ -6625,7 +6625,7 @@ rb_mod_define_method(argc, argv, mod)
     VALUE mod;
 {
     ID id;
-    VALUE name, body;
+    VALUE body;
 
     if (argc == 1) {
 	id = rb_to_id(argv[0]);
@@ -8037,8 +8037,6 @@ static VALUE
 rb_thread_start(klass, args)
     VALUE klass, args;
 {
-    rb_thread_t th;
-
     if (!rb_block_given_p()) {
 	rb_raise(rb_eThreadError, "must be called with a block");
     }

diff --git a/file.c b/file.c
@@ -282,7 +282,6 @@ rb_stat_inspect(self)
 
     for (i = 0; i < sizeof(member)/sizeof(member[0]); i++) {
 	VALUE str2;
-	char *p;
 
 	if (i > 0) {
 	    rb_str_cat2(str, ", ");
@@ -2163,6 +2162,7 @@ define_filetest_function(name, func, argc)
     rb_define_singleton_method(rb_cFile, name, func, argc);
 }
 
+void
 Init_File()
 {
     rb_mFileTest = rb_define_module("FileTest");

diff --git a/gc.c b/gc.c
@@ -775,7 +775,7 @@ obj_free(obj)
 	}
 	break;
       case T_STRING:
-#define STR_NO_ORIG FL_USER2	/* copied from string.c */
+#define STR_NO_ORIG FL_USER0	/* copied from string.c */
 	if (!RANY(obj)->as.string.orig || FL_TEST(obj, STR_NO_ORIG)) {
 	    RUBY_CRITICAL(free(RANY(obj)->as.string.ptr));
 	}
@@ -1152,8 +1152,6 @@ static VALUE
 undefine_final(os, obj)
     VALUE os, obj;
 {
-    VALUE table;
-
     if (finalizer_table) {
 	st_delete(finalizer_table, &obj, 0);
     }