Add HSVIS module prefix

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