ruby-changes:52510
From: hsbt <ko1@a...>
Date: Thu, 13 Sep 2018 16:16:01 +0900 (JST)
Subject: [ruby-changes:52510] hsbt:r64724: Move ricsin branch to tags.
hsbt 2018-09-13 16:03:01 +0900 (Thu, 13 Sep 2018) New Revision: 64724 https://svn.ruby-lang.org/cgi-bin/viewvc.cgi?view=revision&revision=64724 Log: Move ricsin branch to tags. Added directories: tags/ricsin/ Removed directories: branches/ricsin/ Index: ricsin/bin/rake =================================================================== --- ricsin/bin/rake (revision 64723) +++ ricsin/bin/rake (nonexistent) @@ -1,31 +0,0 @@ https://github.com/ruby/ruby/blob/trunk/ricsin/bin/rake#L0 -#!/usr/bin/env ruby - -#-- -# Copyright (c) 2003, 2004, 2005, 2006, 2007 Jim Weirich -# -# Permission is hereby granted, free of charge, to any person obtaining a copy -# of this software and associated documentation files (the "Software"), to -# deal in the Software without restriction, including without limitation the -# rights to use, copy, modify, merge, publish, distribute, sublicense, and/or -# sell copies of the Software, and to permit persons to whom the Software is -# furnished to do so, subject to the following conditions: -# -# The above copyright notice and this permission notice shall be included in -# all copies or substantial portions of the Software. -# -# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR -# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, -# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE -# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER -# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING -# FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS -# IN THE SOFTWARE. -#++ - -begin - require 'rake' -rescue LoadError - require 'rubygems' - require 'rake' -end -Rake.application.run Property changes on: ricsin/bin/rake ___________________________________________________________________ Deleted: svn:executable ## -1 +0,0 ## -* \ No newline at end of property Index: ricsin/bin/testrb =================================================================== --- ricsin/bin/testrb (revision 64723) +++ ricsin/bin/testrb (nonexistent) @@ -1,5 +0,0 @@ https://github.com/ruby/ruby/blob/trunk/ricsin/bin/testrb#L0 -#!/usr/bin/env ruby -require 'test/unit' -(r = Test::Unit::AutoRunner.new(true)).process_args(ARGV) or - abort r.options.banner + " tests..." -exit r.run Property changes on: ricsin/bin/testrb ___________________________________________________________________ Deleted: svn:eol-style ## -1 +0,0 ## -LF \ No newline at end of property Deleted: svn:executable ## -1 +0,0 ## -* \ No newline at end of property Deleted: svn:keywords ## -1 +0,0 ## -Author Date Id Revision \ No newline at end of property Index: ricsin/bin/rdoc =================================================================== --- ricsin/bin/rdoc (revision 64723) +++ ricsin/bin/rdoc (nonexistent) @@ -1,22 +0,0 @@ https://github.com/ruby/ruby/blob/trunk/ricsin/bin/rdoc#L0 -#!/usr/bin/env ruby -# -# RDoc: Documentation tool for source code -# (see lib/rdoc/rdoc.rb for more information) -# -# Copyright (c) 2003 Dave Thomas -# Released under the same terms as Ruby -# -# $Revision$ - -require 'rdoc/rdoc' - -begin - r = RDoc::RDoc.new - r.document ARGV -rescue Interrupt - $stderr.puts - $stderr.puts "Interrupted" -rescue RDoc::Error => e - $stderr.puts e.message - exit 1 -end Property changes on: ricsin/bin/rdoc ___________________________________________________________________ Deleted: svn:eol-style ## -1 +0,0 ## -LF \ No newline at end of property Deleted: svn:keywords ## -1 +0,0 ## -Author Date Id Revision \ No newline at end of property Index: ricsin/bin/erb =================================================================== --- ricsin/bin/erb (revision 64723) +++ ricsin/bin/erb (nonexistent) @@ -1,141 +0,0 @@ https://github.com/ruby/ruby/blob/trunk/ricsin/bin/erb#L0 -#!/usr/bin/env ruby -# Tiny eRuby --- ERB2 -# Copyright (c) 1999-2000,2002 Masatoshi SEKI -# You can redistribute it and/or modify it under the same terms as Ruby. - -require 'erb' - -class ERB - module Main - def ARGV.switch - return nil if self.empty? - arg = self.shift - return nil if arg == '--' - if arg =~ /^-(.)(.*)/ - return arg if $1 == '-' - raise 'unknown switch "-"' if $2.index('-') - self.unshift "-#{$2}" if $2.size > 0 - "-#{$1}" - else - self.unshift arg - nil - end - end - - def ARGV.req_arg - self.shift || raise('missing argument') - end - - def trim_mode_opt(trim_mode, disable_percent) - return trim_mode if disable_percent - case trim_mode - when 0 - return '%' - when 1 - return '%>' - when 2 - return '%<>' - when '-' - return '%-' - end - end - module_function :trim_mode_opt - - def run(factory=ERB) - trim_mode = 0 - disable_percent = false - begin - while switch = ARGV.switch - case switch - when '-x' # ruby source - output = true - when '-n' # line number - number = true - when '-v' # verbose - $VERBOSE = true - when '--version' # version - STDERR.puts factory.version - exit - when '-d', '--debug' # debug - $DEBUG = true - when '-r' # require - require ARGV.req_arg - when '-S' # security level - arg = ARGV.req_arg - raise "invalid safe_level #{arg.dump}" unless arg =~ /^[0-4]$/ - safe_level = arg.to_i - when '-T' # trim mode - arg = ARGV.req_arg - if arg == '-' - trim_mode = arg - next - end - raise "invalid trim mode #{arg.dump}" unless arg =~ /^[0-2]$/ - trim_mode = arg.to_i - when '-K' # KCODE - arg = ARGV.req_arg - case arg.downcase - when 'e', '-e', 'euc' - $KCODE = 'EUC' - when 's', '-s', 'sjis' - $KCODE = 'SJIS' - when 'u', '-u', 'utf8' - $KCODE = 'UTF8' - when 'n', '-n', 'none' - $KCODE = 'NONE' - else - raise "invalid KCODE #{arg.dump}" - end - when '-P' - disable_percent = true - when '--help' - raise "print this help" - else - raise "unknown switch #{switch.dump}" - end - end - rescue # usage - STDERR.puts $!.to_s - STDERR.puts File.basename($0) + - " [switches] [inputfile]" - STDERR.puts <<EOU - -x print ruby script - -n print ruby script with line number - -v enable verbose mode - -d set $DEBUG to true - -r [library] load a library - -K [kcode] specify KANJI code-set - -S [safe_level] set $SAFE (0..4) - -T [trim_mode] specify trim_mode (0..2, -) - -P ignore lines which start with "%" -EOU - exit 1 - end - - src = $<.read - filename = $FILENAME - exit 2 unless src - trim = trim_mode_opt(trim_mode, disable_percent) - erb = factory.new(src.untaint, safe_level, trim) - erb.filename = filename - if output - if number - l = 1 - for line in erb.src - puts "%3d %s"%[l, line] - l += 1 - end - else - puts erb.src - end - else - erb.run(TOPLEVEL_BINDING.taint) - end - end - module_function :run - end -end - -if __FILE__ == $0 - ERB::Main.run -end Property changes on: ricsin/bin/erb ___________________________________________________________________ Deleted: svn:eol-style ## -1 +0,0 ## -LF \ No newline at end of property Deleted: svn:executable ## -1 +0,0 ## -* \ No newline at end of property Deleted: svn:keywords ## -1 +0,0 ## -Author Date Id Revision \ No newline at end of property Index: ricsin/bin/gem =================================================================== --- ricsin/bin/gem (revision 64723) +++ ricsin/bin/gem (nonexistent) @@ -1,28 +0,0 @@ https://github.com/ruby/ruby/blob/trunk/ricsin/bin/gem#L0 -#!/usr/bin/env ruby -#-- -# Copyright 2006 by Chad Fowler, Rich Kilmer, Jim Weirich and others. -# All rights reserved. -# See LICENSE.txt for permissions. -#++ - -require 'rubygems' -require 'rubygems/gem_runner' -require 'rubygems/exceptions' - -required_version = Gem::Requirement.new "> 1.8.3" - -unless required_version.satisfied_by? Gem.ruby_version then - abort "Expected Ruby Version #{required_version}, was #{Gem.ruby_version}" -end - -# We need to preserve the original ARGV to use for passing gem options -# to source gems. If there is a -- in the line, strip all options after -# it...its for the source building process. -args = !ARGV.include?("--") ? ARGV.clone : ARGV[0...ARGV.index("--")] - -begin - Gem::GemRunner.new.run args -rescue Gem::SystemExitException => e - exit e.exit_code -end - Property changes on: ricsin/bin/gem ___________________________________________________________________ Deleted: svn:eol-style ## -1 +0,0 ## -LF \ No newline at end of property Deleted: svn:executable ## -1 +0,0 ## -* \ No newline at end of property Deleted: svn:keywords ## -1 +0,0 ## -Author Date Id Revision \ No newline at end of property Index: ricsin/bin/ri =================================================================== --- ricsin/bin/ri (revision 64723) +++ ricsin/bin/ri (nonexistent) @@ -1,6 +0,0 @@ https://github.com/ruby/ruby/blob/trunk/ricsin/bin/ri#L0 -#!/usr//bin/env ruby - -require 'rdoc/ri/driver' - -RDoc::RI::Driver.run ARGV - Property changes on: ricsin/bin/ri ___________________________________________________________________ Deleted: svn:eol-style ## -1 +0,0 ## -LF \ No newline at end of property Deleted: svn:executable ## -1 +0,0 ## -* \ No newline at end of property Deleted: svn:keywords ## -1 +0,0 ## -Author Date Id Revision \ No newline at end of property Index: ricsin/bin/irb =================================================================== --- ricsin/bin/irb (revision 64723) +++ ricsin/bin/irb (nonexistent) @@ -1,20 +0,0 @@ https://github.com/ruby/ruby/blob/trunk/ricsin/bin/irb#L0 -#!/usr/bin/env ruby -# -# irb.rb - interactive ruby -# $Release Version: 0.9.5 $ -# $Revision$ -# by Keiju ISHITSUKA(keiju@r...) -# - -require "irb" - -if __FILE__ == $0 - IRB.start(__FILE__) -else - # check -e option - if /^-e$/ =~ $0 - IRB.start(__FILE__) - else - IRB.setup(__FILE__) - end -end Property changes on: ricsin/bin/irb ___________________________________________________________________ Deleted: svn:eol-style ## -1 +0,0 ## -LF \ No newline at end of property Deleted: svn:keywords ## -1 +0,0 ## -Author Date Id Revision \ No newline at end of property Index: ricsin/vm_exec.h =================================================================== --- ricsin/vm_exec.h (revision 64723) +++ ricsin/vm_exec.h (nonexistent) @@ -1,187 +0,0 @@ https://github.com/ruby/ruby/blob/trunk/ricsin/vm_exec.h#L0 -/********************************************************************** - - vm.h - - - $Author$ - created at: 04/01/01 16:56:59 JST - - Copyright (C) 2004-2007 Koichi Sasada - -**********************************************************************/ - -#ifndef RUBY_VM_H -#define RUBY_VM_H - -typedef long OFFSET; -typedef unsigned long lindex_t; -typedef unsigned long dindex_t; -typedef rb_num_t GENTRY; -typedef rb_iseq_t *ISEQ; - -#ifdef COLLECT_USAGE_ANALYSIS -#define USAGE_ANALYSIS_INSN(insn) vm_analysis_insn(insn) -#define USAGE_ANALYSIS_OPERAND(insn, n, op) vm_analysis_operand(insn, n, (VALUE)op) -#define USAGE_ANALYSIS_REGISTER(reg, s) vm_analysis_register(reg, s) -#else -#define USAGE_ANALYSIS_INSN(insn) /* none */ -#define USAGE_ANALYSIS_OPERAND(insn, n, op) /* none */ -#define USAGE_ANALYSIS_REGISTER(reg, s) /* none */ -#endif - -#ifdef __GCC__ -/* TODO: machine dependent prefetch instruction */ -#define PREFETCH(pc) -#else -#define PREFETCH(pc) -#endif - -#if VMDEBUG > 0 -#define debugs printf -#define DEBUG_ENTER_INSN(insn) \ - debug_print_pre(th, GET_CFP()); - -#if OPT_STACK_CACHING -#define SC_REGS() , reg_a, reg_b -#else -#define SC_REGS() -#endif - -#define DEBUG_END_INSN() \ - debug_print_post(th, GET_CFP() SC_REGS()); - -#else - -#define debugs -#define DEBUG_ENTER_INSN(insn) -#define DEBUG_END_INSN() -#endif - -#define throwdebug if(0)printf -/* #define throwdebug printf */ - -#define SDR2(cfp) vm_stack_dump_raw(GET_THREAD(), (cfp)) - - -/************************************************/ -#if DISPATCH_XXX -error ! -/************************************************/ -#elif OPT_CALL_THREADED_CODE - -#define LABEL(x) insn_func_##x -#define ELABEL(x) -#define LABEL_PTR(x) &LABEL(x) - -#define INSN_ENTRY(insn) \ - static rb_control_frame_t * \ - FUNC_FASTCALL(LABEL(insn))(rb_thread_t *th, rb_control_frame_t *reg_cfp) { - -#define END_INSN(insn) return reg_cfp;} - -#define NEXT_INSN() return reg_cfp; - -/************************************************/ -#elif OPT_TOKEN_THREADED_CODE || OPT_DIRECT_THREADED_CODE -/* threaded code with gcc */ - -#define LABEL(x) INSN_LABEL_##x -#define ELABEL(x) INSN_ELABEL_##x -#define LABEL_PTR(x) &&LABEL(x) - -#define INSN_ENTRY_SIG(insn) - - -#define INSN_DISPATCH_SIG(insn) - -#define INSN_ENTRY(insn) \ - LABEL(insn): \ - INSN_ENTRY_SIG(insn); \ - -/* dispather */ -#if __GNUC__ && (__i386__ || __x86_64__) && __GNUC__ == 3 -#define DISPATCH_ARCH_DEPEND_WAY(addr) \ - asm volatile("jmp *%0;\t# -- inseted by vm.h\t[length = 2]" : : "r" (addr)) - -#else -#define DISPATCH_ARCH_DEPEND_WAY(addr) \ - /* do nothing */ - -#endif - - -/**********************************/ -#if OPT_DIRECT_THREADED_CODE - -/* for GCC 3.4.x */ -#define TC_DISPATCH(insn) \ - INSN_DISPATCH_SIG(insn); \ - goto *GET_CURRENT_INSN(); \ - ; - -#else -/* token threade code */ - -#define TC_DISPATCH(insn) \ - DISPATCH_ARCH_DEPEND_WAY(insns_address_table[GET_CURRENT_INSN()]); \ - INSN_DISPATCH_SIG(insn); \ - goto *insns_address_table[GET_CURRENT_INSN()]; \ - rb_bug("tc error"); - - -#endif /* DISPATCH_DIRECT_THREADED_CODE */ - -#define END_INSN(insn) \ - DEBUG_END_INSN(); \ - TC_DISPATCH(insn); \ - -#define INSN_DISPATCH() \ - TC_DISPATCH(__START__) \ - { - -#define END_INSNS_DISPATCH() \ - rb_bug("unknown insn: %ld", GET_CURRENT_INSN()); \ - } /* end of while loop */ \ - -#define NEXT_INSN() TC_DISPATCH(__NEXT_INSN__) - -/************************************************/ -#else /* no threaded code */ -/* most common method */ - -#define INSN_ENTRY(insn) \ -case BIN(insn): - -#define END_INSN(insn) \ - DEBUG_END_INSN(); \ - break; - - -#define INSN_DISPATCH() \ - while(1){ \ - switch(GET_CURRENT_INSN()){ - -#define END_INSNS_DISPATCH() \ -default: \ - SDR(); \ - rb_bug("unknown insn: %ld", GET_CURRENT_INSN()); \ - } /* end of switch */ \ - } /* end of while loop */ \ - -#define NEXT_INSN() goto first - -#endif - -#define VM_SP_CNT(th, sp) ((sp) - (th)->stack) - -#if OPT_CALL_THREADED_CODE -#define THROW_EXCEPTION(exc) do { \ - th->errinfo = (VALUE)(exc); \ - return 0; \ -} while (0) -#else -#define THROW_EXCEPTION(exc) return (VALUE)(exc) -#endif - -#define SCREG(r) (reg_##r) - -#endif /* RUBY_VM_H */ Property changes on: ricsin/vm_exec.h ___________________________________________________________________ Deleted: svn:eol-style ## -1 +0,0 ## -LF \ No newline at end of property Deleted: svn:keywords ## -1 +0,0 ## -Author Date Id Revision \ No newline at end of property Index: ricsin/range.c =================================================================== --- ricsin/range.c (revision 64723) +++ ricsin/range.c (nonexistent) @@ -1,939 +0,0 @@ https://github.com/ruby/ruby/blob/trunk/ricsin/range.c#L0 -/********************************************************************** - - range.c - - - $Author$ - created at: Thu Aug 19 17:46:47 JST 1993 - - Copyright (C) 1993-2007 Yukihiro Matsumoto - -**********************************************************************/ - -#include "ruby/ruby.h" -#include "ruby/encoding.h" - -VALUE rb_cRange; -static ID id_cmp, id_succ, id_beg, id_end, id_excl; - -extern VALUE rb_struct_init_copy(VALUE copy, VALUE s); - -#define RANGE_BEG(r) (RSTRUCT(r)->as.ary[0]) -#define RANGE_END(r) (RSTRUCT(r)->as.ary[1]) -#define RANGE_EXCL(r) (RSTRUCT(r)->as.ary[2]) - -#define EXCL(r) RTEST(RANGE_EXCL(r)) -#define SET_EXCL(r,v) (RSTRUCT(r)->as.ary[2] = (v) ? Qtrue : Qfalse) - -static VALUE -range_failed(void) -{ - rb_raise(rb_eArgError, "bad value for range"); - return Qnil; /* dummy */ -} - -static VALUE -range_check(VALUE *args) -{ - return rb_funcall(args[0], id_cmp, 1, args[1]); -} - -static void -range_init(VALUE range, VALUE beg, VALUE end, int exclude_end) -{ - VALUE args[2]; - - args[0] = beg; - args[1] = end; - - if (!FIXNUM_P(beg) || !FIXNUM_P(end)) { - VALUE v; - - v = rb_rescue(range_check, (VALUE)args, range_failed, 0); - if (NIL_P(v)) - range_failed(); - } - - SET_EXCL(range, exclude_end); - RSTRUCT(range)->as.ary[0] = beg; - RSTRUCT(range)->as.ary[1] = end; -} - -VALUE -rb_range_new(VALUE beg, VALUE end, int exclude_end) -{ - VALUE range = rb_obj_alloc(rb_cRange); - - range_init(range, beg, end, exclude_end); - return range; -} - -/* - * call-seq: - * Range.new(start, end, exclusive=false) => range - * - * Constructs a range using the given <i>start</i> and <i>end</i>. If the third - * parameter is omitted or is <code>false</code>, the <i>range</i> will include - * the end object; otherwise, it will be excluded. - */ - -static VALUE -range_initialize(int argc, VALUE *argv, VALUE range) -{ - VALUE beg, end, flags; - - rb_scan_args(argc, argv, "21", &beg, &end, &flags); - /* Ranges are immutable, so that they should be initialized only once. */ - if (RANGE_EXCL(range) != Qnil) { - rb_name_error(rb_intern("initialize"), "`initialize' called twice"); - } - range_init(range, beg, end, RTEST(flags)); - return Qnil; -} - -#define range_initialize_copy rb_struct_init_copy /* :nodoc: */ - -/* - * call-seq: - * rng.exclude_end? => true or false - * - * Returns <code>true</code> if <i>rng</i> excludes its end value. - */ - -static VALUE -range_exclude_end_p(VALUE range) -{ - return EXCL(range) ? Qtrue : Qfalse; -} - - -/* - * call-seq: - * rng == obj => true or false - * - * Returns <code>true</code> only if <i>obj</i> is a Range, has equivalent - * beginning and end items (by comparing them with <code>==</code>), and has - * the same #exclude_end? setting as <i>rng</t>. - * - * (0..2) == (0..2) #=> true - * (0..2) == Range.new(0,2) #=> true - * (0..2) == (0...2) #=> false - * - */ - -static VALUE -range_eq(VALUE range, VALUE obj) -{ - if (range == obj) - return Qtrue; - if (!rb_obj_is_instance_of(obj, rb_obj_class(range))) - return Qfalse; - - if (!rb_equal(RANGE_BEG(range), RANGE_BEG(obj))) - return Qfalse; - if (!rb_equal(RANGE_END(range), RANGE_END(obj))) - return Qfalse; - - if (EXCL(range) != EXCL(obj)) - return Qfalse; - - return Qtrue; -} - -static int -r_lt(VALUE a, VALUE b) -{ - VALUE r = rb_funcall(a, id_cmp, 1, b); - - if (NIL_P(r)) - return Qfalse; - if (rb_cmpint(r, a, b) < 0) - return Qtrue; - return Qfalse; -} - -static int -r_le(VALUE a, VALUE b) -{ - int c; - VALUE r = rb_funcall(a, id_cmp, 1, b); - - if (NIL_P(r)) - return Qfalse; - c = rb_cmpint(r, a, b); - if (c == 0) - return INT2FIX(0); - if (c < 0) - return Qtrue; - return Qfalse; -} - - -/* - * call-seq: - * rng.eql?(obj) => true or false - * - * Returns <code>true</code> only if <i>obj</i> (... truncated) -- ML: ruby-changes@q... Info: http://www.atdot.net/~ko1/quickml/