blob: 197aa0822fe84e22ac21a7461861500553bf0be1 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
"" requires:
""
"" chicken-install chicken-doc
"" cd `csi -R chicken.platform -p '(chicken-home)'`
"" curl https://3e8.org/pub/chicken-doc/chicken-doc-repo-5.tgz | tar zx
""
"" then run ../gen-scheme-words
""
let b:is_chicken=1
setl complete+=d,k~/.local/share/scheme/words/**
setl include=\^\(\\(use\\\|require-extension\\)\\s\\+
setl includeexpr=substitute(v:fname,'$','.scm','')
setl path+=/home/chl/.cache/chicken-install
setl suffixesadd=.scm
fun! Scheme_indent_top_sexp()
let pos = getpos('.')
silent! exec 'normal! 99[(=%'
call setpos('.', pos)
endfun
nmap <buffer> <silent> == :call Scheme_indent_top_sexp()<cr>
nmap <buffer> gs :10 split term://csi -s %<cr>:startinsert<cr>
setl makeprg=csc\ %
setlocal keywordprg=chicken-doc\ scheme
|