@@ -78,9 +78,21 @@ function IdrisAddClause()
79endfunction
79endfunction
82+ let tc = IdrisReload()
84+ let expr = input ("Expression: ")
85+ let fn = "idris --client '" . expr . "'"
86+ let result = system(fn)
81map ct :call IdrisShowType()<ENTER>
92map ct :call IdrisShowType()<ENTER>
82map cr :call IdrisReload()<ENTER>
93map cr :call IdrisReload()<ENTER>
83map ci :call IdrisCaseSplit()<ENTER>
94map ci :call IdrisCaseSplit()<ENTER>
84map cd ?:<ENTER>b:call IdrisAddClause()<ENTER>w
95map cd ?:<ENTER>b:call IdrisAddClause()<ENTER>w
85map cm 0:call IdrisMakeWith()<ENTER>
96map cm 0:call IdrisMakeWith()<ENTER>
97+map ce :call IdrisEval()<ENTER>