From 1e760c0be3ed35874204114e7454509f740c0fe2 Mon Sep 17 00:00:00 2001
From: shyouhei <shyouhei@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Wed, 22 Aug 2007 01:53:51 +0000
Subject: add tag v1_8_6_71

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/tags/v1_8_5_71@13189 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ruby_1_8_6/test/optparse/test_reqarg.rb | 63 +++++++++++++++++++++++++++++++++
 1 file changed, 63 insertions(+)
 create mode 100644 ruby_1_8_6/test/optparse/test_reqarg.rb

(limited to 'ruby_1_8_6/test/optparse/test_reqarg.rb')

diff --git a/ruby_1_8_6/test/optparse/test_reqarg.rb b/ruby_1_8_6/test/optparse/test_reqarg.rb
new file mode 100644
index 0000000000..0999e5e603
--- /dev/null
+++ b/ruby_1_8_6/test/optparse/test_reqarg.rb
@@ -0,0 +1,63 @@
+require 'test_optparse'
+
+module TestOptionParser::ReqArg
+  class Def1 < TestOptionParser
+    include ReqArg
+    def setup
+      super
+      @opt.def_option("-xVAL") {|x| @flag = x}
+      @opt.def_option("--option=VAL") {|x| @flag = x}
+    end
+  end
+  class Def2 < TestOptionParser
+    include ReqArg
+    def setup
+      super
+      @opt.def_option("-x", "--option=VAL") {|x| @flag = x}
+    end
+  end
+  class Def3 < TestOptionParser
+    include ReqArg
+    def setup
+      super
+      @opt.def_option("--option=VAL", "-x") {|x| @flag = x}
+    end
+  end
+  class Def4 < TestOptionParser
+    include ReqArg
+    def setup
+      super
+      @opt.def_option("-xVAL", "--option=VAL") {|x| @flag = x}
+    end
+  end
+
+  def test_short
+    assert_raises(OptionParser::MissingArgument) {@opt.parse!(%w"-x")}
+    assert_equal(%w"", no_error {@opt.parse!(%w"-x foo")})
+    assert_equal("foo", @flag)
+    assert_equal(%w"", no_error {@opt.parse!(%w"-xbar")})
+    assert_equal("bar", @flag)
+    assert_equal(%w"", no_error {@opt.parse!(%w"-x=")})
+    assert_equal("=", @flag)
+  end
+
+  def test_abbrev
+    assert_raises(OptionParser::MissingArgument) {@opt.parse!(%w"-o")}
+    assert_equal(%w"", no_error {@opt.parse!(%w"-o foo")})
+    assert_equal("foo", @flag)
+    assert_equal(%w"", no_error {@opt.parse!(%w"-obar")})
+    assert_equal("bar", @flag)
+    assert_equal(%w"", no_error {@opt.parse!(%w"-o=")})
+    assert_equal("=", @flag)
+  end
+
+  def test_long
+    assert_raises(OptionParser::MissingArgument) {@opt.parse!(%w"--opt")}
+    assert_equal(%w"", no_error {@opt.parse!(%w"--opt foo")})
+    assert_equal("foo", @flag)
+    assert_equal(%w"foo", no_error {@opt.parse!(%w"--opt= foo")})
+    assert_equal("", @flag)
+    assert_equal(%w"", no_error {@opt.parse!(%w"--opt=foo")})
+    assert_equal("foo", @flag)
+  end
+end
-- 
cgit v1.2.3