1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
|
//############################################################################
// Lists
//############################################################################
// $Id$
//############################################################################
import testing.SUnit._
/** Test the Scala implementation of class <code>scala.List</code>.
*
* @author Stephane Micheloud
*/
object Test extends TestConsoleMain {
def suite = new TestSuite(
Test1, //count, exists, filter, ..
Test2, //#468
Test3 //#1691
)
}
object Test1 extends TestCase("ctor") with Assert {
override def enableStackTrace = false
override def runTest {
val xs1 = List(1, 2, 3)
val xs2 = List('a', 'b')
val xs3 = List(List(1, 2), List(4, 5))
val xs4 = List(2, 4, 6, 8)
val xs5 = List(List(3, 4), List(3), List(4, 5))
{
val n1 = xs1 count { e => e % 2 != 0 }
val n2 = xs4 count { e => e < 5 }
assertEquals("check_count", 4, n1 + n2)
}
/* deprecated
{
val ys1 = xs1 diff xs4
val ys2 = xs3 diff xs5
assertEquals("check_diff", 3, ys1.length + ys2.length)
}*/
{
val b1 = xs1 exists { e => e % 2 == 0 }
val b2 = xs4 exists { e => e == 5 }
assertEquals("check_exists", false , b1 & b2)
}
{
val ys1 = xs1 filter { e => e % 2 == 0 }
val ys2 = xs4 filter { e => e < 5 }
assertEquals("check_filter", 3, ys1.length + ys2.length)
}
{
val n1 = xs1.foldLeft(0)((e1, e2) => e1 + e2)
val ys1 = xs4.foldLeft(List[Int]())((e1, e2) => e2 :: e1)
assertEquals("check_foldLeft", 10, n1 + ys1.length)
}
{
val b1 = xs1 forall { e => e < 10}
val b2 = xs4 forall { e => e % 2 == 0 }
assertEquals("check_forall", true, b1 & b2)
}
{
val ys1 = xs1 intersect xs4
val ys2 = xs3 intersect xs5
assertEquals("check_intersect", 2, ys1.length + ys2.length)
}
{
val ys1 = xs1 remove { e => e % 2 != 0 }
val ys2 = xs4 remove { e => e < 5 }
assertEquals("check_remove", 3, ys1.length + ys2.length)
}
{
val ys1 = xs1 union xs4
val ys2 = xs3 union xs5
assertEquals("check_union", 10, ys1.length + ys2.length)
}
{
val ys1 = xs1 zip xs2
val ys2 = xs1 zip xs3
assertEquals("check_zip", 4, ys1.length + ys2.length)
}
{
val ys1 = xs1.zipAll(xs2, 0, '_')
val ys2 = xs2.zipAll(xs1, '_', 0)
val ys3 = xs1.zipAll(xs3, 0, List(-1))
assertEquals("check_zipAll", 9, ys1.length + ys2.length + ys3.length)
}
}
}
object Test2 extends TestCase("t0468") with Assert {
override def enableStackTrace = false
override def runTest {
val xs1 = List(1, 2, 3)
val xs2 = List(0)
val ys1 = xs1 ::: List(4)
assertEquals("check_+", List(1, 2, 3, 4), ys1)
val ys2 = ys1 - 4
assertEquals("check_-", xs1, ys2)
val n2 = (xs1 ++ ys1).length
val n3 = (xs1 ++ Nil).length
val n4 = (xs1 ++ ((new collection.mutable.ArrayBuffer[Int]) + 0)).length
assertEquals("check_++", 14, n2 + n3 + n4)
}
}
object Test3 extends TestCase("t1691") with Assert {
override def enableStackTrace = false
override def runTest {
try {
List.range(1, 10, 0)
} catch {
case e: IllegalArgumentException => ()
case _ => throw new Error("List.range(1, 10, 0)")
}
try {
List.range(1, 10, x => 4)
} catch {
case e: IllegalArgumentException => ()
case _ => throw new Error("List.range(1, 10, x => 4)")
}
assertEquals(List.range(10, 0, x => x - 2),
List(10, 8, 6, 4, 2))
}
}
|