kiss-lang/kiss-vscode
1
0
Fork 0
Code Issues 1 Pull Requests Actions Packages Projects Releases Wiki Activity

don't compile _testAwaitLet off js

Browse Source
This commit is contained in:
Nat Quayle Nelson
2023-02-18 16:03:46 -07:00
parent 8dd6f1578c
commit c5002c48bc
1 changed files with 38 additions and 37 deletions
Download Patch File Download Diff File Expand all files Collapse all files

73
kiss/src/test/cases/BasicTestCase.kiss
View File

@@ -772,40 +772,41 @@ From:[(assert false (+ \"false \" \"should \" \"have \" \"been \" \"true\"))]" m
(Assert.equals "a55.5true" "${a}${five}${fivePointFive}${tt}")) (Assert.equals "a55.5true" "${a}${five}${fivePointFive}${tt}"))
(never otherwise))) (never otherwise)))
(function _testAwaitLet [:utest.Async async] (#when js
(localFunction :Promise<Bool> newPromise [:Bool succeed] (function _testAwaitLet [:utest.Async async]
(new Promise (localFunction :Promise<Bool> newPromise [:Bool succeed]
->:Void [ (new Promise
:Bool->Void resolve ->:Void [
:Dynamic->Void reject :Bool->Void resolve
] (if succeed (resolve true) (reject false)))) :Dynamic->Void reject
] (if succeed (resolve true) (reject false))))
(awaitLet [result (newPromise true)] (awaitLet [result (newPromise true)]
(catch [:Dynamic e] (Assert.fail)) (catch [:Dynamic e] (Assert.fail))
(Assert.isTrue result) (Assert.isTrue result)
(awaitLet [res1 (newPromise false) (awaitLet [res1 (newPromise false)
res2 (newPromise true) res2 (newPromise true)
res3 (newPromise true)] res3 (newPromise true)]
(catch [:Dynamic e] (catch [:Dynamic e]
(Assert.isFalse e) (Assert.isFalse e)
(awaitLet [res1 (newPromise true) (awaitLet [res1 (newPromise true)
res2 (newPromise false) res2 (newPromise false)
res3 (newPromise true)] res3 (newPromise true)]
(catch [:Dynamic e] (catch [:Dynamic e]
(Assert.isFalse e) (Assert.isFalse e)
(awaitLet [res1 (newPromise true) (awaitLet [res1 (newPromise true)
res2 (newPromise true) res2 (newPromise true)
res3 (newPromise false)] res3 (newPromise false)]
(catch [:Dynamic e] (catch [:Dynamic e]
(Assert.isFalse e) (Assert.isFalse e)
(awaitLet [res1 (newPromise true) (awaitLet [res1 (newPromise true)
res2 (newPromise res1) res2 (newPromise res1)
res3 (newPromise res2)] res3 (newPromise res2)]
(Assert.isTrue ?(and res1 res2 res3)) (Assert.isTrue ?(and res1 res2 res3))
(async.done)) (async.done))
e) e)
(Assert.fail)) (Assert.fail))
e) e)
(Assert.fail)) (Assert.fail))
e) e)
(Assert.fail)))) (Assert.fail)))))