diff options
| author | Camil Staps | 2015-10-29 12:03:05 +0100 |
|---|---|---|
| committer | Camil Staps | 2016-11-30 19:10:34 +0100 |
| commit | 20249775a88aeda38f7c08a47ee5cb361c289185 (patch) | |
| tree | 57e957c7c78ca77fd1eb768e22825085bf2458ce | |
| parent | lxc-setup (diff) | |
ghci config
| -rw-r--r-- | haskell/ghci.symlink | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/haskell/ghci.symlink b/haskell/ghci.symlink new file mode 100644 index 0000000..675f6c9 --- /dev/null +++ b/haskell/ghci.symlink @@ -0,0 +1,15 @@ +:set -v0 +:set -XNoMonomorphismRestriction + +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 "λ. " + |