blob: e665b695bbeb27d3b794670b66301f44d9858046 (
plain)
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
|
(fate_version 1)
(global (list int) li)
(global (ptr (list int)) li_ptr)
(set! li (range 0 10 1))
(set! li_ptr (ptr li))
(global int i)
(for (set! i 0) (=< i 10) (set! i (+ i 1))
(assert! (= (access i li) (var i))
[FAILED] ACCESS assert failed on (var i) for li.
)
(assert! (= (access i li_ptr) (var i))
[FAILED] ACCESS assert failed on (var i) with for li_ptr.
)
(assert! (= (access i (range 0 10 1)) (var i))
[FAILED] ACCESS assert failed on (var i) with for range.
)
)
[COMPLETED] ACCESS
(end!)
|