Support Pascal syntax highlight

Cargo.toml

@@ -73,6 +73,7 @@ simple_logger = { path = "crates/simple_logger" }
 string-offset = { path = "crates/string-offset" }
 sum_tree = { path = "crates/sum_tree" }
 syntax_tree = { path = "crates/syntax_tree" }
+tree_sitter_pascal = { path = "crates/tree_sitter_pascal" }
 ui_components = { path = "crates/ui_components" }
 vim = { path = "crates/vim" }
 virtual-fs = { path = "crates/virtual_fs" }

app/src/ai/agent/mod.rs

@@ -990,6 +990,8 @@ impl ProgrammingLanguage {
                 "vue" => Some("vue"),
                 "dockerfile" | "docker" | "containerfile" => Some("dockerfile"),
                 "markdown" | "md" => Some("md"),
+                "pascal" | "pas" | "delphi" | "objectpascal" | "object-pascal" | "objpas"
+                | "freepascal" | "fpc" => Some("pas"),
                 _ => None,
             },
             Self::Shell(ShellType::PowerShell) => Some("ps1"),

app/src/ai/agent/mod_tests.rs

@@ -278,6 +278,7 @@ fn test_programming_language_to_extension() {
         ("starlark", "bzl"),
         ("objective-c", "m"),
         ("objc", "m"),
+        ("pascal", "pas"),
         // Common markdown code-fence aliases.
         ("rs", "rs"),
         ("golang", "go"),
@@ -294,6 +295,10 @@ fn test_programming_language_to_extension() {
         ("containerfile", "dockerfile"),
         ("markdown", "md"),
         ("md", "md"),
+        ("delphi", "pas"),
+        ("objectpascal", "pas"),
+        ("freepascal", "pas"),
+        ("pas", "pas"),
     ];
     for (token, expected_extension) in cases {
         let language = ProgrammingLanguage::from((*token).to_string());

crates/languages/Cargo.toml

@@ -10,6 +10,7 @@ serde.workspace = true
 serde_yaml.workspace = true
 rust-embed.workspace = true
 arborium.workspace = true
+tree_sitter_pascal.workspace = true
 lazy_static.workspace = true
 warp_editor = { path = "../editor" }
 warp_util.workspace = true

crates/languages/grammars/README.md

@@ -9,7 +9,10 @@ You can find this information on language specific documentation and style guide
 
 Another place to look is at Zed's config.toml files, e.g.: https://github.com/zed-industries/zed/blob/85bdd9329b550475aae34340e50abd4e79f2dd82/crates/languages/src/python/config.toml
 
-**Note:** We don't use custom highlights.scm files - we use arborium's bundled highlighting queries instead.
+**Note:** We normally don't use custom highlights.scm files - we use arborium's bundled highlighting queries instead.
+
+## highlights.scm
+Only for languages arborium has no grammar for, which currently means Pascal alone (its grammar is vendored in `crates/tree_sitter_pascal`). `load_language` falls back to `grammars/<lang>/highlights.scm` when `get_arborium_highlight_query` has no entry for the language. Warp's highlighter applies every capture and does not evaluate query predicates, so a query written for another editor needs its `#match?`/`#eq?`-gated rules removed rather than copied across - otherwise their captures apply unconditionally.
 
 ## indents.scm
 This controls how we know when a cursor should be indented relative to the previous line.

crates/languages/grammars/pascal/config.yaml

@@ -0,0 +1,11 @@
+display_name: "Pascal"
+indent_unit:
+  space: 2
+comment_prefix: "//"
+brackets:
+  - start: "("
+    end: ")"
+  - start: "["
+    end: "]"
+  - start: "'"
+    end: "'"