\lstdefinelanguage[Regular]{Haskell}[]{Haskell}{%
keywords={abstype,if,then,else,case,class,data,default,deriving,hiding,if,in,infix,infixl,infixr,import,instance,let,module,newtype,of,qualified,type,where,do,Q},
+ morekeywords={forall},
literate=%
- {forall}{{$\forall$}}1
+% {forall}{{$\forall$}}1
{\_}{{\raisebox{.15ex}{\_}}}1
{~}{{\raisebox{-.6ex}{\textasciitilde}}}1
- {\\}{{$\lambda\:$}}1
+% {\\}{{$\lambda\:$}}1
{->}{{$\shortrightarrow$}}2
{<-}{{$\shortleftarrow$}}2
{=>}{{$\Rightarrow$}}2