From a21c56fba470e6dc3f3da0948fb914fb485556bf Mon Sep 17 00:00:00 2001
From: tzlil <tzlils@protonmail.com>
Date: Sun, 2 Jul 2023 04:17:16 +0300
Subject: add ambiguous types and pointfree.io to haskell repl

---
 mixins/cli.nix | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'mixins/cli.nix')

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''}
             ''
           )
-- 
cgit 1.4.1