diff options
Diffstat (limited to 'haskell/.ghci')
| -rw-r--r-- | haskell/.ghci | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/haskell/.ghci b/haskell/.ghci new file mode 100644 index 0000000..e5bf06f --- /dev/null +++ b/haskell/.ghci @@ -0,0 +1,20 @@ +:set -v0 +:set -XNoMonomorphismRestriction +:set -Wall -fno-warn-name-shadowing -fno-warn-type-defaults +:set editor vim + +import qualified IPPrint +import qualified Language.Haskell.HsColour as HsColour +import qualified Language.Haskell.HsColour.Colourise as HsColour +import qualified Language.Haskell.HsColour.Output as HsColour + +let myColourPrefs = HsColour.defaultColourPrefs { HsColour.conid = [HsColour.Foreground HsColour.Yellow, HsColour.Bold], HsColour.conop = [HsColour.Foreground HsColour.Yellow], HsColour.string = [HsColour.Foreground HsColour.Green], HsColour.char = [HsColour.Foreground HsColour.Cyan], HsColour.number = [HsColour.Foreground HsColour.Red, HsColour.Bold], HsColour.layout = [HsColour.Foreground HsColour.White], HsColour.keyglyph = [HsColour.Foreground HsColour.White] } + +let myPrint = putStrLn . HsColour.hscolour (HsColour.TTYg HsColour.XTerm256Compatible) myColourPrefs False False "" False . IPPrint.pshow + +:set -interactive-print=myPrint +:set prompt "λ. " + +:def hoogle \str -> return $ ":! hoogle --count=15 \"" ++ str ++ "\"" + +:def pf \str -> return $ ":! pointfree \"" ++ str ++ "\"" |