| summaryrefslogtreecommitdiff |
diff options
| author | Nathanael Sensfelder <SpamShield0@MultiAgentSystems.org> | 2021-05-01 20:58:23 +0200 |
|---|---|---|
| committer | Nathanael Sensfelder <SpamShield0@MultiAgentSystems.org> | 2021-05-01 20:58:23 +0200 |
| commit | 034153205de05ef2a4facf7aded9912ce8dfb6b5 (patch) | |
| tree | 963eaad7baedcea998e6a41b62e3cedd7d8c6ba9 /data/unit-testing/ifelse.fate | |
| parent | a5ddb05e399929e778f501c864c894b32da3c354 (diff) | |
Suffixes imperative stuff with '!', adds ({set,list} ... ) shorthands.
Diffstat (limited to 'data/unit-testing/ifelse.fate')
| -rw-r--r-- | data/unit-testing/ifelse.fate | 30 |
1 files changed, 15 insertions, 15 deletions
diff --git a/data/unit-testing/ifelse.fate b/data/unit-testing/ifelse.fate index e06be4d..34bc4f0 100644 --- a/data/unit-testing/ifelse.fate +++ b/data/unit-testing/ifelse.fate @@ -2,50 +2,50 @@ (global string test_name) -(set test_name ( IF ELSE )) +(set! test_name ( IF ELSE )) (if (false) - (assert (false) [FAILED] (var test_name) Executing dead code 0.) + (assert! (false) [FAILED] (var test_name) Executing dead code 0.) ) (global bool test) -(set test (false)) +(set! test (false)) (ifelse (false) - (assert (false) [FAILED] (var test_name) Executing dead code 1.) - (set test (true)) + (assert! (false) [FAILED] (var test_name) Executing dead code 1.) + (set! test (true)) ) -(assert test [FAILED] (var test_name) ignored valid branch 0.) +(assert! test [FAILED] (var test_name) ignored valid branch 0.) (if (false) - (assert (false) [FAILED] (var test_name) Executing dead code 2.) - (set test (false)) + (assert! (false) [FAILED] (var test_name) Executing dead code 2.) + (set! test (false)) ) -(assert test [FAILED] (var test_name) Executing dead code 3.) +(assert! test [FAILED] (var test_name) Executing dead code 3.) -(set test +(set! test (ifelse (false) (false) (true) ) ) -(assert test [FAILED] (var test_name) Executing dead code 4.) +(assert! test [FAILED] (var test_name) Executing dead code 4.) -(set test +(set! test (ifelse (true) (true) (false) ) ) -(assert test [FAILED] (var test_name) Executing dead code 5.) +(assert! test [FAILED] (var test_name) Executing dead code 5.) -(assert +(assert! (= (ifelse (= 8 (+ 4 4)) ( valid string ) @@ -58,4 +58,4 @@ [COMPLETED] (var test_name) -(end) +(end!) |


