Skip to content
This repository was archived by the owner on Apr 1, 2025. It is now read-only.

Commit f955ecb

Browse files
committed
Move Semantic.Eval.* to Analysis.*.
1 parent 6dfa21b commit f955ecb

File tree

3 files changed

+8
-8
lines changed

3 files changed

+8
-8
lines changed

semantic-core/semantic-core.cabal

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -18,17 +18,17 @@ extra-source-files: README.md
1818
tested-with: GHC == 8.6.4
1919

2020
library
21-
exposed-modules: Analysis.FlowInsensitive
21+
exposed-modules: Analysis.Concrete
22+
, Analysis.FlowInsensitive
2223
, Analysis.ImportGraph
2324
, Analysis.ScopeGraph
25+
, Analysis.Typecheck
2426
, Control.Effect.Readline
2527
, Data.File
2628
, Data.Loc
2729
, Data.Stack
2830
, Semantic.Core
2931
, Semantic.Eval
30-
, Semantic.Eval.Concrete
31-
, Semantic.Eval.Typecheck
3232
, Semantic.Name
3333
-- other-modules:
3434
-- other-extensions:

semantic-core/src/Semantic/Eval/Concrete.hs renamed to semantic-core/src/Analysis/Concrete.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,5 @@
11
{-# LANGUAGE FlexibleContexts, FlexibleInstances, GeneralizedNewtypeDeriving, LambdaCase, MultiParamTypeClasses, NamedFieldPuns, RecordWildCards, TypeApplications, TypeOperators, UndecidableInstances #-}
2-
module Semantic.Eval.Concrete
2+
module Analysis.Concrete
33
( Concrete(..)
44
, concrete
55
, concreteAnalysis

semantic-core/src/Semantic/Eval/Typecheck.hs renamed to semantic-core/src/Analysis/Typecheck.hs

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1,11 +1,11 @@
11
{-# LANGUAGE DeriveFunctor, FlexibleContexts, FlexibleInstances, LambdaCase, RecordWildCards, ScopedTypeVariables, TypeApplications #-}
2-
module Semantic.Eval.Typecheck
2+
module Analysis.Typecheck
33
( Monotype (..)
44
, Meta
55
, Polytype (PForAll, PBool, PFree, PArr)
66
, Scope
7-
, Semantic.Eval.Typecheck.bind
8-
, Semantic.Eval.Typecheck.instantiate
7+
, Analysis.Typecheck.bind
8+
, Analysis.Typecheck.instantiate
99
, typecheckingFlowInsensitive
1010
, typecheckingAnalysis
1111
) where
@@ -60,7 +60,7 @@ newtype Scope = Scope Polytype
6060
deriving (Eq, Ord, Show)
6161

6262
forAll :: Gensym -> Polytype -> Polytype
63-
forAll n body = PForAll (Semantic.Eval.Typecheck.bind n body)
63+
forAll n body = PForAll (Analysis.Typecheck.bind n body)
6464

6565
forAlls :: Foldable t => t Gensym -> Polytype -> Polytype
6666
forAlls ns body = foldr forAll body ns

0 commit comments

Comments
 (0)