2000-05-30

git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@717 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

ChangeLog

@@ -1,3 +1,7 @@
+Mon May 29 10:41:10 2000  Nobuyoshi Nakada  <[email protected]>
+
+	* file.c (rb_file_s_basename): should propagate taintness.
+
 Sun May 28 21:37:13 2000  WATANABE Hirofumi  <[email protected]>
 
 	* eval.c: bug fix: DLEXT2.
@@ -18,6 +22,20 @@ Wed May 25 22:25:13 2000  WATANABE Hirofumi  <[email protected]>
 
 	* lib/mkmf.rb: ditto.
 
+Thu May 25 22:01:32 2000  Katsuyuki Komatsu  <[email protected]>
+
+	* defines.h: mswin32: remove obsolete USHORT definition.
+
+	* re.h: mswin32: use EXTERN instead of extern.
+
+	* regex.h: mswin32: export re_mbctab properly.
+
+	* win32/win32.def: add ruby_ignorecase and regex.c's exports.
+
+Thu May 25 21:28:44 JST 2000  Minero Aoki <[email protected]>
+
+	* re.c (rb_reg_expr_str): escape un-printable character.
+
 Wed May 24 23:17:50 2000  Katsuyuki Komatsu  <[email protected]>
 
 	* win32/Makefile: remove unnecessary mv and rm command call.
@@ -34,6 +52,10 @@ Wed May 24 23:49:47 2000  Yukihiro Matsumoto  <[email protected]>
 
 	* object.c (rb_mod_initialize): should provide initialize.
 
+Wed May 24 23:17:50 2000  Katsuyuki Komatsu  <[email protected]>
+
+	* win32/Makefile: remove unnecessary mv and rm command call.
+
 Wed May 24 21:01:04 2000  Katsuyuki Komatsu  <[email protected]>
 
 	* ext/pty/pty.c: use "" instead of <> to include ruby.h and rubyio.h

ToDo

@@ -24,6 +24,7 @@ Language Spec.
 * discourage use of symbol variable (e.g. $/, etc.) in manual
 * discourage use of Perlish features by giving warnings.
 * `exception' method to be alternative for `$!'. ??
+* non confusing in-block local variable (is it possible?)
 
 Hacking Interpreter
 
@@ -63,9 +64,11 @@ Standard Libraries
 - Struct::new([name,]member,...)
 - IO#reopen accepts path as well
 - Kernel#scan
-- call initialize for builtin classes too (not yet: Class, Module)
+- call initialize for builtin classes too
 - performance tune for String's non-bang methods.
 - 'w' template for pack/unpack
+- alternative for interator? => block_given?
+- regex - /p (make obsolete), /m (new)
 * String#scanf(?)
 * Object#fmt(?)
 * Integer#{bin,oct,hex,heX}
@@ -106,8 +109,5 @@ Things To Do Before 1.6
 
 * fix spec. for the following:
 
-  * alternative for $! (exception? in? into? =>?)
-  * alternative for interator?
-  - regex - /p, /m
-  * odd? even?
+  * alternative for $! (exception? in? =>? :?)
   * mkmf.rb - create_makefile("net/socket")

array.c

@@ -1082,6 +1082,13 @@ rb_ary_delete_at(ary, pos)
     return del;
 }
 
+VALUE
+rb_ary_delete_at_m(ary, pos)
+    VALUE ary, pos;
+{
+    return rb_ary_delete_at(ary, NUM2LONG(pos));
+}
+
 static VALUE
 rb_ary_slice_bang(argc, argv, ary)
     int argc;
@@ -1629,7 +1636,7 @@ Init_Array()
     rb_define_method(rb_cArray, "map!", rb_ary_collect_bang, 0);
     rb_define_method(rb_cArray, "filter", rb_ary_filter, 0);
     rb_define_method(rb_cArray, "delete", rb_ary_delete, 1);
-    rb_define_method(rb_cArray, "delete_at", rb_ary_delete_at, -1);
+    rb_define_method(rb_cArray, "delete_at", rb_ary_delete_at_m, 1);
     rb_define_method(rb_cArray, "delete_if", rb_ary_delete_if, 0);
     rb_define_method(rb_cArray, "reject!", rb_ary_delete_if, 0);
     rb_define_method(rb_cArray, "replace", rb_ary_replace_m, 1);

defines.h

@@ -31,9 +31,7 @@
 #endif /* NeXT */
 
 #ifdef NT
-#define USHORT _USHORT
 #include "win32/win32.h"
-#undef USHORT
 #endif
 
 #if defined __CYGWIN__

eval.c

@@ -6793,7 +6793,7 @@ rb_thread_schedule()
     END_FOREACH_FROM(curr, th);
 
     /* Do the select if needed */
-    if (need_select || !found) {
+    if (need_select) {
 	/* Convert delay to a timeval */
 	/* If a thread is runnable, just poll */
 	if (found) {
@@ -7321,7 +7321,7 @@ rb_thread_abort_exc_set(thread, val)
 #define THREAD_ALLOC(th) do {\
     th = ALLOC(struct thread);\
 \
-    th->status = 0;\
+    th->status = THREAD_RUNNABLE;\
     th->result = 0;\
     th->errinfo = Qnil;\
 \

ext/socket/extconf.rb

@@ -277,17 +277,17 @@
   exit
 end
 
-case with_config("ipv6-lookup-order", "INET")
+case with_config("lookup-order-hack", "UNSPEC")
 when "INET"
-  $CFLAGS="-DDEFAULT_LOOKUP_ORDER_INET "+$CFLAGS
+  $CFLAGS="-DLOOKUP_ORDER_HACK_INET "+$CFLAGS
 when "INET6"
-  $CFLAGS="-DDEFAULT_LOOKUP_ORDER_INET6 "+$CFLAGS
+  $CFLAGS="-DLOOKUP_ORDER_HACK_INET6 "+$CFLAGS
 when "UNSPEC"
-  $CFLAGS="-DDEFAULT_LOOKUP_ORDER_UNSPEC "+$CFLAGS
+  # nothing special
 else
   print <<EOS
 
-Fatal: invalid --ipv6-lookup-order (expected INET, INET6 or UNSPEC)
+Fatal: invalid value for --with-lookup-order-hack (expected INET, INET6 or UNSPEC)
 EOS
   exit
 end