| summaryrefslogtreecommitdiff |
diff options
Diffstat (limited to 'data/unit-testing/access.fate')
| -rw-r--r-- | data/unit-testing/access.fate | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/data/unit-testing/access.fate b/data/unit-testing/access.fate index fe92293..e665b69 100644 --- a/data/unit-testing/access.fate +++ b/data/unit-testing/access.fate @@ -3,23 +3,23 @@ (global (list int) li) (global (ptr (list int)) li_ptr) -(set li (range 0 10 1)) -(set li_ptr (ptr li)) +(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)) +(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)) + (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)) + (assert! (= (access i (range 0 10 1)) (var i)) [FAILED] ACCESS assert failed on (var i) with for range. ) ) [COMPLETED] ACCESS -(end) +(end!) |


