diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2023-03-27 07:48:39 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2023-03-27 07:48:39 -0700 |
commit | 64a6feb403a93213e4065aff09beed4f31c67354 (patch) | |
tree | 906020e84d7682872eb9f873dd226e3644cfec7c | |
parent | 4b9c184e7d2dccfd02e1ffbb5b250682e40aa36c (diff) | |
download | txr-64a6feb403a93213e4065aff09beed4f31c67354.tar.gz txr-64a6feb403a93213e4065aff09beed4f31c67354.tar.bz2 txr-64a6feb403a93213e4065aff09beed4f31c67354.zip |
vim: fix highlighting for uninterned symbols
* genvim.txr (tl_ident): Remove one rule, and make
sure the other matches an optional : or #:
(txr_braced_ident): Match optional : or #: prefix.
-rw-r--r-- | genvim.txr | 7 |
1 files changed, 3 insertions, 4 deletions
@@ -158,9 +158,8 @@ syn match txr_hashbang "\%^#!.*" syn match txr_qat "@at" nextgroup=@{txr-qelem} contained syn match txr_dot "\." contained syn match txr_ident "[@alnum@glyph]*[@alpha@glyph^][@alnum@glyph^]*" contained -syn match tl_ident "[:][@alnum@glyph^/]\+"@(if txr-p " contained") -syn match txr_braced_ident "[:][@alnum@glyph^/]\+" contained -syn match tl_ident "[@alnum@glyph/]\+[@alnum@glyph^/#]*"@(if txr-p " contained") +syn match txr_braced_ident "\(#\?:\)\?[[@alnum@glyph^/]\+" contained +syn match tl_ident "\(#\?:\)\?[@alnum@glyph/]\+[@alnum@glyph^/#]*"@(if txr-p " contained") syn match txr_pnum "#[xob][+\-]\?[@alnum,]\+" contains=txr_xnum,txr_bnum,txr_onum@(if txr-p " contained") syn match txr_xnum "#x[+\-]\?@hexsep" containedin=txr_pnum contained syn match txr_onum "#o[+\-]\?@octsep" containedin=txr_pnum contained @@ -169,7 +168,7 @@ syn match txr_num "[+\-]\?@digsep\?[.]@digsep\([eE][+\-]\?[@dig]\+\)\?"@(if txr- syn match txr_num "[+\-]\?@digsep[.]\?\([eE][+\-]\?[@dig]\+\)"@(if txr-p " contained") syn match txr_badnum "[+\-]\?@digsep\?[.]@digsep\([@{alpha-noe}@glyph^/#]\|[eE][^+\-@dig]\|[eE][+/-]\?$\|[eE][+\-][^0-9]\)"@(if txr-p " contained") syn match txr_badnum "[+\-]\?@digsep[.]\?\([@{alpha-noe}@glyph^/#]\|[eE][^+\-@dig]\|[eE][+/-]\?$\|[eE][+\-][^0-9]\)"@(if txr-p " contained") -syn match tl_ident ":"@(if txr-p " contained") +syn match tl_ident "#\?:"@(if txr-p " contained") syn match tl_splice "[ \t,]\|,[*]"@(if txr-p " contained") syn match txr_unquote "," contained |