| summaryrefslogtreecommitdiff |
diff options
| author | Nathanael Sensfelder <SpamShield0@MultiAgentSystems.org> | 2021-09-04 22:26:09 +0200 |
|---|---|---|
| committer | Nathanael Sensfelder <SpamShield0@MultiAgentSystems.org> | 2021-09-04 22:26:09 +0200 |
| commit | 050e329f2a2e2367c2e4f1965190b0f6a5addf29 (patch) | |
| tree | b6bf78443e11abda7c41375ee89831bbe0032edb /data/unit-testing/add_element_at.fate | |
| parent | 235dc12bf63220371f2ef4defb1f563830e6719a (diff) | |
The blackjack example works again.parser_rework
Diffstat (limited to 'data/unit-testing/add_element_at.fate')
| -rw-r--r-- | data/unit-testing/add_element_at.fate | 34 |
1 files changed, 17 insertions, 17 deletions
diff --git a/data/unit-testing/add_element_at.fate b/data/unit-testing/add_element_at.fate index a3f73fe..89708eb 100644 --- a/data/unit-testing/add_element_at.fate +++ b/data/unit-testing/add_element_at.fate @@ -7,23 +7,23 @@ (global (list int) li0) (global (list int) li1) -(set! li0 (add_element_at 0 0 li0)) -(set! li0 (add_element_at 1 1 li0)) -(set! li0 (add_element_at 2 2 li0)) -(set! li0 (add_element_at 0 -1 li0)) -(set! li0 (add_element_at 0 -3 li0)) -(set! li0 (add_element_at 1 -2 li0)) -(set! li0 (add_element_at 44 3 li0)) -(set! li0 (add_element_at -44 -4 li0)) - -(add_element_at! 0 0 li1) -(add_element_at! 1 1 li1) -(add_element_at! 2 2 li1) -(add_element_at! 0 -1 li1) -(add_element_at! 0 -3 li1) -(add_element_at! 1 -2 li1) -(add_element_at! 44 3 li1) -(add_element_at! -44 -4 li1) +(set! li0 (list:add_element_at 0 0 li0)) +(set! li0 (list:add_element_at 1 1 li0)) +(set! li0 (list:add_element_at 2 2 li0)) +(set! li0 (list:add_element_at 0 -1 li0)) +(set! li0 (list:add_element_at 0 -3 li0)) +(set! li0 (list:add_element_at 1 -2 li0)) +(set! li0 (list:add_element_at 44 3 li0)) +(set! li0 (list:add_element_at -44 -4 li0)) + +(list:add_element_at! 0 0 li1) +(list:add_element_at! 1 1 li1) +(list:add_element_at! 2 2 li1) +(list:add_element_at! 0 -1 li1) +(list:add_element_at! 0 -3 li1) +(list:add_element_at! 1 -2 li1) +(list:add_element_at! 44 3 li1) +(list:add_element_at! -44 -4 li1) (assert! (= (var li0) (var li1)) [FAILED] (var test_name) equality.) |