-- Copyright (c) 2019 The DAML Authors. All rights reserved.
-- SPDX-License-Identifier: Apache-2.0
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
module Main(main) where
import Ide.Arguments (Arguments (..), GhcideArguments (..),
getArguments)
import Ide.Main (defaultMain)
import Plugins
main :: IO ()
main = do
args <- getArguments "haskell-language-server"
let withExamples =
case args of
Ghcide GhcideArguments{..} -> argsExamplePlugin
_ -> False
defaultMain args (idePlugins withExamples)