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
|
#!../../src/liquidsoap ../../libs/stdlib.liq ../../libs/deprecations.liq
%include "test.liq"
success = ref(true)
def t(x, y)
if x != y then
print("Failure: got #{x} instead of #{y}")
success := false
end
end
def f() =
n = ref(1)
while !n < 10 do
n := !n * 2
end
t(!n, 16)
n = ref(0)
for i = 0 to 10 do
n := !n + i
end
t(!n, 55)
n = ref(0)
for i = list.iterator([0,1,2,3,4,5,6,7,8,9,10]) do
n := !n + i
end
t(!n, 55)
s = ref("")
for i = list.iterator(["a","b","c"]) do
s := !s ^ i
end
t(!s, "abc")
if !success then test.pass() else test.fail() end
end
test.check(f)
|
