LaTeX: a nicer lstlisting config

share/latex/why3lang.sty

@@ -2,10 +2,14 @@
 \RequirePackage{listings}
 \RequirePackage{amssymb}
 
-\lstdefinelanguage{Why3}
+\lstdefinelanguage{why3}
 {
+basicstyle=\ttfamily,
 morekeywords=[1]{predicate,function,goal,type,use,import,theory,end,in,%
-axiom,lemma,export,forall,match,with,not,inductive},%
+mutable,invariant,model,requires,ensures,raises,returns,reads,writes,%
+variant,let,val,while,for,loop,abstract,private,any,assert,assume,check,%
+rec,clone,if,then,else,result,old,ghost,%
+axiom,lemma,export,forall,exists,match,with,not,inductive,coinductive},%
 %keywordstyle=[1]{\color{red}},%
 morekeywords=[2]{true,false},%
 %keywordstyle=[2]{\color{blue}},%
@@ -17,8 +21,8 @@ morecomment=[s]{(*}{*)},%
 escapeinside={*?}{?*},%
 keepspaces=true,
 literate=%
-{'a}{$\alpha$}{1}%
-{'b}{$\beta$}{1}%
+%{'a}{$\alpha$}{1}%
+%{'b}{$\beta$}{1}%
 {<}{$<$}{1}%
 {>}{$>$}{1}%
 {<=}{$\le$}{1}%
@@ -34,7 +38,13 @@ literate=%
 {-->}{\texttt{-\relax->}}{2}%
 %{-->}{$\longrightarrow$}{2}%
 {->}{$\rightarrow$}{2}%
+{<-}{$\leftarrow$}{2}%
 {<->}{$\leftrightarrow$}{2}%
 %
 %
 }
+
+\lstnewenvironment{why3}{\lstset{language=why3}}{}
+
+\newcommand{\whyf}[1]{\lstinline[language=why3]{#1}}
+