summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNathanael Sensfelder <SpamShield0@MultiAgentSystems.org>2021-09-04 22:26:09 +0200
committerNathanael Sensfelder <SpamShield0@MultiAgentSystems.org>2021-09-04 22:26:09 +0200
commit050e329f2a2e2367c2e4f1965190b0f6a5addf29 (patch)
treeb6bf78443e11abda7c41375ee89831bbe0032edb /data/unit-testing/add_elements_of.fate
parent235dc12bf63220371f2ef4defb1f563830e6719a (diff)
The blackjack example works again.parser_rework
Diffstat (limited to 'data/unit-testing/add_elements_of.fate')
-rw-r--r--data/unit-testing/add_elements_of.fate32
1 files changed, 16 insertions, 16 deletions
diff --git a/data/unit-testing/add_elements_of.fate b/data/unit-testing/add_elements_of.fate
index fb47a38..190929a 100644
--- a/data/unit-testing/add_elements_of.fate
+++ b/data/unit-testing/add_elements_of.fate
@@ -8,18 +8,18 @@
(global (list int) li1)
(set! li0
- (add_all (range 8 10 1)
- (add_all (range 4 7 1)
- (add_all (range 0 3 1)
+ (list:add_all (list:range 8 10 1)
+ (list:add_all (list:range 4 7 1)
+ (list:add_all (list:range 0 3 1)
(default (list int))
)
)
)
)
-(add_all! (range 0 3 1) li1)
-(add_all! (range 4 7 1) (at (ptr li1)))
-(add_all! (range 8 10 1) li1)
+(list:add_all! (list:range 0 3 1) li1)
+(list:add_all! (list:range 4 7 1) (at (ptr li1)))
+(list:add_all! (list:range 8 10 1) li1)
(assert! (= (var li0) (var li1)) [FAILED] (var test_name) equality.)
@@ -32,17 +32,17 @@
(assert! (= (var li0.6) (var li1.6) 6) [FAILED] (var test_name) at 6: (var li0.6), (var li1.6).)
(assert! (= (var li0.7) (var li1.7) 7) [FAILED] (var test_name) at 7: (var li0.7), (var li1.7).)
-(add_all! (range 11 20 1) li0)
-(add_all! (range 11 20 1) li1)
+(list:add_all! (list:range 11 20 1) li0)
+(list:add_all! (list:range 11 20 1) li1)
(global (set int) si0)
(global (set int) si1)
(set! si0
- (add_all (range 0 10 2)
- (add_all (range 11 20 2)
- (add_all (range 1 10 2)
- (add_all (range 12 20 2)
+ (set:add_all (list:range 0 10 2)
+ (set:add_all (list:range 11 20 2)
+ (set:add_all (list:range 1 10 2)
+ (set:add_all (list:range 12 20 2)
(default (set int))
)
)
@@ -50,10 +50,10 @@
)
)
-(add_all! (range 0 10 2) si1)
-(add_all! (range 11 20 2) (at (ptr si1)))
-(add_all! (range 1 10 2) si1)
-(add_all! (range 12 20 2) si1)
+(set:add_all! (list:range 0 10 2) si1)
+(set:add_all! (list:range 11 20 2) (at (ptr si1)))
+(set:add_all! (list:range 1 10 2) si1)
+(set:add_all! (list:range 12 20 2) si1)
(assert! (= (var li0) (var li1) (var si0) (var si1)) [FAILED] (var test_name) equality 2.)