From e7ab38aeb5d256b11ee9186ec90a072eea70314a Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Fri, 30 Jun 2017 22:15:08 -0700 Subject: genvim: include ffi type symbols. * genvim.txr: do syntax coloring for symbols that are defined as FFI types or are FFI type operators. Also, include type operators in the Vim lispwords list. --- genvim.txr | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/genvim.txr b/genvim.txr index 4f2122e7..0f3068a6 100644 --- a/genvim.txr +++ b/genvim.txr @@ -14,7 +14,8 @@ static void dir_tables_init(void) (append-each ((sym (package-symbols pkg))) (when (or (boundp sym) (fboundp sym) (mboundp sym) (special-operator-p sym) - (constantp sym)) + (constantp sym) (ffi-type-operator-p sym) + (ffi-type-p sym)) (list sym))))) @(bind tl-sym @(append-each ((sym tl-orig-sym)) @@ -46,7 +47,8 @@ static void dir_tables_init(void) @(bind lispwords @(append-each ((sym tl-orig-sym) (text tl-sym)) (if (or (special-operator-p sym) - (mboundp sym)) + (mboundp sym) + (ffi-type-operator-p sym)) (unless (memq sym '(and dwim inc oand opip or pset qquote quote qref rotate set shift swap sys:l1-setq -- cgit v1.2.3