diff options
Diffstat (limited to 'haskell')
| -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 "λ. " + |