2010-02-02 08:58:56 -05:00
|
|
|
require_relative 'test_optparse'
|
2003-11-05 05:09:58 -05:00
|
|
|
|
|
|
|
class TestOptionParser::OptArg < TestOptionParser
|
|
|
|
def setup
|
|
|
|
super
|
|
|
|
@opt.def_option("-x[VAL]") {|x| @flag = x}
|
|
|
|
@opt.def_option("--option[=VAL]") {|x| @flag = x}
|
2012-01-16 02:42:01 -05:00
|
|
|
@opt.def_option("--regexp[=REGEXP]", Regexp) {|x| @reopt = x}
|
|
|
|
@reopt = nil
|
2003-11-05 05:09:58 -05:00
|
|
|
end
|
|
|
|
|
|
|
|
def test_short
|
|
|
|
assert_equal(%w"", no_error {@opt.parse!(%w"-x")})
|
|
|
|
assert_equal(nil, @flag)
|
|
|
|
@flag = false
|
|
|
|
assert_equal(%w"foo", no_error {@opt.parse!(%w"-x foo")})
|
|
|
|
assert_equal(nil, @flag)
|
|
|
|
assert_equal(%w"", no_error {@opt.parse!(%w"-xfoo")})
|
|
|
|
assert_equal("foo", @flag)
|
|
|
|
assert_equal(%w"", no_error {@opt.parse!(%w"-x=")})
|
|
|
|
assert_equal("=", @flag)
|
|
|
|
end
|
|
|
|
|
|
|
|
def test_abbrev
|
|
|
|
assert_equal(%w"", no_error {@opt.parse!(%w"-o")})
|
|
|
|
assert_equal(nil, @flag)
|
|
|
|
@flag = false
|
|
|
|
assert_equal(%w"foo", no_error {@opt.parse!(%w"-o foo")})
|
|
|
|
assert_equal(nil, @flag)
|
|
|
|
assert_equal(%w"", no_error {@opt.parse!(%w"-ofoo")})
|
|
|
|
assert_equal("foo", @flag)
|
|
|
|
assert_equal(%w"", no_error {@opt.parse!(%w"-o=")})
|
|
|
|
assert_equal("=", @flag)
|
|
|
|
end
|
|
|
|
|
|
|
|
def test_long
|
|
|
|
assert_equal(%w"", no_error {@opt.parse!(%w"--opt")})
|
|
|
|
assert_equal(nil, @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)
|
|
|
|
assert_equal(%w"foo", no_error {@opt.parse!(%w"--opt foo")})
|
|
|
|
assert_equal(nil, @flag)
|
|
|
|
end
|
|
|
|
end
|