rhi/idris2-vim
1
0
Fork 0
Code Issues Pull requests Releases Activity

add \T to show type with implicits

Browse source
This commit is contained in:
rhiannon morris 2021-12-28 09:56:16 +01:00
parent 964cebee49
commit f088d05a14
1 changed files with 5 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
ftplugin/idris2.vim
View file

@ -118,12 +118,12 @@ function! IdrisReloadToLine(cline)
"return tc "return tc
endfunction endfunction
function! IdrisShowType() function! IdrisShowType(imp)
w w
let word = s:currentQueryObject() let word = s:currentQueryObject()
let cline = line(".") let cline = line(".")
let ccol = col(".") let ccol = col(".")
let ty = s:IdrisCommand(":t", word) let ty = s:IdrisCommand(a:imp ? ":ti" : ":t", word)
call IWrite(ty) call IWrite(ty)
endfunction endfunction
@ -295,7 +295,8 @@ function! IdrisEval()
call IWrite(" = " . result) call IWrite(" = " . result)
endfunction endfunction
nnoremap <buffer> <silent> <LocalLeader>t :call IdrisShowType()<ENTER> nnoremap <buffer> <silent> <LocalLeader>t :call IdrisShowType(0)<ENTER>
nnoremap <buffer> <silent> <LocalLeader>T :call IdrisShowType(1)<ENTER>
nnoremap <buffer> <silent> <LocalLeader>r :call IdrisReload(0)<ENTER> nnoremap <buffer> <silent> <LocalLeader>r :call IdrisReload(0)<ENTER>
nnoremap <buffer> <silent> <LocalLeader>c :call IdrisCaseSplit()<ENTER> nnoremap <buffer> <silent> <LocalLeader>c :call IdrisCaseSplit()<ENTER>
nnoremap <buffer> <silent> <LocalLeader>a 0:call search(":")<ENTER>b:call IdrisAddClause(0)<ENTER>w nnoremap <buffer> <silent> <LocalLeader>a 0:call search(":")<ENTER>b:call IdrisAddClause(0)<ENTER>w