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
|
//############################################################################
// Iterators
//############################################################################
// $Id$
//############################################################################
object Test {
def check_from: Int = {
val it1 = Iterator.from(-1);
val it2 = Iterator.from(0, -1);
it1.next + it2.next
}
def check_range: Int = {
val xs1 = Iterator.range(0, 10, 2) toList;
val xs2 = Iterator.range(0, 10, -2) toList;
val xs3 = Iterator.range(10, 0, -2) toList;
val xs4 = Iterator.range(10, 0, 2) toList;
xs1.length + xs2.length + xs3.length + xs4.length
}
def check_take: Int = {
val it1 = Iterator.from(0);
val xs1 = it1 take 10 toList;
xs1.length
}
def check_drop: Int = {
val it1 = Iterator.from(0);
val it2 = it1 map { x => 2 * x };
val n1 = it1 drop 2 next;
val n2 = it2 drop 2 next;
n1 + n2
}
def check_foreach: Int = {
val it1 = Iterator.from(0) take 20;
var n = 0;
it1 foreach { x => n = n + x }
n
}
def check_forall: Int = {
val it1 = Iterator.from(0);
val it2 = Iterator.from(1);
0
}
def check_success[A](name: String, closure: => A, expected: A): Unit = {
Console.print("test " + name);
try {
val actual: A = closure;
if (actual == expected)
Console.print(" was successful");
else
Console.print(" failed: expected "+ expected +", found "+ actual);
}
catch {
case exception: Throwable => {
Console.print(" raised exception " + exception);
}
}
Console.println;
}
def main(args: Array[String]): Unit = {
check_success("check_from", check_from, -1);
check_success("check_range", check_range, 10);
check_success("check_take", check_take, 10);
check_success("check_drop", check_drop, 12);
check_success("check_foreach", check_foreach, 190);
check_success("check_forall", check_forall, 0);
Console.println;
}
}
//############################################################################
|