| summaryrefslogtreecommitdiff |
diff options
Diffstat (limited to 'data/unit-testing/add_elements_of.fate')
| -rw-r--r-- | data/unit-testing/add_elements_of.fate | 28 |
1 files changed, 14 insertions, 14 deletions
diff --git a/data/unit-testing/add_elements_of.fate b/data/unit-testing/add_elements_of.fate index 1fead8a..fb47a38 100644 --- a/data/unit-testing/add_elements_of.fate +++ b/data/unit-testing/add_elements_of.fate @@ -2,12 +2,12 @@ (global string test_name) -(set test_name ( ADD ELEMENTS OF )) +(set! test_name ( ADD ELEMENTS OF )) (global (list int) li0) (global (list int) li1) -(set li0 +(set! li0 (add_all (range 8 10 1) (add_all (range 4 7 1) (add_all (range 0 3 1) @@ -21,16 +21,16 @@ (add_all! (range 4 7 1) (at (ptr li1))) (add_all! (range 8 10 1) li1) -(assert (= (var li0) (var li1)) [FAILED] (var test_name) equality.) +(assert! (= (var li0) (var li1)) [FAILED] (var test_name) equality.) -(assert (= (var li0.0) (var li1.0) 0) [FAILED] (var test_name) at 0: (var li0.1), (var li1.0).) -(assert (= (var li0.1) (var li1.1) 1) [FAILED] (var test_name) at 1: (var li0.1), (var li1.1).) -(assert (= (var li0.2) (var li1.2) 2) [FAILED] (var test_name) at 2: (var li0.2), (var li1.2).) -(assert (= (var li0.3) (var li1.3) 3) [FAILED] (var test_name) at 3: (var li0.3), (var li1.3).) -(assert (= (var li0.4) (var li1.4) 4) [FAILED] (var test_name) at 4: (var li0.4), (var li1.4).) -(assert (= (var li0.5) (var li1.5) 5) [FAILED] (var test_name) at 5: (var li0.5), (var li1.5).) -(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).) +(assert! (= (var li0.0) (var li1.0) 0) [FAILED] (var test_name) at 0: (var li0.1), (var li1.0).) +(assert! (= (var li0.1) (var li1.1) 1) [FAILED] (var test_name) at 1: (var li0.1), (var li1.1).) +(assert! (= (var li0.2) (var li1.2) 2) [FAILED] (var test_name) at 2: (var li0.2), (var li1.2).) +(assert! (= (var li0.3) (var li1.3) 3) [FAILED] (var test_name) at 3: (var li0.3), (var li1.3).) +(assert! (= (var li0.4) (var li1.4) 4) [FAILED] (var test_name) at 4: (var li0.4), (var li1.4).) +(assert! (= (var li0.5) (var li1.5) 5) [FAILED] (var test_name) at 5: (var li0.5), (var li1.5).) +(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) @@ -38,7 +38,7 @@ (global (set int) si0) (global (set int) si1) -(set si0 +(set! si0 (add_all (range 0 10 2) (add_all (range 11 20 2) (add_all (range 1 10 2) @@ -55,8 +55,8 @@ (add_all! (range 1 10 2) si1) (add_all! (range 12 20 2) si1) -(assert (= (var li0) (var li1) (var si0) (var si1)) [FAILED] (var test_name) equality 2.) +(assert! (= (var li0) (var li1) (var si0) (var si1)) [FAILED] (var test_name) equality 2.) [COMPLETED] (var test_name) -(end) +(end!) |