Remove glean/hs dependencies in glean/lang/hack

Reviewed By: phlalx

Differential Revision: D68551726

fbshipit-source-id: f65ae47157be2479a2028988553442a53ff01a7a

glean/lang/hack/Derive/Env.hs

@@ -16,7 +16,6 @@ module Derive.Env
 import Glean (Backend)
 import qualified Glean.Schema.Hack as Hack
 import Glean.Util.Some
-import Glean.Write.Async
 import Glean.Write.SimpleAsync
 
 import Derive.Types

glean/lang/hack/Derive/Types.hs

@@ -21,17 +21,15 @@ import qualified Options.Applicative as O
 import qualified Glean
 import qualified Glean.Remote
 import qualified Glean.Types as Thrift (Repo)-- gen
-import Glean.Write.Async (SendQueueSettings(..), WriterSettings(..))
-import Glean.Write.Options (sendQueueOptions, writerOptions)
 
 -- | Configuration options for "Derive" and its passes
 data Config = Config
   { cfgRepo :: Thrift.Repo
   , cfgNumCapabilities :: Maybe Int  -- ^ override @+RTS -Nx -RTS@
   , cfgMaxQueryFacts :: Maybe Int
   , cfgMaxQuerySize :: Int
-  , cfgSendQueue :: SendQueueSettings
-  , cfgWriter :: WriterSettings
+  , cfgSendQueue :: Glean.SendQueueSettings
+  , cfgWriter :: Glean.WriterSettings
   , cfgChunksPerCapability :: Int  -- ^ units of work per worker
   , cfgMaxQueueSize :: Int
   }
@@ -91,8 +89,8 @@ options = O.info (O.helper <*> (parserDerive O.<|> parserSchemaId)) O.fullDesc
         <> O.metavar "N"
         <> O.value defaultMaxQuerySize
         <> O.help "maximum number of bytes to query in one step"
-      cfgSendQueue <- sendQueueOptions
-      cfgWriter <- writerOptions
+      cfgSendQueue <- Glean.sendQueueOptions
+      cfgWriter <- Glean.writerOptions
       cfgChunksPerCapability <- O.option O.auto $
         O.long "chunks-per-capability"
         <> O.metavar "N"