aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--hs-visinter.cabal12
-rw-r--r--src/HSVIS/AST.hs (renamed from src/AST.hs)4
-rw-r--r--src/HSVIS/Parser.hs (renamed from src/Parser.hs)8
-rw-r--r--src/HSVIS/Pretty.hs (renamed from src/Pretty.hs)2
4 files changed, 14 insertions, 12 deletions
diff --git a/hs-visinter.cabal b/hs-visinter.cabal
index 0639cde..181d112 100644
--- a/hs-visinter.cabal
+++ b/hs-visinter.cabal
@@ -10,16 +10,16 @@ build-type: Simple
executable hs-visinter
main-is: Main.hs
other-modules:
- AST
Control.FAlternative
- Parser
- Pretty
+ HSVIS.AST
+ HSVIS.Parser
+ HSVIS.Pretty
build-depends:
base >= 4.16 && < 4.20,
containers >= 0.6.3.1 && < 0.8,
mtl,
monad-chronicle ^>= 1.0.0.1,
these
- hs-source-dirs: src
- default-language: Haskell2010
- ghc-options: -Wall -threaded
+ hs-source-dirs: src
+ default-language: Haskell2010
+ ghc-options: -Wall -threaded
diff --git a/src/AST.hs b/src/HSVIS/AST.hs
index 878c9fb..5a90205 100644
--- a/src/AST.hs
+++ b/src/HSVIS/AST.hs
@@ -1,8 +1,8 @@
-module AST where
+module HSVIS.AST where
import Data.List.NonEmpty (NonEmpty)
-import Pretty
+import HSVIS.Pretty
newtype Name = Name String
diff --git a/src/Parser.hs b/src/HSVIS/Parser.hs
index 76cc10e..23ce28e 100644
--- a/src/Parser.hs
+++ b/src/HSVIS/Parser.hs
@@ -15,8 +15,10 @@
-- I don't want a warning for 'head' and 'tail' in this file. But I also don't
-- want GHCs before 9.8 to complain that they don't know the x-partial warning.
{-# OPTIONS_GHC -Wno-unrecognised-warning-flags -Wno-x-partial #-}
-module Parser (
+module HSVIS.Parser (
parse,
+ Pos(..),
+ ErrMsg(..),
printErrMsg,
-- * Re-exports
These(..),
@@ -36,9 +38,9 @@ import Data.These
-- import Debug.Trace
-import AST
import Control.FAlternative
-import Pretty
+import HSVIS.AST
+import HSVIS.Pretty
data Pos = Pos
diff --git a/src/Pretty.hs b/src/HSVIS/Pretty.hs
index ef7c39a..ffde90e 100644
--- a/src/Pretty.hs
+++ b/src/HSVIS/Pretty.hs
@@ -1,4 +1,4 @@
-module Pretty where
+module HSVIS.Pretty where
class Pretty a where