From c31a34382d6fe1307a0c6fe1710c42f27fe833ca Mon Sep 17 00:00:00 2001 From: Josh Rahm Date: Wed, 16 Oct 2024 00:03:09 -0600 Subject: Add framework for more easily editing files. This introduces the FilesM monad, which allows for monadic and fragmented writing to files in a filesystem. This provides an abstraction over writing to different "fragments" of files so implementation, headers and declarations can all be written using just one pass of the compiler. --- src/Language/Fiddle/Compiler/Backend.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Language/Fiddle/Compiler/Backend.hs') diff --git a/src/Language/Fiddle/Compiler/Backend.hs b/src/Language/Fiddle/Compiler/Backend.hs index eda3ede..dff8e47 100644 --- a/src/Language/Fiddle/Compiler/Backend.hs +++ b/src/Language/Fiddle/Compiler/Backend.hs @@ -62,7 +62,7 @@ backendToParserFunction processTranspileResult :: TranspileResult -> IO () processTranspileResult (TranspileResult mp) = - forM_ (Map.toList mp) $ \(file, text) -> + forM_ (Map.toList mp) $ \(file, text) -> do Data.Text.IO.writeFile file text nullBackend :: Backend -- cgit