add ambiguous types and pointfree.io to haskell repl

1 files changed, 5 insertions, 1 deletions

diff --git a/mixins/cli.nix b/mixins/cli.nix
index 3b331cf..1ef8b2e 100644
--- a/mixins/cli.nix
+++ b/mixins/cli.nix
@@ -32,15 +32,19 @@
             ]))
 
           (
+            let hs = pkgs.ghc.withPackages (p: with p; [relude pretty-simple pointfree]);
+            in 
             pkgs.writeShellScriptBin "hs" ''
-              exec ${pkgs.ghc.withPackages (p: with p; [relude pretty-simple])}/bin/ghci -ghci-script ${pkgs.writeText "ghci.conf" ''
+              exec ${hs}/bin/ghci -ghci-script ${pkgs.writeText "ghci.conf" ''
                 :set -XNoImplicitPrelude
                 :set -XFlexibleContexts
                 :set -XFlexibleInstances
                 :set -XOverloadedStrings
+                :set -XAllowAmbiguousTypes
                 :set prompt "\ESC[38;5;208m\STXλ>\ESC[m\STX "
                 :set -ferror-spans -freverse-errors -fprint-expanded-synonyms
                 :set -interactive-print Text.Pretty.Simple.pPrint
+		            :def pf \str -> return $ ":! ${hs}/bin/pointfree \"" ++ str ++ "\""
                 import Relude''}
             ''
           )