move EvalResult to Myriad.Docker

2020-06-16 22:38:54 -04:00 · 2020-06-16 22:38:54 -04:00 · e27755cdda
commit e27755cdda
parent e2942e38b9
2 changed files with 8 additions and 7 deletions
--- a/src/Myriad/Core.hs
+++ b/src/Myriad/Core.hs
@ -4,7 +4,6 @@ module Myriad.Core
    ( Language
    , ContainerName
    , ImageName
-    , EvalResult(..)
    , Env(..)
    , MyriadT
    , runMyriadT
@ -49,11 +48,6 @@ data Env = Env
    , snowflakeGen :: SnowflakeGen
    }

-data EvalResult
-    = EvalOk BL.ByteString
-    | EvalTimedOut
-    | EvalErrored
-
 newtype MyriadT m a = MyriadT { unMyriadT :: ReaderT Env (LoggingT m) a }
    deriving newtype
        ( Functor