ruby-list

石橋秀仁です。

> 友谷です。

> で、assertを組み込むのであればこんなのはどうでしょうか。

ちょっと脱線します。
厳密にはassertではないのですが、次のようなものはどうでしょう？
実行時にエラーの回復をするためのライブラリです。

--
Hideto "rubyholic" ISHIBASHI

Attachments (2)

assert.rb (1.95 KB, text/x-ruby)

module Assert

  class AssertionError < StandardError; end

  def assert(*args, &block)
    return nil unless $DEBUG
    __assert__(*args, &block)
  end

  def __assert__(*args)
    return true if yield == true
    msg = "assertion failed:"
    for arg in args
      msg += " " + arg.inspect
    end
    raise AssertionError, msg
  end

  def recoverable_assert(*args, &block)
    return nil unless $DEBUG
    assert_and_recovery(*args, &block)
  end

  def assert_and_recovery(*args, &block)
    begin
      return true if __assert__(*args, &block)
    rescue
      exception = $!
      STDOUT.print exception, "\n"
      for c in caller(0)
        STDOUT.print c, "\n"
      end
    end
    STDOUT.print "type 'help' to display help message.\n"

    loop do
      input = readline("(recovery:-) ")
      case input
      when /^\s*h(?:elp)?\s*$/
	STDOUT.print <<EOS
help	print this message
fail	raise AssertionError
local	print local variables
retry	retry assertion
...	eval an input string
EOS
      when /^\s*f(?:ail)?\s*$/
	fail exception
      when /^\s*l(?:ocal)?\s*$/
        STDOUT.print "local variables (name : type = value)\n"
	eval(<<-EOE, block)
          for lv in local_variables - ["lv"]
            STDOUT.print " ", lv, "\t: ", lv.type, "\t= ", eval(lv), "\n"
          end
	EOE
      when /^\s*r(?:etry)?\s*$/
        begin
          return true if __assert__(*args, &block)
        rescue
          STDOUT.print $!, "\n"
        end
      else
	begin
          STDOUT.print eval(input, block).inspect, "\n"
	rescue
	  STDOUT.print $!, "\n"
	end
      end
    end
  end

  def readline(prompt)
    STDOUT.print prompt
    STDOUT.flush
    line = STDIN.gets
    line.chomp!
    line
  end
end

if __FILE__ == $0

  include Assert

  orig = "This is a pen."
  pen = orig.dup
  str = pen

  assert("pen == orig ?") {pen == orig}
  str.sub!(/a/, "A")
  recoverable_assert("pen == orig ?") {pen == orig}
  #assert_and_recovery("pen == orig ?") {pen == orig}

  print "recoverd.\n"

end

screenshot.txt (1.5 KB, text/plain)

$ ruby assert.rb 
recoverd.
$ ruby -d assert.rb 
Exception `Assert::AssertionError' at assert.rb:16
assertion failed: "pen == orig ?"
assert.rb:30:in `assert_and_recovery'
assert.rb:21:in `recoverable_assert'
assert.rb:91
type 'help' to display help message.
(recovery:-) help
help	print this message
fail	raise AssertionError
local	print local variables
retry	retry assertion
...	eval an input string
(recovery:-) l
local variables (name : type = value)
 orig	: String	= This is a pen.
 pen	: String	= This is A pen.
 str	: String	= This is A pen.
(recovery:-) r
Exception `Assert::AssertionError' at assert.rb:16
assertion failed: "pen == orig ?"
(recovery:-) pen.sub!(/A/, "a")
"This is a pen."
(recovery:-) l
local variables (name : type = value)
 orig	: String	= This is a pen.
 pen	: String	= This is a pen.
 str	: String	= This is a pen.
