File tree Expand file tree Collapse file tree 6 files changed +24
-6
lines changed Expand file tree Collapse file tree 6 files changed +24
-6
lines changed Original file line number Diff line number Diff line change 7
7
(import math-tests)
8
8
(import range-tests)
9
9
(import string-tests)
10
- (import switch-tests)
10
+ (import switch-tests)
11
+
12
+ (import std.List)
13
+
14
+ (let outputs (list:unzip [
15
+ events-tests:events-output
16
+ exceptions-tests:exceptions-output
17
+ functional-tests:functional-output
18
+ lazy-tests:lazy-output
19
+ list-tests:list-output
20
+ macros-tests:macros-output
21
+ math-tests:math-output
22
+ range-tests:range-output
23
+ string-tests:string-output
24
+ switch-tests:switch-output ]))
25
+ (let success_count (list:sum (@ outputs 0)))
26
+ (let failure_count (list:sum (@ outputs 1)))
27
+
28
+ (print (string:format "{:=<20}\nSuccesses: {} - Failures: {}\n" "=" success_count failure_count))
Original file line number Diff line number Diff line change 1
- (import std.Exceptions)
1
+ (import std.Exceptions:* )
2
2
(import std.Testing)
3
3
4
4
(let invert (fun (x)
Original file line number Diff line number Diff line change 1
- (import std.Functional)
1
+ (import std.Functional:* )
2
2
(import std.Testing)
3
3
4
4
(let foo (fun (x) (+ x 3)))
Original file line number Diff line number Diff line change 61
61
(test:eq (list:foldLeft ["1" "2" "3"] "" (fun (x y) (+ x y))) "123")
62
62
(test:eq (list:foldLeft a 0 (fun (x y) (+ x y))) 6)
63
63
64
- (test:eq (list:zipWithIndex a) [0 1] [1 2] [2 3])
64
+ (test:eq (list:zipWithIndex a) [[ 0 1] [1 2] [2 3] ])
65
65
(test:eq (list:zipWithIndex []) [])
66
66
67
67
(test:eq a [1 2 3])
Original file line number Diff line number Diff line change 11
11
(let test_func (fun (a b c) (* a b c)))
12
12
(let test_func1 (partial test_func 1))
13
13
(let test_func2 (partial test_func1 2))
14
- (let test_func3 (partial2 test_fun 1 _ 3))
14
+ (let test_func3 (partial2 test_func 1 _ 3))
15
15
16
16
(test:suite macros {
17
17
(test:eq (-> "f0" f1) "f0-f1")
Original file line number Diff line number Diff line change 1
- (import std.Range)
1
+ (import std.Range:* )
2
2
(import std.Math :even)
3
3
(import std.Testing)
4
4
You can’t perform that action at this time.
0 commit comments