summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to 'data/tests/extra_functionals.fate')
-rw-r--r--data/tests/extra_functionals.fate14
1 files changed, 7 insertions, 7 deletions
diff --git a/data/tests/extra_functionals.fate b/data/tests/extra_functionals.fate
index 9fcb171..de44c6f 100644
--- a/data/tests/extra_functionals.fate
+++ b/data/tests/extra_functionals.fate
@@ -24,7 +24,7 @@
(if_else (< (var s.i) 10)
(eval
update_test_struct
- (set_fields s
+ (set_fields (var s)
(i (+ (var s.i) 1))
(j (+ (var s.j) 10))
)
@@ -52,25 +52,25 @@
(add! (var i) int_list_c)
)
-(set int_list_b (shuffle int_list_a))
+(set int_list_b (shuffle (var int_list_a)))
(shuffle! int_list_c)
(set int_list_c (var int_list_a))
-(remove_one! 6 int_list_a)
+(remove_one! 6 (var int_list_a))
-(= (var int_list_a) (remove_one 6 int_list_c))
+(= (var int_list_a) (remove_one 6 (var int_list_c)))
(set int_list_b (var int_list_a))
(remove_all! 3 int_list_a)
-(= (var int_list_a) (remove_all 3 int_list_b))
+(= (var int_list_a) (remove_all 3 (var int_list_b)))
(set int_list_c (var int_list_a))
(remove_at! 4 int_list_a)
-(= (var int_list_a) (remove_at 4 int_list_c))
+(= (var int_list_a) (remove_at 4 (var int_list_c)))
(set int_list_c (range 0 20 2))
(set int_list_a (var int_list_c))
(reverse! int_list_a)
-;;(set int_list_b (reverse (range 0 50 5)))
+(set int_list_b (reverse (range 0 50 5)))
(end)