(recovery:-) orig
"This is a pen."
(recovery:-) retry
recoverd.
$ ruby -d assert.rb 
Exception `Assert::AssertionError' at assert.rb:16
assertion failed: "pen == orig ?"
assert.rb:30:in `assert_and_recovery'
assert.rb:21:in `recoverable_assert'
assert.rb:91
type 'help' to display help message.
(recovery:-) r
Exception `Assert::AssertionError' at assert.rb:16
assertion failed: "pen == orig ?"
(recovery:-) f
Exception `Assert::AssertionError' at assert.rb:48
assert.rb:48:in `assert_and_recovery': assertion failed: "pen == orig ?" (Assert::AssertionError)
	from assert.rb:37:in `loop'
	from assert.rb:37:in `assert_and_recovery'
	from assert.rb:21:in `recoverable_assert'
	from assert.rb:91
$

Thread

Prev Next

In This Thread

Prev Next

[#21717] patch of `Support for strings represented as a vector of ordinals' — sekita-n@... (Nobutaka SEKITANI)

[#21718] print, puts, printf — Masaki Suketa<CQN02273@...>

[#21730] Project Apollo 5.01 — Kazuhiro Yoshida <moriq.kazuhiro@...>

[#21732] GtkRadioMenuItem activate — mof <mof@...>

[#21736] OBJECTDAY 2000 — 助田 雅紀 <masaki.suketa@...>

[#21738] ruby の W3C ドラフト — KUBO Takehiro <tkubo@...>

[#21745] RubyUnit 'runit/cui/testrunner.rb' patch — Hideto ISHIBASHI <hideto-i@...4u.or.jp>

[#21749] 漢字の文字化けについて — "KAWAUCHI" <kawauchi@...>

[#21752] ruby 1.4.4.deb — akira yamada / やまだあきら <akira@...>

[#21754] — Yoshiaki Oda <oda@...>

[#21759] Q: to_str — Tomoyuki Kosimizu <greentea@...2.so-net.ne.jp>

[#21760] proposal to change uri.rb — Tomoyuki Kosimizu <greentea@...2.so-net.ne.jp>

[#21765] rdindex-1.0.0 — rubikitch <rubikitch@...>

[#21767] [Patch] ftpup: illegal timezone adjustment — "NAKAMURA, Hiroshi" <nakahiro@...>

[#21781] how to get error reason in ftplib ? — "Kikutani, Makoto" <kikutani@...>

[#21785] VB meets Ruby — arton <arton@...>

[#21787] blade again? — "Kikutani, Makoto" <kikutani@...>

[#21789] about ftplib(ftpup) — goto@...

[#21798] script language magazine? — Akihiro Yamauchi <aygoofy@...>

[#21804] blade namazu — Shin-ichiro HARA <sinara@...>

[#21808] tktext.rb BUG — nagai@...

[#21811] Ruby icon competition は？ — Kazuhiro Nishiyama <nishiyama@...1.tiki.ne.jp>

[#21813] にっき — OZAWA Sakuro <crouton@...>

[#21818] RubyToken::TkSTRING::value — Yasushi Shoji <yashi@...>

[#21821] mod_ruby から拡張モジュールがロードできない — Norihito Shinzan (Jun Kabbalah) <kabbalah@...>

[#21822] ruby1.4.3 の cgi.rb でクッキー部分でのバグ — Keisuke Minami <keisuke@...>

[#21823] ruby1.4.3 の cgi.rb でクッキー部分でのバグ — Keisuke Minami <keisuke@...>

[#21826] `require': No such file to load -- tcltklib (LoadError) — "Takuro Suzuki" <etsuzuki@...>

[#21828] Re: proposal to change uri.rb — "ta-ka-si@..." <ta-ka-si@...>

[#21829] CVF: comp.lang.ruby — Yukihiro Matsumoto <matz@...>

[#21834] How can i use mod_ruby — goto@...

[#21837] site_ruby & Linux distribution — OZAWA Sakuro <crouton@...>

[#21838] ループの中での exec の使い方 — Ko Tanikawa <agape@...14.odn.ne.jp>

[#21843] [Q]Security Check($SAFE): FileTest within mod_ruby — Hideto ISHIBASHI <hideto-i@...4u.or.jp>

[#21862] #define const — Toyofuku <toyofuku@...>

[#21870] rubyunit — rubikitch <rubikitch@...>

[#21887] psql.rb の修正 — Saitou Noboru <noborus@...>

[#21891] 誕生日おめでとう〜 — rubikitch <rubikitch@...>

[#21892] ユーザーの新規登録方法について — goto@...

[#21902] Re: #define const — toyofuku@...

[#21905] rd-draft.ja.rd — akira yamada / やまだあきら <akira@...>

[#21907] blade で — 時田幸粋 <ktokita@...>

[#21909] Ruby 1.4.4 — Yukihiro Matsumoto <matz@...>

[#21916] Ruby/Qt and Ruby/KDE — Nobuyuki Horie <horie@...>

[#21918] ANN: ActiveScriptRuby English Page — arton <arton@...>

[#21919] Re: #define const — toyofuku@...

[#21922] ruby-1.4.4 binary for BeOS 5 (Intel) — tenmei@... (Noriaki Harada)

[#21928] SomeError — Masatoshi SEKI <m_seki@...>

[#21931] ruby-mode — Yasushi Abe <yasushi@...>

[#21934] close on disk full — "Kikutani, Makoto" <kikutani@...>

[#21940] Ruby 1.4.4 binaries for Cygwin and DJGPP — WATANABE Hirofumi <Hirofumi.Watanabe@...>

[#21944] [Q] RD with CSS — gotoken@... (GOTO Kentaro)

[#21956] Thread & STDIN — Masato Toyoshima <mt@...>

[#21964] location of ruby-1.4.4.tar.gz — Yasuhiro Fukuma <yasuf@...>

[#21965] Re: [ruby-math:00257] Re: Polynomial.rb and floating point exception — kjana@... (YANAGAWA Kazuhisa)

[#21974] Re: Polynomial.rb and floating point exception — "K.Kodama" <kdm@...>

[#21981] rd2man — WATANABE Hirofumi <eban@...>

[#21990] rb.org — OZAWA Sakuro <crouton@...>

[#21998] Ruby 1.4.4 and Ruby/GTK 0.23 RPM packages for Vine Linux 2.0 (Vine Plus) — Naoki Kawakami <knao@...>

[#21999] media watch 2000.03.18 — Noritsugu Nakamura <nnakamur@...>

[#22005] Any good books for graph library? — Hideto ISHIBASHI <hideto-i@...4u.or.jp>

[#22006] Is there a standard Iterator protocol? — Hideto ISHIBASHI <hideto-i@...4u.or.jp>

[#22014] shell interactive — WATANABE Daisaku <dwata@...3.rim.or.jp>

[#22022] w3ml — とみたまさひろ <tommy@...>

[#22026] assert — "友谷 登" <ntomo@...>

[#22067] [solved] shell interactive — WATANABE Daisaku <dwata@...3.rim.or.jp>

[#22069] Re: #define const — Toyofuku <toyofuku@...>

[#22070] upload ruby-1.4.4 for OS/2 but... — kenn@...

[#22074] Ruby-1.4.3 の make に失敗 — Yasuhide Yano <yasuhi@...>

[#22075] erb-1.2.2 — Masatoshi SEKI <m_seki@...>

[#22082] ruby-1.4.4-i586-beos-socket.zip — Katsuyuki Komatsu <komatsu@...>

[#22085] Linux Conference セミナー「オープンソースのビジネスモデル」 — matz@... (Yukihiro Matsumoto)

[#22087] media watch 2000.03.24 — Noritsugu Nakamura <nnakamur@...>

[#22096] libwrap-ruby — Shugo Maeda <shugo@...>

[#22103] Please put ruby-1.4.4.tar.gz in pub/lang/ruby/1.4/ — "Akinori -Aki- MUSHA" <knu@...>

[#22112] net 1.1.16 — Minero Aoki <aamine@...>

[#22115] デフォルト付き attr_reader — tnaka@...

[#22117] StateGraph: state machine interpreter — Hideto ISHIBASHI <hideto-i@...4u.or.jp>

[#22126] (件名なし) — Toshinori Takata <takata@...>

[#22130] PostgreSQL 拡張モジュールのラージオブジェクトの対応 — Saitou Noboru <noborus@...>

[#21736] OBJECTDAY 2000 — 助田　雅紀 <masaki.suketa@...>

[#22026] assert — "友谷登" <ntomo@...>

[#22211] Web 掲示板 — 堀川　久 <vzw00011@...>