blob: 25ddd80480d925b86f763589f32572ff3aba3320 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
:m Data.Functor Control.Applicative Data.List Control.Monad Data.Maybe Control.Arrow
:set -XGADTs -XArrows -XUnicodeSyntax
:set +t
:set prompt "λ> "
:def hoogle \s -> return $ ":! hoogle --count=15 " ++ show s
:def pf \s -> return $ ":! pointfree " ++ show s
:m Text.Show.Pretty
:def! nopretty \_ -> return ":set -interactive-print System.IO.print"
:def! pretty \_ -> return ":set -interactive-print pPrint"
:pretty
|
