github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-12-27 00:44:57 +03:00
Code Issues Projects Releases Wiki Activity

Rename Semantic.Parse to Control.Carrier.Parse.Measured.

Browse Source
This commit is contained in:
Rob Rix 2019-09-30 16:32:50 -04:00
parent b783f94a32
commit a99ef5f855
No known key found for this signature in database
GPG Key ID: F188A01508EA1CF7
5 changed files with 6 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
semantic.cabal
View File

@ -114,6 +114,8 @@ library
, Control.Abstract.Roots
, Control.Abstract.ScopeGraph
, Control.Abstract.Value
-- Carriers
, Control.Carrier.Parse.Measured
-- Effects
, Control.Effect.Interpose
, Control.Effect.Parse
@ -254,7 +256,6 @@ library
, Semantic.Git
, Semantic.Graph
, Semantic.IO
, Semantic.Parse
, Semantic.REPL
, Semantic.Resolution
, Semantic.Task

2
src/Semantic/Parse.hs → src/Control/Carrier/Parse/Measured.hs
View File

@ -1,5 +1,5 @@
{-# LANGUAGE GADTs, GeneralizedNewtypeDeriving, TypeOperators, UndecidableInstances #-}
module Semantic.Parse
module Control.Carrier.Parse.Measured
( -- * Parse effect
module Control.Effect.Parse
-- * Parse carrier

2
src/Semantic/CLI.hs
View File

@ -1,6 +1,7 @@
{-# LANGUAGE ApplicativeDo #-}
module Semantic.CLI (main) where
import qualified Control.Carrier.Parse.Measured as Parse
import Control.Effect.Reader
import Control.Exception as Exc (displayException)
import Data.Blob
@ -17,7 +18,6 @@ import Semantic.Api hiding (File)
import qualified Semantic.AST as AST
import Semantic.Config
import qualified Semantic.Graph as Graph
import qualified Semantic.Parse as Parse
import qualified Semantic.Task as Task
import qualified Semantic.Git as Git
import Semantic.Task.Files

2
src/Semantic/REPL.hs
View File

@ -7,6 +7,7 @@ module Semantic.REPL
import Control.Abstract hiding (Continue, List, string)
import Control.Abstract.ScopeGraph (runScopeError)
import Control.Abstract.Heap (runHeapError)
import Control.Carrier.Parse.Measured
import Control.Effect.Carrier
import Control.Effect.Catch
import Control.Effect.Lift
@ -37,7 +38,6 @@ import Semantic.Analysis
import Semantic.Config (logOptionsFromConfig)
import Semantic.Distribute
import Semantic.Graph
import Semantic.Parse
import Semantic.Resolution
import Semantic.Task hiding (Error)
import qualified Semantic.Task.Files as Files

2
src/Semantic/Util.hs
View File

@ -20,6 +20,7 @@ import Prelude hiding (readFile)
import Control.Abstract
import Control.Abstract.Heap (runHeapError)
import Control.Abstract.ScopeGraph (runScopeError)
import Control.Carrier.Parse.Measured
import Control.Effect.Lift
import Control.Effect.Trace (runTraceByPrinting)
import Control.Exception (displayException)
@ -47,7 +48,6 @@ import Prologue
import Semantic.Analysis
import Semantic.Config
import Semantic.Graph
import Semantic.Parse
import Semantic.Task
import Source.Loc
import System.Exit (die)