diff options
| author | Josh Rahm <joshuarahm@gmail.com> | 2024-10-03 18:23:50 -0600 |
|---|---|---|
| committer | Josh Rahm <joshuarahm@gmail.com> | 2024-10-03 18:23:50 -0600 |
| commit | 407e41489cc22fbf0518fd370530f8857b8c3ed0 (patch) | |
| tree | 8c5f3fceb7c9e083033e06c818556eba1dcf9a06 /src/Language/Fiddle/Compiler/Expansion.hs | |
| parent | 72eeba5fd6178409b4aab5eb8dbfaf4460f6841c (diff) | |
| download | fiddle-407e41489cc22fbf0518fd370530f8857b8c3ed0.tar.gz fiddle-407e41489cc22fbf0518fd370530f8857b8c3ed0.tar.bz2 fiddle-407e41489cc22fbf0518fd370530f8857b8c3ed0.zip | |
Clean up warnings and remove unused files.
Diffstat (limited to 'src/Language/Fiddle/Compiler/Expansion.hs')
| -rw-r--r-- | src/Language/Fiddle/Compiler/Expansion.hs | 15 |
1 files changed, 6 insertions, 9 deletions
diff --git a/src/Language/Fiddle/Compiler/Expansion.hs b/src/Language/Fiddle/Compiler/Expansion.hs index 202717f..1c4df45 100644 --- a/src/Language/Fiddle/Compiler/Expansion.hs +++ b/src/Language/Fiddle/Compiler/Expansion.hs @@ -7,20 +7,17 @@ module Language.Fiddle.Compiler.Expansion (expandAst, expansionPhase) where import Control.Monad.Identity (Identity (..)) -import Control.Monad.State (get, gets, modify, put) -import qualified Data.Char as Char +import Control.Monad.State (get, modify, put) import Data.List (intercalate) -import qualified Data.List.NonEmpty as NonEmpty import Data.Text (Text) -import qualified Data.Text as Text -import Data.Type.Bool -import Debug.Trace -import GHC.TypeLits import Language.Fiddle.Ast import Language.Fiddle.Compiler -import Language.Fiddle.Compiler.Qualification +import Language.Fiddle.Compiler.Qualification () import Language.Fiddle.Types -import Text.Printf (printf) + +import qualified Data.Char as Char +import qualified Data.List.NonEmpty as NonEmpty +import qualified Data.Text as Text type M = Compile State |