facets 2.1.2 → 2.1.3
This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
- data/lib/core/facets.rb +1 -1
- data/lib/core/facets/conversion.rb +6 -1
- data/lib/core/facets/enumerable/collate.rb +13 -24
- data/lib/core/facets/{main.rb → facets.rb} +0 -0
- data/lib/methods/facets/facets/require_core.rb +1 -1
- data/lib/more/facets/advice.rb +28 -1
- data/lib/more/facets/aop.rb +2 -9
- data/log/history.rd +5 -0
- data/meta/MANIFEST +2 -4
- data/meta/{rollrc → ROLLRC} +1 -1
- data/task/release +1 -3
- data/task/test/general +2 -2
- data/task/test/loadtest +1 -1
- data/test/unit/enumerable/test_collate.rb +46 -50
- data/test/unit/test_advice.rb +2 -0
- data/test/unit/test_annotations.rb +2 -0
- data/test/unit/test_arguments.rb +45 -61
- data/test/unit/test_association.rb +1 -7
- data/test/unit/test_attributes.rb +1 -7
- data/test/unit/test_autoarray.rb +1 -8
- data/test/unit/test_basicobject.rb +40 -56
- data/test/unit/test_bbcode.rb +14 -30
- data/test/unit/test_binreadable.rb +35 -51
- data/test/unit/test_boolean.rb +64 -80
- data/test/unit/test_buildable.rb +26 -41
- data/test/unit/test_buildingblock.rb +24 -39
- data/test/unit/test_bytes.rb +50 -66
- data/test/unit/test_class_extension.rb +43 -59
- data/test/unit/test_classmethods.rb +42 -58
- data/test/unit/test_compare_on.rb +40 -54
- data/test/unit/test_conversion.rb +143 -159
- data/test/unit/test_coroutine.rb +31 -47
- data/test/unit/test_crypt.rb +2 -11
- data/test/unit/test_curry.rb +19 -35
- data/test/unit/test_cut.rb +14 -30
- data/test/unit/test_date.rb +31 -47
- data/test/unit/test_dependency.rb +49 -64
- data/test/unit/test_dictionary.rb +1 -7
- data/test/unit/test_elementor.rb +45 -61
- data/test/unit/test_enumerablepass.rb +57 -73
- data/test/unit/test_functor.rb +21 -34
- data/test/unit/test_getoptlong.rb +17 -33
- data/test/unit/test_infinity.rb +1 -7
- data/test/unit/test_inheritor.rb +1 -7
- data/test/unit/test_instantiable.rb +14 -30
- data/test/unit/test_instantise.rb +20 -36
- data/test/unit/test_interface.rb +58 -65
- data/test/unit/test_interval.rb +1 -7
- data/test/unit/test_let.rb +11 -25
- data/test/unit/test_linkedlist.rb +38 -52
- data/test/unit/test_lrucache.rb +6 -22
- data/test/unit/test_mapsend.rb +12 -28
- data/test/unit/test_memoize.rb +17 -32
- data/test/unit/test_multipliers.rb +72 -87
- data/test/unit/test_namespace.rb +35 -51
- data/test/unit/test_opencascade.rb +47 -63
- data/test/unit/test_openobject.rb +94 -110
- data/test/unit/test_ostruct.rb +1 -7
- data/test/unit/test_overload.rb +1 -6
- data/test/unit/test_paramix.rb +1 -7
- data/test/unit/test_pp_s.rb +1 -7
- data/test/unit/test_prototype.rb +1 -6
- data/test/unit/test_recorder.rb +22 -37
- data/test/unit/test_snapshot.rb +2 -14
- data/test/unit/test_stylize.rb +113 -127
- data/test/unit/test_syncarray.rb +2 -15
- data/test/unit/test_synchash.rb +16 -28
- data/test/unit/test_timer.rb +2 -14
- data/test/unit/test_times.rb +64 -80
- data/test/unit/test_tuple.rb +40 -56
- data/test/unit/test_typecast.rb +29 -40
- data/test/unit/test_uninheritable.rb +30 -42
- metadata +4 -8
- data/test/lib/rq.rb +0 -15
data/test/unit/test_elementor.rb
CHANGED
@@ -1,75 +1,59 @@
|
|
1
|
-
|
2
|
-
# |_ _|__ ___| |_
|
3
|
-
# | |/ _ \/ __| __|
|
4
|
-
# | | __/\__ \ |
|
5
|
-
# |_|\___||___/\__|
|
6
|
-
#
|
7
|
-
# for lib/facets/elementor.rb
|
8
|
-
#
|
9
|
-
# Extracted Mon Sep 03 16:23:07 -0700 2007
|
10
|
-
# w/ Test Extraction Ratchet
|
11
|
-
#
|
1
|
+
# Test facets/elementor.rb
|
12
2
|
|
13
|
-
|
3
|
+
require 'facets/elementor.rb'
|
4
|
+
require 'test/unit'
|
14
5
|
|
6
|
+
class TCElementor < Test::Unit::TestCase
|
15
7
|
|
8
|
+
def test_to_elem
|
9
|
+
e = [1,2,3].to_elem
|
10
|
+
assert_equal( [4,5,6], e + 3 )
|
11
|
+
assert_equal( [0,1,2], e - 1 )
|
12
|
+
end
|
16
13
|
|
17
|
-
|
18
|
-
|
19
|
-
|
20
|
-
|
21
|
-
def test_to_elem
|
22
|
-
e = [1,2,3].to_elem
|
23
|
-
assert_equal( [4,5,6], e + 3 )
|
24
|
-
assert_equal( [0,1,2], e - 1 )
|
25
|
-
end
|
26
|
-
|
27
|
-
def test_to_elem_str
|
28
|
-
e = [1,2,3].to_elem
|
29
|
-
assert_equal( ['1','2','3'], e.to_s )
|
30
|
-
end
|
31
|
-
|
32
|
-
def test_every
|
33
|
-
a = [1,2,3]
|
34
|
-
assert_equal( [4,5,6], a.every + 3 )
|
35
|
-
assert_equal( [0,1,2], a.every - 1 )
|
36
|
-
assert_equal( ['1','2','3'], a.every.to_s )
|
37
|
-
end
|
38
|
-
|
39
|
-
def test_every!
|
40
|
-
a = [1,2,3]
|
41
|
-
a.every! + 3
|
42
|
-
assert_equal( [4,5,6], a )
|
43
|
-
end
|
14
|
+
def test_to_elem_str
|
15
|
+
e = [1,2,3].to_elem
|
16
|
+
assert_equal( ['1','2','3'], e.to_s )
|
17
|
+
end
|
44
18
|
|
45
|
-
|
46
|
-
|
47
|
-
|
48
|
-
|
49
|
-
|
19
|
+
def test_every
|
20
|
+
a = [1,2,3]
|
21
|
+
assert_equal( [4,5,6], a.every + 3 )
|
22
|
+
assert_equal( [0,1,2], a.every - 1 )
|
23
|
+
assert_equal( ['1','2','3'], a.every.to_s )
|
24
|
+
end
|
50
25
|
|
26
|
+
def test_every!
|
27
|
+
a = [1,2,3]
|
28
|
+
a.every! + 3
|
29
|
+
assert_equal( [4,5,6], a )
|
51
30
|
end
|
52
31
|
|
53
|
-
|
32
|
+
def test_to_enum_every
|
33
|
+
e = [1,2,3].to_enum(:map)
|
34
|
+
w = e.every + 3
|
35
|
+
assert_equal( [4,5,6], w )
|
36
|
+
end
|
54
37
|
|
55
|
-
|
56
|
-
a = [1,2,3]
|
57
|
-
b = [4,5]
|
58
|
-
assert_equal( [4,5,6], a.elementwise + 3 )
|
59
|
-
assert_equal( [5,7], a.elementwise + b )
|
60
|
-
assert_equal( [[5,7],[3,4,5]], a.elementwise.+(b,2) )
|
61
|
-
assert_equal( [[5,7],[4,5,6]], a.elementwise.+(b,3) )
|
62
|
-
end
|
38
|
+
end
|
63
39
|
|
64
|
-
|
65
|
-
a = [1,2,3]
|
66
|
-
assert_equal( [4,5,6], a.ewise + 3 )
|
67
|
-
assert_equal( [5,7], a.ewise + [4,5] )
|
68
|
-
assert_equal( [[5,7],[3,4,5]], a.ewise.+([4,5],2) )
|
69
|
-
assert_equal( [[5,7],[4,5,6]], a.ewise.+([4,5],3) )
|
70
|
-
end
|
40
|
+
class TestElementWise < Test::Unit::TestCase
|
71
41
|
|
42
|
+
def test_elementwise
|
43
|
+
a = [1,2,3]
|
44
|
+
b = [4,5]
|
45
|
+
assert_equal( [4,5,6], a.elementwise + 3 )
|
46
|
+
assert_equal( [5,7], a.elementwise + b )
|
47
|
+
assert_equal( [[5,7],[3,4,5]], a.elementwise.+(b,2) )
|
48
|
+
assert_equal( [[5,7],[4,5,6]], a.elementwise.+(b,3) )
|
72
49
|
end
|
73
50
|
|
51
|
+
def test_ewise
|
52
|
+
a = [1,2,3]
|
53
|
+
assert_equal( [4,5,6], a.ewise + 3 )
|
54
|
+
assert_equal( [5,7], a.ewise + [4,5] )
|
55
|
+
assert_equal( [[5,7],[3,4,5]], a.ewise.+([4,5],2) )
|
56
|
+
assert_equal( [[5,7],[4,5,6]], a.ewise.+([4,5],3) )
|
57
|
+
end
|
74
58
|
|
75
|
-
|
59
|
+
end
|
@@ -1,88 +1,72 @@
|
|
1
|
-
|
2
|
-
# |_ _|__ ___| |_
|
3
|
-
# | |/ _ \/ __| __|
|
4
|
-
# | | __/\__ \ |
|
5
|
-
# |_|\___||___/\__|
|
6
|
-
#
|
7
|
-
# for lib/facets/enumerablepass.rb
|
8
|
-
#
|
9
|
-
# Extracted Mon Sep 03 16:23:07 -0700 2007
|
10
|
-
# w/ Test Extraction Ratchet
|
11
|
-
#
|
1
|
+
# Test lib/facets/enumerablepass.rb
|
12
2
|
|
13
|
-
|
3
|
+
require 'facets/enumerablepass.rb'
|
4
|
+
require 'test/unit'
|
14
5
|
|
6
|
+
# fixture
|
15
7
|
|
16
|
-
|
17
|
-
|
18
|
-
|
19
|
-
|
20
|
-
|
21
|
-
class PlusArray
|
22
|
-
include EnumerablePass
|
23
|
-
def initialize(arr)
|
24
|
-
@arr = arr
|
25
|
-
end
|
26
|
-
def each(n=0)
|
27
|
-
@arr.each{ |e| yield(e+n) }
|
28
|
-
end
|
8
|
+
class PlusArray
|
9
|
+
include EnumerablePass
|
10
|
+
def initialize(arr)
|
11
|
+
@arr = arr
|
29
12
|
end
|
13
|
+
def each(n=0)
|
14
|
+
@arr.each{ |e| yield(e+n) }
|
15
|
+
end
|
16
|
+
end
|
30
17
|
|
31
|
-
|
32
|
-
|
33
|
-
def test_collect
|
34
|
-
t = PlusArray.new([1,2,3])
|
35
|
-
assert_equal( [5,6,7], t.collect(4){ |e| e } )
|
36
|
-
end
|
37
|
-
|
38
|
-
#def test_each_slice
|
39
|
-
# t = PlusArray.new([1,2,3,4])
|
40
|
-
# a = []
|
41
|
-
# t.each_slice(2,4){ |e,f| a << [e,f] }
|
42
|
-
# assert_equal( [[5,6],[7,8]], a )
|
43
|
-
#end
|
44
|
-
|
45
|
-
#def test_find
|
46
|
-
# t = PlusArray.new([1,2,3,4])
|
47
|
-
# f = t.find(2, :ifnone=>lambda{:NOPE}) { |a| a == 10 }
|
48
|
-
# assert_equal(:NOPE, f)
|
49
|
-
#end
|
50
|
-
|
51
|
-
def test_grep
|
52
|
-
# TODO
|
53
|
-
end
|
54
|
-
|
55
|
-
def test_to_a
|
56
|
-
t = PlusArray.new([1,2,3])
|
57
|
-
assert_equal( [5,6,7], t.to_a(4) )
|
58
|
-
end
|
18
|
+
class TC_Enumerable < Test::Unit::TestCase
|
59
19
|
|
60
|
-
|
61
|
-
|
62
|
-
|
63
|
-
|
20
|
+
def test_collect
|
21
|
+
t = PlusArray.new([1,2,3])
|
22
|
+
assert_equal( [5,6,7], t.collect(4){ |e| e } )
|
23
|
+
end
|
64
24
|
|
65
|
-
|
66
|
-
|
67
|
-
|
68
|
-
|
25
|
+
#def test_each_slice
|
26
|
+
# t = PlusArray.new([1,2,3,4])
|
27
|
+
# a = []
|
28
|
+
# t.each_slice(2,4){ |e,f| a << [e,f] }
|
29
|
+
# assert_equal( [[5,6],[7,8]], a )
|
30
|
+
#end
|
31
|
+
|
32
|
+
#def test_find
|
33
|
+
# t = PlusArray.new([1,2,3,4])
|
34
|
+
# f = t.find(2, :ifnone=>lambda{:NOPE}) { |a| a == 10 }
|
35
|
+
# assert_equal(:NOPE, f)
|
36
|
+
#end
|
37
|
+
|
38
|
+
def test_grep
|
39
|
+
# TODO
|
40
|
+
end
|
69
41
|
|
70
|
-
|
71
|
-
|
72
|
-
|
73
|
-
|
42
|
+
def test_to_a
|
43
|
+
t = PlusArray.new([1,2,3])
|
44
|
+
assert_equal( [5,6,7], t.to_a(4) )
|
45
|
+
end
|
74
46
|
|
75
|
-
|
76
|
-
|
77
|
-
|
78
|
-
|
47
|
+
def test_min
|
48
|
+
t = PlusArray.new([1,2,3])
|
49
|
+
assert_equal( 5, t.min(4) )
|
50
|
+
end
|
79
51
|
|
80
|
-
|
81
|
-
|
82
|
-
|
83
|
-
|
52
|
+
def test_max
|
53
|
+
t = PlusArray.new([1,2,3])
|
54
|
+
assert_equal( 7, t.max(4) )
|
55
|
+
end
|
84
56
|
|
57
|
+
def test_include?
|
58
|
+
t = PlusArray.new([1,2,3])
|
59
|
+
assert( t.include?(7,4) )
|
85
60
|
end
|
86
61
|
|
62
|
+
def test_select
|
63
|
+
t = PlusArray.new([1,2,3])
|
64
|
+
assert_equal( [6], t.select(4){ |x| x == 6 } )
|
65
|
+
end
|
87
66
|
|
67
|
+
def test_reject
|
68
|
+
t = PlusArray.new([1,2,3])
|
69
|
+
assert_equal( [5,7], t.reject(4){ |x| x == 6 } )
|
70
|
+
end
|
88
71
|
|
72
|
+
end
|
data/test/unit/test_functor.rb
CHANGED
@@ -1,39 +1,26 @@
|
|
1
|
-
|
2
|
-
# |_ _|__ ___| |_
|
3
|
-
# | |/ _ \/ __| __|
|
4
|
-
# | | __/\__ \ |
|
5
|
-
# |_|\___||___/\__|
|
6
|
-
#
|
7
|
-
# for lib/facets/functor.rb
|
8
|
-
#
|
9
|
-
# Extracted Mon Sep 03 16:23:07 -0700 2007
|
10
|
-
# w/ Test Extraction Ratchet
|
11
|
-
#
|
1
|
+
# Test lib/facets/functor.rb
|
12
2
|
|
13
|
-
|
3
|
+
require 'facets/functor.rb'
|
4
|
+
require 'test/unit'
|
14
5
|
|
6
|
+
class TC_Functor < Test::Unit::TestCase
|
15
7
|
|
8
|
+
def test_function
|
9
|
+
f = Functor.new { |op, x| x.send(op, x) }
|
10
|
+
assert_equal( 2, f + 1 ) #=> 2
|
11
|
+
assert_equal( 4, f + 2 ) #=> 4
|
12
|
+
assert_equal( 6, f + 3 ) #=> 6
|
13
|
+
assert_equal( 1, f * 1 ) #=> 1
|
14
|
+
assert_equal( 4, f * 2 ) #=> 4
|
15
|
+
assert_equal( 9, f * 3 ) #=> 9
|
16
|
+
end
|
16
17
|
|
17
|
-
|
18
|
-
|
19
|
-
|
20
|
-
|
21
|
-
|
22
|
-
|
23
|
-
assert_equal( 2, f + 1 ) #=> 2
|
24
|
-
assert_equal( 4, f + 2 ) #=> 4
|
25
|
-
assert_equal( 6, f + 3 ) #=> 6
|
26
|
-
assert_equal( 1, f * 1 ) #=> 1
|
27
|
-
assert_equal( 4, f * 2 ) #=> 4
|
28
|
-
assert_equal( 9, f * 3 ) #=> 9
|
29
|
-
end
|
30
|
-
|
31
|
-
def test_decoration
|
32
|
-
a = 'A'
|
33
|
-
f = Functor.new{ |op, x| x.send(op, a + x) }
|
34
|
-
assert_equal( 'BAB', f + 'B' )
|
35
|
-
assert_equal( 'CAC', f + 'C' )
|
36
|
-
assert_equal( 'DAD', f + 'D' )
|
37
|
-
end
|
38
|
-
|
18
|
+
def test_decoration
|
19
|
+
a = 'A'
|
20
|
+
f = Functor.new{ |op, x| x.send(op, a + x) }
|
21
|
+
assert_equal( 'BAB', f + 'B' )
|
22
|
+
assert_equal( 'CAC', f + 'C' )
|
23
|
+
assert_equal( 'DAD', f + 'D' )
|
39
24
|
end
|
25
|
+
|
26
|
+
end
|
@@ -1,41 +1,25 @@
|
|
1
|
-
|
2
|
-
# |_ _|__ ___| |_
|
3
|
-
# | |/ _ \/ __| __|
|
4
|
-
# | | __/\__ \ |
|
5
|
-
# |_|\___||___/\__|
|
6
|
-
#
|
7
|
-
# for lib/facets/getoptlong.rb
|
8
|
-
#
|
9
|
-
# Extracted Mon Sep 03 16:23:08 -0700 2007
|
10
|
-
# w/ Test Extraction Ratchet
|
11
|
-
#
|
1
|
+
# Test facets/getoptlong.rb
|
12
2
|
|
13
|
-
|
3
|
+
require 'facets/getoptlong.rb'
|
4
|
+
require 'test/unit'
|
14
5
|
|
6
|
+
class TestGetoptShort < Test::Unit::TestCase
|
15
7
|
|
8
|
+
def test_dsl
|
9
|
+
ARGV.replace(['foo', '--expect', 'A', '-h', 'nothing'])
|
16
10
|
|
17
|
-
|
18
|
-
|
19
|
-
|
20
|
-
|
21
|
-
def test_dsl
|
22
|
-
ARGV.replace(['foo', '--expect', 'A', '-h', 'nothing'])
|
23
|
-
|
24
|
-
opts = GetoptLong.new do
|
25
|
-
reqs '--expect', '-x'
|
26
|
-
flag '--help', '-h'
|
27
|
-
end
|
28
|
-
|
29
|
-
ch = {}
|
30
|
-
opts.each { |opt, arg|
|
31
|
-
ch[opt] = arg
|
32
|
-
}
|
33
|
-
|
34
|
-
assert_equal( 'A', ch['--expect'] )
|
35
|
-
assert_equal( '', ch['--help'] )
|
11
|
+
opts = GetoptLong.new do
|
12
|
+
reqs '--expect', '-x'
|
13
|
+
flag '--help', '-h'
|
36
14
|
end
|
37
15
|
|
38
|
-
|
39
|
-
|
16
|
+
ch = {}
|
17
|
+
opts.each { |opt, arg|
|
18
|
+
ch[opt] = arg
|
19
|
+
}
|
40
20
|
|
21
|
+
assert_equal( 'A', ch['--expect'] )
|
22
|
+
assert_equal( '', ch['--help'] )
|
23
|
+
end
|
41
24
|
|
25
|
+
end
|
data/test/unit/test_infinity.rb
CHANGED
data/test/unit/test_inheritor.rb
CHANGED
@@ -1,39 +1,23 @@
|
|
1
|
-
|
2
|
-
# |_ _|__ ___| |_
|
3
|
-
# | |/ _ \/ __| __|
|
4
|
-
# | | __/\__ \ |
|
5
|
-
# |_|\___||___/\__|
|
6
|
-
#
|
7
|
-
# for lib/facets/instantiable.rb
|
8
|
-
#
|
9
|
-
# Extracted Mon Sep 03 16:23:07 -0700 2007
|
10
|
-
# w/ Test Extraction Ratchet
|
11
|
-
#
|
1
|
+
# Test lib/facets/instantiable.rb
|
12
2
|
|
13
|
-
|
3
|
+
require 'facets/instantiable.rb'
|
4
|
+
require 'test/unit'
|
14
5
|
|
6
|
+
class TestInstantiable < Test::Unit::TestCase
|
15
7
|
|
8
|
+
module M
|
9
|
+
extend Module::Instantiable
|
16
10
|
|
17
|
-
|
11
|
+
attr :a
|
18
12
|
|
19
|
-
|
20
|
-
|
21
|
-
module M
|
22
|
-
extend Module::Instantiable
|
23
|
-
|
24
|
-
attr :a
|
25
|
-
|
26
|
-
def initialize( a )
|
27
|
-
@a = a
|
28
|
-
end
|
29
|
-
end
|
30
|
-
|
31
|
-
def test_new
|
32
|
-
m = M.new( 1 )
|
33
|
-
assert_equal( 1, m.a )
|
13
|
+
def initialize( a )
|
14
|
+
@a = a
|
34
15
|
end
|
35
|
-
|
36
16
|
end
|
37
17
|
|
18
|
+
def test_new
|
19
|
+
m = M.new( 1 )
|
20
|
+
assert_equal( 1, m.a )
|
21
|
+
end
|
38
22
|
|
39
|
-
|
23
|
+
end
|