[209_7] 修复bash代码模式下的错误高亮

Author: notfoundzzz

TeXmacs/tests/tmu/209_7.tmu

@@ -1,4 +1,4 @@
-<TMU|<tuple|1.1.0|2026.1.1>>
+<TMU|<tuple|1.1.0|2026.1.2>>
 
 <style|<tuple|generic|chinese|table-captions-above|number-europe|preview-ref|bash>>
 
@@ -24,6 +24,38 @@
 
     IFS=$'\\n\\t'
 
+    # ---------- path -------------
+
+    \;
+
+    tar xzvf nvim-linux-x86_64.tar.gz
+
+    sudo mv nvim-linux-x86_64 /opt/nvim
+
+    git clone [email protected]:XmacsLabs/mogan.git
+
+    cat chapter-3.1.tmu
+
+    3.2 4.5
+
+    \;
+
+    # ----------- commment ---------
+
+    echo $# # 行尾注释
+
+    \;
+
+    echo ${#PATH}#not_comment
+
+    echo "${#PATH}#still_not_comment"
+
+    \;
+
+    echo ${#PATH} # 这里才是注释
+
+    \;
+
     \;
 
     # ---------- globals ----------

devel/209_7.md

@@ -33,3 +33,13 @@
 
 关联 issue #2607
 
+## 2026/01/29
+### What
+- 修复 Bash 代码模式下 `#` 在 `$#`、`${#...}` 中被误识别为注释的问题
+- 增加路径/URL 识别规则，避免路径/文件名中的关键字与数字误高亮（如 `abc.git`）
+
+### How
+- 在 `prog_language.cpp` 增加可配置的 `path` 解析步骤，位于 `string_parser` 之后、`keyword/number` 之前；匹配到路径/URL token 则整体消费
+- `bash-lang.scm` 中启用 `path` 解析
+- 注释规则增加 `inline_require_space`：仅当 `#` 位于行首或空白后才作为注释起始
+

src/System/Language/prog_language.cpp

@@ -26,7 +26,7 @@ prog_language_rep::prog_language_rep (string name)
   if (DEBUG_PARSER)
     debug_packrat << "Building the " * name * " language parser" << LF;
   inline_comment_requires_space= false;
-  path_parser_enabled= false;
+  path_parser_enabled          = false;
 
   string use_modules= "(use-modules (code " * name * "-lang))";
   eval (use_modules);
@@ -249,8 +249,8 @@ prog_language_rep::customize_path (tree config) {
 static bool
 is_path_token_delim (char c) {
   return is_space (c) || c == '(' || c == ')' || c == '{' || c == '}' ||
-         c == '[' || c == ']' || c == ';' || c == '|' || c == '&' ||
-         c == '<' || c == '>';
+         c == '[' || c == ']' || c == ';' || c == '|' || c == '&' || c == '<' ||
+         c == '>';
 }
 
 static bool
@@ -264,13 +264,17 @@ looks_like_path_token (string token) {
 
   bool has_dot  = false;
   bool has_alpha= false;
+  bool has_digit= false;
   bool has_at   = false;
   bool has_colon= false;
+  bool has_dash = false;
   for (int i= 0; i < N (token); i++) {
     char c= token[i];
     if (c == '/' || c == '\\') return true;
     if (c == '.') has_dot= true;
     if (is_alpha (c)) has_alpha= true;
+    if (is_digit (c)) has_digit= true;
+    if (c == '-') has_dash= true;
     if (c == '@') has_at= true;
     if (c == ':') has_colon= true;
     if (c == ':' && i + 2 < N (token) && token[i + 1] == '/' &&
@@ -279,12 +283,12 @@ looks_like_path_token (string token) {
   }
 
   if (N (token) >= 2 && token[0] == '.' && token[1] == '/') return true;
-  if (N (token) >= 3 && token[0] == '.' && token[1] == '.' &&
-      token[2] == '/')
+  if (N (token) >= 3 && token[0] == '.' && token[1] == '.' && token[2] == '/')
     return true;
   if (N (token) >= 2 && token[0] == '~' && token[1] == '/') return true;
   if (has_at && has_colon) return true;
   if (has_dot && has_alpha) return true;
+  if (token[0] != '-' && has_dash && has_alpha && has_digit) return true;
   return false;
 }
 
@@ -295,7 +299,8 @@ parse_path_token (string s, int& pos) {
 
   int start= pos;
   int end  = pos;
-  while (end < N (s) && !is_path_token_delim (s[end])) end++;
+  while (end < N (s) && !is_path_token_delim (s[end]))
+    end++;
   string token= s (start, end);
   if (!looks_like_path_token (token)) return false;
   pos= end;
@@ -392,8 +397,7 @@ prog_language_rep::get_color (tree t, int start, int end) {
   int pos= 0;
   while (pos <= start) {
     if (inline_comment_parser.can_parse (s, pos)) {
-      if (!inline_comment_requires_space ||
-          (pos == 0 || is_space (s[pos - 1])))
+      if (!inline_comment_requires_space || (pos == 0 || is_space (s[pos - 1])))
         return decode_color (lan_name, encode_color ("comment"));
     }
     pos++;