10 lines
313 B
Plaintext
10 lines
313 B
Plaintext
:set prompt "λ > "
|
|
:set prompt2 "λ² > "
|
|
{- :set -Wall -}
|
|
:set +m
|
|
|
|
let ghciEscapeShellArg arg = "'" ++ concatMap (\c -> if c == '\'' then "'\"'\"'" else [c]) arg ++ "'"
|
|
|
|
:def! h return . (":! hoogle --color --count=20 " ++) . ghciEscapeShellArg
|
|
:def! doc return . (":! hoogle --info " ++) . ghciEscapeShellArg
|