misc/vim/syntax/factor.vim: highlight the shebang

diff --git a/misc/factor.vim.fgen b/misc/factor.vim.fgen
index 21bab78e862b4a9dd4fe684c390c6ad9a3833adf..489a74863dc309931e722743530e657f8a3d8810 100644 (file)
--- a/misc/factor.vim.fgen
+++ b/misc/factor.vim.fgen
@@ -38,6 +38,8 @@ syn cluster factorCluster contains=factorComment,factorFrySpecifier,factorKeywor
 syn match factorTodo /\(TODO\|FIXME\|XXX\):\=/ contained
 syn match factorComment /\<#!\>\s.*/ contains=factorTodo
 syn match factorComment /\<!\>\s.*/ contains=factorTodo
+syn match factorShebang /\%\^#!\s.*/
+syn match factorShebangErr /\%\^#!\S\+/
 
 syn cluster factorDefnContents contains=@factorCluster,factorStackEffect,factorLiteralStackEffect,factorArray0,factorQuotation0
 
@@ -205,6 +207,8 @@ if version >= 508 || !exists("did_factor_syn_inits")
     endif
 
     HiLink factorComment                Comment
+    HiLink factorShebang                Special
+    HiLink factorShebangErr             Error
     HiLink factorStackEffect            Typedef
     HiLink factorLiteralStackEffect     Typedef
     HiLink factorTodo                   Todo

diff --git a/misc/vim/syntax/factor.vim b/misc/vim/syntax/factor.vim
index 19d8cd2f40fd0e705063695b8b2bc32ecd25068d..b7d5d9f4e88a8240793bc0e0a52b1f6805773797 100644 (file)
--- a/misc/vim/syntax/factor.vim
+++ b/misc/vim/syntax/factor.vim
@@ -27,6 +27,8 @@ syn cluster factorCluster contains=factorComment,factorFrySpecifier,factorKeywor
 syn match factorTodo /\(TODO\|FIXME\|XXX\):\=/ contained
 syn match factorComment /\<#!\>\s.*/ contains=factorTodo
 syn match factorComment /\<!\>\s.*/ contains=factorTodo
+syn match factorShebang /\%\^#!\s.*/
+syn match factorShebangErr /\%\^#!\S\+/
 
 syn cluster factorDefnContents contains=@factorCluster,factorStackEffect,factorLiteralStackEffect,factorArray0,factorQuotation0
 
@@ -192,6 +194,8 @@ if version >= 508 || !exists("did_factor_syn_inits")
     endif
 
     HiLink factorComment                Comment
+    HiLink factorShebang                Special
+    HiLink factorShebangErr             Error
     HiLink factorStackEffect            Typedef
     HiLink factorLiteralStackEffect     Typedef
     HiLink factorTodo                   Todo