From e041ad6668b26be0212407588fa285fc639a6453 Mon Sep 17 00:00:00 2001
From: "Juan J. Martinez" <jjm@usebox.net>
Date: Wed, 14 Dec 2022 23:10:04 +0000
Subject: Trying scheme

---
 after/ftplugin/scheme.vim | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)
 create mode 100644 after/ftplugin/scheme.vim

(limited to 'after/ftplugin/scheme.vim')

diff --git a/after/ftplugin/scheme.vim b/after/ftplugin/scheme.vim
new file mode 100644
index 0000000..197aa08
--- /dev/null
+++ b/after/ftplugin/scheme.vim
@@ -0,0 +1,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
-- 
cgit v1.2.3