From b0776b8f15212437621044e2b7d454eb105b071c Mon Sep 17 00:00:00 2001 From: "chapman.alex" Date: Tue, 18 Apr 2006 12:02:31 +0000 Subject: [PATCH] updated factor.vim to use words from the kernel vocab as keywords --- contrib/vim/factor.vim | 5 +++++ contrib/vim/factor.vim.fgen | 6 +++++- 2 files changed, 10 insertions(+), 1 deletion(-) diff --git a/contrib/vim/factor.vim b/contrib/vim/factor.vim index 68cd2417a7..9e850b4f44 100644 --- a/contrib/vim/factor.vim +++ b/contrib/vim/factor.vim @@ -47,6 +47,11 @@ syn keyword factorTodo TODO FIXME XXX contained syn keyword factorBoolean boolean f general-t t +" use this to have keywords as all words from all vocabs (currently broken by | characters) + + +" use this to only have keywords highlighted from the kernel vocab +syn keyword factorKeyword continuation-name set-datastack wrapper continuation-catch set-continuation-name cli-bool-param slip pick 2slip tuple 2nip set-boot default-cli-args with-datastack clone cpu tuck -rot swapd >boolean wrapper? ifcc dupd dup 3dup callstack windows? os-env over = continue ? 2dup continuation cond win64? set-path run-user-init 3drop when hashcode cli-param default-shell millis set-callstack unless >r version die callcc0 callcc1 num-types or os depth 3keep cli-var-param continue-with if exit tuple? unix? cli-args (continue-with) general-t continuation? hashcode* parse-command-line macosx? r> rot win32? 2apply >continuation< type continuation-call clear no-cond call continuation-data 2drop cli-arg set-continuation-call drop set-continuation-data keep-datastack and when* swap ?if 2swap literalize datastack set-continuation-catch unless* not eq? with wrapped keep 2keep <=> nip if* syn cluster factorNumber contains=factorInt,factorFloat,factorRatio,factorComplex diff --git a/contrib/vim/factor.vim.fgen b/contrib/vim/factor.vim.fgen index cffdd07924..2897bb42ef 100644 --- a/contrib/vim/factor.vim.fgen +++ b/contrib/vim/factor.vim.fgen @@ -29,7 +29,11 @@ syn keyword factorTodo TODO FIXME XXX contained syn keyword factorBoolean boolean f general-t t -<% ! vocabs [ words "syn keyword " write [ pprint " " write ] each "\n" write ] each %> +" use this to have keywords as all words from all vocabs (currently broken by | characters) +<% ! vocabs [ words [ "syn keyword factorKeyword " write [ pprint " " write ] each "\n" write ] when* ] each %> + +" use this to only have keywords highlighted from the kernel vocab +<% "kernel" words "syn keyword factorKeyword " write [ pprint " " write ] each "\n" write %> syn cluster factorNumber contains=factorInt,factorFloat,factorRatio,factorComplex syn cluster factorReal contains=factorInt,factorFloat,factorRatio