aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-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
3 files changed, 8 insertions, 6 deletions
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