ruby-list

前田です。

keiju@bc.mbn.or.jp (石塚圭樹 ) wrote:

|前田さんがいなくて淋しかったです(^^;;;

どうもです:-)

|># Synchronizer呼んでるだけですし(^^;
|
|でも, 面白いですね.
|
|SynchronizableはSynchronizerを利用して(デレゲートタイプの利用ですね)実
|現しているのに対して, 逆に, SyncはSync_mをインクルードして実現していま
|す. 結局同じことを実現するのに反対のやりかたをしています.

まさかSyncがこうなるとは思っていなかったもので(^^;

extend_objectをオーバーライドして初期化処理をしてるんですね。
このワザいただきます:-)
でもincludeした時はやはりinitializeでsyns_extendedしないといけないのか...。
これはincludeをClassで再定義しちゃうしかないのかな。

class Class
   def include(*modules)
      result = super
      modules.each do |mixin|
	 if mixin.respond_to? :__extend_class
	    mixin.__extend_class(self)
	 end
      end
      result
   end
end

module Sync_m
   def Sync_m.__extend_class(klass)
      klass.eval %q{
	 def klass.new(*args)
	    obj = super
	    begin
	       eval "class << obj; @sync_locked; end"
	       obj.extend(For_primitive_object)
	    rescue TypeError
	       obj.extend(For_general_object)
	    end
	    obj
	 end
      }
   end

   module For_primitive_object
      def For_primitive_object.__extend_class(klass)
	 klass.eval %q{
	    def klass.new(*args)
	       obj = super
	       obj.sync_extended
	       Finalizer.add(obj, For_primitive_object, :sync_finalize)
	       obj
	    end
	 }
      end
   end
   
   module For_general_object
      def For_general_object.__extend_class(klass)
	 klass.eval %q{
	    def klass.new(*args)
	       obj = super
	       obj.sync_extended
	       obj
	    end
	 }
      end
   end
end

newを再定義するとまずそうな気がしたのですが、

class Spokesperson < String
   include Sync_m::For_primitive_object
   
   def msg=(msg)
      self[0..-1] = msg
   end
   
   def say
      print self, "\n"
   end
end

p tom = Spokesperson.new("This is message.")
t = Thread.new {
   3.times {
      tom.synchronize {
	 p tom.msg = "This is thread1."
	 sleep(0.3)
	 tom.say
      }
   }
}
3.times {
   tom.synchronize {
      p tom.msg = "This is thread2."
      sleep(0.3)
      tom.say
   }
}
Thread.join t

なんてのも動いてしまいました。
newの引数が違うとちゃんとArgumentErrorになりますね。

-- 
前田 修吾

Thread

Prev Next

In This Thread

Prev Next

