Try getting rid of all transformers

codedownio · May 18, 2024 · dc0a705 · dc0a705
1 parent 0059335
commit dc0a705
Showing 1 changed file with 14 additions and 14 deletions.
diff --git a/src/Language/LSP/Notebook.hs b/src/Language/LSP/Notebook.hs
@@ -20,23 +20,23 @@ import Language.LSP.Transformer
 
 
 type HaskellNotebookTransformer =
-  DirectiveToPragma -- Convert :set -XFoo directives to LANGUAGE pragmas
-  :> StripDirective -- Strip all remaining directives
-  :> ExpressionToDeclaration -- Convert naked expressions to declarations
-  :> StatementToDeclaration -- Convert naked statements to declarations
-  :> ImportSifter -- Sift imports to the top
-  :> HeaderTransformer -- Add unsafePerformIO import at top
-  :> PragmaSifter -- Sift pragmas to the top (above imports)
+  -- DirectiveToPragma -- Convert :set -XFoo directives to LANGUAGE pragmas
+  -- :> StripDirective -- Strip all remaining directives
+  -- :> ExpressionToDeclaration -- Convert naked expressions to declarations
+  -- :> StatementToDeclaration -- Convert naked statements to declarations
+  -- :> ImportSifter -- Sift imports to the top
+  HeaderTransformer -- Add unsafePerformIO import at top
+  -- :> PragmaSifter -- Sift pragmas to the top (above imports)
 
 expressionToDeclarationParams :: FilePath -> Params ExpressionToDeclaration
 expressionToDeclarationParams = EDParams 10
 
 transformerParams :: FilePath -> Params HaskellNotebookTransformer
 transformerParams ghcLibDir =
-  DTPParams ghcLibDir
-  :> SDParams ghcLibDir
-  :> expressionToDeclarationParams ghcLibDir
-  :> STDParams ghcLibDir
-  :> ghcLibDir
-  :> ["import System.IO.Unsafe (unsafePerformIO)"]
-  :> ghcLibDir
+  -- DTPParams ghcLibDir
+  -- :> SDParams ghcLibDir
+  -- :> expressionToDeclarationParams ghcLibDir
+  -- :> STDParams ghcLibDir
+  -- :> ghcLibDir
+  ["import System.IO.Unsafe (unsafePerformIO)"]
+  -- :> ghcLibDir