fix: catch up Fennel 1.0.0

- Highlight `&` in identifier as error
- Remove highlight for `doc`

CHANGELOG.md

@@ -11,6 +11,8 @@
 
 ### Fixed
 
+- `&` in identifier is now highlighted as error (Fennel 1.0.0).
+- Remove highlight for `doc` since it has been replaced with `,doc` (Fennel 1.0.0)
 - Remove highlight for `pick-args` since it has been deprecated (Fennel 0.10.0)
 
 ## [0.2][v0.2] (2021-06-20)

syntax/fennel.vim

@@ -46,12 +46,12 @@ syn keyword fennelConstant nil
 " Identifier, symbol, and keyword {{{2
 "
 " <identifier> -> <initial> <subsequent> *
-" where <initial> -> [^#:0-9[:space:]\n"'(),;@\[\]\\`{}~]
-"       <subsequent> ->   [^[:space:]\n"'(),;@\[\]\\`{}~]
-syn match fennelIdentifier /[^#:0-9[:space:]\n"'(),;@\[\]\\`{}~][^[:space:]\n"'(),;@\[\]\\`{}~]*/
+" where <initial> -> [^#&:0-9[:space:]\n"'(),;@\[\]\\`{}~]
+"       <subsequent> ->   [^&[:space:]\n"'(),;@\[\]\\`{}~]
+syn match fennelIdentifier /[^#&:0-9[:space:]\n"'(),;@\[\]\\`{}~][^&[:space:]\n"'(),;@\[\]\\`{}~]*/
 syn match fennelLuaTableItemAccessor /\./ contained containedin=fennelIdentifier
 syn match fennelLuaMethodCall /:/ contained containedin=fennelIdentifier
-syn match fennelSymbol /[^#:0-9[:space:]\n"'(),;@\[\]\\`{}~][^[:space:]\n"'(),;@\[\]\\`{}~]*/ contained
+syn match fennelSymbol /[^#&:0-9[:space:]\n"'(),;@\[\]\\`{}~][^&[:space:]\n"'(),;@\[\]\\`{}~]*/ contained
 " <keyword> -> : <subsequent> +
 " Keyword such as ::: is accepted by Fennel! 
 syn match fennelKeyword /:[^[:space:]\n"'(),;@\[\]\\`{}~]\+/
@@ -151,7 +151,7 @@ syn cluster fennelExpressions contains=fennelSpecialForm,fennelAuxSyntax,fennelL
 " Special forms {{{2
 syn match fennelSpecialForm /\%^\@<!#\ze[^[:space:]\n);@\]\\}~]/
 syn keyword fennelSpecialForm % * + - -> ->> -?> -?>> . .. / // : < <= = > >= ^
-syn keyword fennelSpecialForm and comment do doc doto each eval-compiler fn for global hashfn if
+syn keyword fennelSpecialForm and comment do doto each eval-compiler fn for global hashfn if
 syn keyword fennelSpecialForm include lambda length let local lua macro macros match not not= or
 syn keyword fennelSpecialForm partial quote require-macros set set-forcibly! tset values var when
 syn keyword fennelSpecialForm while ~= λ