[#29469] エラーを捕まえたいのですが ... — Sakae Kobayashi <sakae@...>

困った時に出てくる、小林榮です。

12 messages 2001/05/01

[#29490] Re: [ruby-talk:14555] Ruby as a Mac OS/X scripting language — maili31s@... (SugHimsi == SUGIHARA Hiroshi)

すぎむし速報。↓だそうです。

12 messages 2001/05/02

[#29524] tr range? — kiri@...

桐山です。

17 messages 2001/05/06
[#29526] Re: tr range? — Koji Arai <JCA02266@...> 2001/05/06

新井です。

[#29644] rwiki.rb でエラー — norio goto <goto@...>

お世話になります、後藤@横河工事です。

18 messages 2001/05/14
[#29645] Re: rwiki.rb でエラー — m_seki@... 2001/05/14

[#29646] Re: rwiki.rb でエラー — norio goto <goto@...> 2001/05/14

後藤@横河工事です。

[#29675] with(obj){ } が欲しい。 — Take_tk <ggb03124@...>

例によって、ワタシ好みののりクエストですみません。

24 messages 2001/05/15
[#29694] Re: with(obj){ } が欲しい。 — "K.Kosako" <kosako@...> 2001/05/17

Take_tkさんの<20010515205133.DFBA.GGB03124@nifty.ne.jp>から

[#29707] OBJECT DAY2001 — "K.Kosako" <kosako@...>

OBJECT DAY2001から帰ってきました。

71 messages 2001/05/18
[#29712] Re: OBJECT DAY2001 — matz@... (Yukihiro Matsumoto) 2001/05/18

まつもと ゆきひろです

[#29719] Re: OBJECT DAY2001 — WATANABE Tetsuya <tetsu@...> 2001/05/21

渡辺哲也です。

[#29731] YARPC 19101 (Re: OBJECT DAY2001) — TAKAHASHI Masayoshi <maki@...> 2001/05/21

YARPC関連で動いてお騒がせしている(_o_)高橋征義です。

[#29792] Re: YARPC 19101 — akira yamada / やまだあきら <akira@...> 2001/05/27

[#29794] Re: YARPC 19101 — Minero Aoki <aamine@...> 2001/05/27

あおきです。

[#29803] Re: YARPC 19101 — Hiroshi IGARASHI <iga@...> 2001/05/27

いがらしです。

[#29721] Cygwin で Ruby をコンパイルするとエラーがでます。 — "Inoue" <inoue@...>

はじめまして、最近Rubyをはじめました井上と申します。

10 messages 2001/05/21

[#29788] marshaled time format differ — IWATSUKI Hiroyuki <don@...>

岩月と申します。

19 messages 2001/05/25
[#29789] Re: marshaled time format differ — matz@... (Yukihiro Matsumoto) 2001/05/25

まつもと ゆきひろです

[#29790] Re: marshaled time format differ — IWATSUKI Hiroyuki <don@...> 2001/05/26

岩月と申します。

[#29823] Re: marshaled time format differ — IWATSUKI Hiroyuki <don@...> 2001/05/27

岩月と申します。

[#29853] "" で行われる展開を eval 無しで… — ABE Shigeru <shiger-a@...>

 みなさま、はじめまして。阿部といいます。

17 messages 2001/05/28
[#29854] Re: "" で行われる展開を eval 無しで… — rubikitch <rubikitch@...> 2001/05/28

From: ABE Shigeru <shiger-a@nifty.com>

[#29941] Ruby ライセンスについて — matz@... (Yukihiro Matsumoto)

まつもと ゆきひろです

38 messages 2001/05/31
[#29942] Re: Ruby ライセンスについて — Takahiro Kambe <taca@...> 2001/05/31

In message <991297854.779223.23013.nullmailer@ev.netlab.zetabits.com>

[#29944] Re: Ruby ライセンスについて — "Akinori MUSHA" <knu@...> 2001/05/31

At Thu, 31 May 2001 18:00:18 +0900,

[ruby-list:29687] Re: with(obj){ } が欲しい。

From: "K.Kosako" <kosako@...>
Date: 2001-05-16 10:21:35 UTC
List: ruby-list #29687
Take_tkさんの<20010515205133.DFBA.GGB03124@nifty.ne.jp>から
> 一時的にスコープを変更してレシーバの記述が不要になるような方法が欲しいの
> ですがうまい方法はありますでしょうか?。
> 
> 	with(obj){
> 		method1 ..
> 		method2 ..
> 		method2 ..
> 	}
> 
> というような書き方ができるようになるとうれしいのですが・・。

作ってみました。

# with.rb
require 'forwardable.rb'

module SingleForwardable
  alias orig_def_singleton_delegator def_singleton_delegator

  def def_singleton_delegator(accessor, method, ali = method)
    instance_eval {
      if (method_defined?(ali))
	eval("alias _orig_#{ali} #{ali}")
	@collision << ali
      else
	@added << ali
      end
    }
    orig_def_singleton_delegator(accessor, method, ali)
  end

  def def_public_delegators(accessor)
    @collision = []
    @added = []
    @accessor = accessor
    methods = class << accessor
		public_instance_methods(true)
	      end
    methods -= ["__send__", "instance_eval", "__id__", "==", "=~", "==="]
    def_singleton_delegators(:@accessor, *methods)
  end

  def clear_public_delegators()
    for m in @collision
      instance_eval("alias #{m} _orig_#{m}")
    end
    for m in @added
      class << self; self; end.module_eval { remove_method(m) }
    end
  end
end


def with(obj)
  extend(SingleForwardable)
  def_public_delegators(obj)
  yield
  clear_public_delegators()
end


if __FILE__ == $0
  class Foo
    def foo1;      p "foo1"; end
    def foo2(x);   p "foo2", x; end
    def foo3(x,y); p "foo3", x, y; end
  end

  class Bar
    C = 100
    with(f = Foo.new) {
      foo1
      foo2(10)
      foo3(10,20)
      p equal?(f)
      p C
    }
  end
end
----
小迫@ソフネック   渋谷区恵比寿1-15-1

In This Thread