mirror of
https://github.com/github/semantic.git
synced 2024-11-24 08:54:07 +03:00
Define compilation of Either.
This commit is contained in:
parent
37cab16c95
commit
f09b3614d6
@ -14,3 +14,6 @@ class Compile t where
|
||||
instance Compile Py.Module where
|
||||
compile (Module Nothing) = pure Unit
|
||||
compile (Module (Just _)) = pure Unit
|
||||
|
||||
instance (Compile l, Compile r) => Compile (Either l r) where
|
||||
compile = either compile compile
|
||||
|
Loading…
Reference in New Issue
Block a user