Skip to content

Commit

Permalink
fix warnings
Browse files Browse the repository at this point in the history
  • Loading branch information
jmcardon committed Oct 17, 2023
1 parent 0fd5253 commit a3b7fb5
Showing 1 changed file with 0 additions and 7 deletions.
7 changes: 0 additions & 7 deletions pact-core/Pact/Core/Repl.hs
Original file line number Diff line number Diff line change
Expand Up @@ -21,13 +21,11 @@ import Control.Lens
import Control.Monad.Catch
import Control.Monad.Except
import Control.Monad.Trans(lift)
import Control.Monad.IO.Class(liftIO)
import System.Console.Haskeline
import Data.IORef
import Data.Foldable(traverse_)

import Data.Default
import qualified Data.ByteString as B
import qualified Data.Text as T
import qualified Data.Text.Encoding as T
import qualified Data.Set as Set
Expand All @@ -46,7 +44,6 @@ import Pact.Core.PactValue
import Pact.Core.Hash
import Pact.Core.Capabilities
import Pact.Core.Imports
import Pact.Core.Errors

main :: IO ()
main = do
Expand Down Expand Up @@ -116,7 +113,3 @@ main = do
let rs = ReplSource "(interactive)" srcText
outputStrLn (T.unpack (replError rs err))
loop

-- tryError :: MonadError a m => m b -> m (Either a b)
-- tryError ma =
-- catchError (Right <$> ma) (pure . Left)

0 comments on commit a3b7fb5

Please sign in to comment.