From 2252812f48a5792aeeed2956dc54313a830b697e Mon Sep 17 00:00:00 2001
From: Nathanael Sensfelder <SpamShield0@MultiAgentSystems.org>
Date: Tue, 15 Sep 2020 19:11:20 +0200
Subject: Completes the reference -> computation for computations.

I made that without much testing, so I suspect issues will show up.
---
 data/tests/extra_functionals.fate | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

(limited to 'data')

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)
-- 
cgit v1.2.3-70-g09d2