diff options
Diffstat (limited to 'csc/match-test.csc')
| -rw-r--r-- | csc/match-test.csc | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/csc/match-test.csc b/csc/match-test.csc index c5314ce..d4da153 100644 --- a/csc/match-test.csc +++ b/csc/match-test.csc @@ -73,8 +73,8 @@ 3 (match 'b ((! 'a) 1) - ((! 'b) (when #f) 2) - ((! 'b) (when #t) 3) + ((! 'b) when #f 2) + ((! 'b) when #t 3) (_ 4)))) @@ -82,8 +82,8 @@ (assert-equal 2 (match 10 - (n (when (= 1 n)) 1) - (n (when (= 10 n)) 2) + (n when (= 1 n) 1) + (n when (= 10 n) 2) (_ 3)))) |