This is related to previous commit
This commit is contained in:
parent
f05be17fdf
commit
84359fc2fd
|
@ -8,7 +8,7 @@
|
|||
|
||||
(module+ test
|
||||
(require rackunit "bool.rkt")
|
||||
#;(check-equal?
|
||||
(check-equal?
|
||||
(case* Maybe Type (some Bool true) (Bool)
|
||||
(lambda* (A : Type) (x : (Maybe A)) A)
|
||||
[(none (A : Type)) IH: ()
|
||||
|
|
Loading…
Reference in New Issue
Block a user