summaryrefslogtreecommitdiff
path: root/data
diff options
context:
space:
mode:
authorNathanael Sensfelder <SpamShield0@MultiAgentSystems.org>2020-09-15 19:11:20 +0200
committerNathanael Sensfelder <SpamShield0@MultiAgentSystems.org>2020-09-15 19:11:20 +0200
commit2252812f48a5792aeeed2956dc54313a830b697e (patch)
treeeaf19c951c130e09b0538c186c7c3d48c58e35e0 /data
parent31d35f5781ab731f4713b943e99bf58f2f413a0f (diff)
Completes the reference -> computation for computations.
I made that without much testing, so I suspect issues will show up.
Diffstat (limited to 'data')
-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)