summaryrefslogtreecommitdiffstats
path: root/genvim.txr
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2015-10-07 06:55:07 -0700
committerKaz Kylheku <kaz@kylheku.com>2015-10-07 06:55:07 -0700
commit5724fbcb5afd122b2f846b7f04e853254e729c7c (patch)
tree605a948575575dae7df63d88f0e4fe837c515924 /genvim.txr
parent8720843f7a55991fb52ca1de7be2dab341ae7517 (diff)
downloadtxr-5724fbcb5afd122b2f846b7f04e853254e729c7c.tar.gz
txr-5724fbcb5afd122b2f846b7f04e853254e729c7c.tar.bz2
txr-5724fbcb5afd122b2f846b7f04e853254e729c7c.zip
Vim: better indentation for some forms.
* genvim.txr: Some operators should indent like functions. We don't want these in lispwords.
Diffstat (limited to 'genvim.txr')
-rw-r--r--genvim.txr8
1 files changed, 7 insertions, 1 deletions
diff --git a/genvim.txr b/genvim.txr
index 114766f2..bdf433d1 100644
--- a/genvim.txr
+++ b/genvim.txr
@@ -49,7 +49,13 @@ static void dir_tables_init(void)
(let ((fb (symbol-function sym)))
(if (or (special-operator-p sym)
(and fb (not (functionp fb))))
- (list text)))))
+ (unless (memq sym '(and dwim inc oand opip or pset
+ qquote quote qref rotate set
+ shift swap sys:l1-setq
+ sys:lisp1-setq sys:qquote
+ sys:quasi sys:quasilist sys:setq
+ sys:setqf))
+ (list text))))))
@(define generate (txr-p))
@ (output @(if txr-p "txr.vim" "tl.vim") :named out)
" VIM Syntax file for txr