[#3563] Ruby Jed 0.05 — shugo@... (maeda shugo)

[#3564] ruby home page moved — matz@... (Yukihiro Matsumoto)

[#3567] Nil is a subclass of Object? — shugo@... (maeda shugo)

[#3574] ruby seminar — Takaaki Higuchi - Marketing <thiguchi@...>

[#3578] None — Tatsuaki Miyawaki <miyawaki@...>

[#3607] Object#instance_variable? — shugo@... (maeda shugo)

[#3608] We have access to Nil on ruby 1.0 — shugo@... (maeda shugo)

[#3614] [Request] File.readlines — keiju@... (Keiju ISHITSUKA)

[#3616] ftplib.rb — shugo@... (maeda shugo)

[#3629] LaTeX ruby documents — Eiji-usagi-MATSUmoto <ematsu@...>

[#3636] [Req] String#include? — shugo@... (maeda shugo)

[#3638] ftplib.rb & ftpmirror — shugo@... (maeda shugo)

[#3642] [Req] destructive substitution, etc. — Shin-ichiro HARA <sinara@...>

[#3643] (no subject) — Shigehito Jitoh <mathjpn@...2.so-net.or.jp>

[#3644] Re: [Req] destructive subst — 渡辺博文 <VYV01212@...>

[#3649] [Q] How to use Synchronizer? — shugo@... (maeda shugo)

[#3664] Re: LaTeX ruby documents — keiju@... (石塚圭樹 )

[#3665] Re: LaTeX ruby documents — WATANABE Hirofumi <watanabe@...>

[#3666] Re: LaTeX ruby documents — matz@... (Yukihiro Matsumoto)

[#3667] Re: LaTeX ruby documents — WATANABE Hirofumi <watanabe@...>

[#3668] Re: [Q] How to use Synchronizer? — keiju@... (石塚圭樹 )

[#3669] Re: LaTeX ruby documents — keiju@... (石塚圭樹 )

[#3670] None — Hara Shin-ichiro <sinara@...>

[#3672] about ruby 1.1 alpha release — matz@... (Yukihiro Matsumoto)

[#3673] Re: None — Hara Shin-ichiro <sinara@...>

[#3674] Re: about ruby 1.1 alpha release — WATANABE Hirofumi <watanabe@...>

[#3675] Re: about ruby 1.1 alpha release — matz@... (Yukihiro Matsumoto)

[#3676] MSVC compile error — toyofuku@...

[#3677] MSVC compile error — toyofuku@...

[#3686] Re: MSVC compile error — toyofuku@...

[#3689] [BUG] inspect — keiju@... (Keiju ISHITSUKA)

[#3690] new sync.rb release — keiju@... (Keiju ISHITSUKA)

[#3691] [BUG?] accessor += — keiju@... (Keiju ISHITSUKA)

[#3693] ftplib.rb revision 1.4 — shugo@... (前田 修吾 / maeda shugo)

[#3694] [request] main thread — keiju@... (Keiju ISHITSUKA)

[#3710] Re: MSVC compile error — toyofuku@...

[#3714] ruby 1.0-970819 released — matz@... (Yukihiro Matsumoto)

[#3715] may i make a ruby.rpm? — Shoichi OZAWA <ozawa@...>

[#3736] module for GNU Readline Library — shugo@... (前田 修吾 / maeda shugo)

[#3738] [BUG] a[0] += 1 (ruby-1.0-970820) — WATANABE Hirofumi <watanabe@...>

[#3749] regex? (ruby-1.0-970820) — jkuro@... (Jun Kuroda)

[#3754] Bus Error (ruby-1.0-970820) — Noritsugu Nakamura <nnakamur@...>

[#3769] link image for ruby — shugo@... (前田 修吾 / maeda shugo)

[#3773] PostgreSQL module is released. — Eiji-usagi-MATSUmoto <ematsu@...>

[#3775] type in 1.1 — Shin-ichiro HARA <sinara@...>

[#3781] Re: type in 1.1 — Shin-ichiro Hara <sinara@...>

[#3785] rbdj0821.zip, rbgw0821.zip — WATANABE Hirofumi <watanabe@...>

[#3786] [Q] How to open — Shin-ichiro Hara <sinara@...>

[#3791] ruby-mode auto-indent problem — Eiji-usagi-MATSUmoto <ematsu@...>

[#3811] RUBY on NeXT — SHIROYAMA Takayuki <psi@...>

[#3812] SyslogSendmail class — takagi@... (TAKAGI Hiromitsu)

[#3819] multi-dimensional array — aito@...5sun.yz.yamagata-u.ac.jp

[#3828] extended math module 0.1 — aito@...5sun.yz.yamagata-u.ac.jp

[#3829] [BUG] Bus Error(ruby - version 1.0-970821) — Yoshiyuki Kusano <kusano@...>

[#3833] [Bug] Regexp.quote — shugo@... (前田 修吾 / maeda shugo)

[#3834] [Bug] Readline::HISTORY — shugo@... (前田 修吾 / maeda shugo)

[#3835] sync.rb — shugo@... (前田 修吾 / maeda shugo)

[#3839] Re: SyslogSendmail class — takagi@... (TAKAGI Hiromitsu)

[#3868] call for impression — matz@... (Yukihiro Matsumoto)

[#3869] Re: SyslogSendmail class — takagi@... (TAKAGI Hiromitsu)

[#3872] Re: SyslogSendmail class — takagi@... (TAKAGI Hiromitsu)

[#3875] not existing strcasecmp system — Noritsugu Nakamura <nnakamur@...>

[#3877] HELP — "MOURI Akihito" <u0671060@...>

[#3892] manual html by lynx — Kikutani Makoto <kikutani@...>

[#3901] class variable — toyofuku@...

[#3906] document for beginner — toyofuku@...

[#3918] subscribe — dai@... (Daisuke Yamazaki)

[#3923] class variable — toyofuku@...

[#3929] Re: class variable — toyofuku@...

[#3933] Re: ruby constants — toyofuku@...

[#3936] Re: document for beginner — toyofuku@...

[#3951] Re: document for beginner — toyofuku@...

[#3958] Re: document for beginner — Jun Kuroda <jkuro@...>

[#3962] Re: class variable — toyofuku@...

[#3965] Re: document for beginner — Shin-ichiro HARA <sinara@...>

[#3966] Reminder: ruby seminar 9/13 — Takaaki Higuchi - Marketing <thiguchi@...>

[#3967] Re: Reminder: ruby seminar 9/13 — takagi@... (TAKAGI Hiromitsu)

[#3977] Texinfo file of ruby uguide — Noritsugu Nakamura <nnakamur@...>

[#3983] Re: SyslogSendmail class — takagi@... (TAKAGI Hiromitsu)

[#3988] Subscribe — Masaaki Tsuzuki <tsuzuki@...>

[#3693] ftplib.rb revision 1.4 — shugo@... (前田修吾 / maeda shugo)

[#3736] module for GNU Readline Library — shugo@... (前田修吾 / maeda shugo)

[#3769] link image for ruby — shugo@... (前田修吾 / maeda shugo)

[#3833] [Bug] Regexp.quote — shugo@... (前田修吾 / maeda shugo)

[#3834] [Bug] Readline::HISTORY — shugo@... (前田修吾 / maeda shugo)

[#3835] sync.rb — shugo@... (前田修吾 / maeda shugo)