Merge ce169026b329a35e57f45b0c57b32e706fa4b9e2 into 55dad028870329a5d78d7d62fe45844acc10f943

Closes #6355

crates/typst-syntax/src/ast.rs

@@ -595,6 +595,7 @@ impl Shorthand<'_> {
         ("--", '\u{2013}'),
         ("---", '\u{2014}'),
         ("-?", '\u{00AD}'),
+        ("-!", '\u{2011}'),
     ];
 
     /// Get the shorthanded character.

crates/typst-syntax/src/lexer.rs

@@ -191,6 +191,7 @@ impl Lexer<'_> {
             '-' if self.s.eat_if("--") => SyntaxKind::Shorthand,
             '-' if self.s.eat_if('-') => SyntaxKind::Shorthand,
             '-' if self.s.eat_if('?') => SyntaxKind::Shorthand,
+            '-' if self.s.eat_if('!') => SyntaxKind::Shorthand,
             '-' if self.s.at(char::is_numeric) => SyntaxKind::Shorthand,
             '*' if !self.in_word() => SyntaxKind::Star,
             '_' if !self.in_word() => SyntaxKind::Underscore,
@@ -528,7 +529,7 @@ impl Lexer<'_> {
             match s.eat() {
                 Some(' ') if s.at(char::is_alphanumeric) => {}
                 Some('/') if !s.at(['/', '*']) => {}
-                Some('-') if !s.at(['-', '?']) => {}
+                Some('-') if !s.at(['-', '?', '!']) => {}
                 Some('.') if !s.at("..") => {}
                 Some('h') if !s.at("ttp://") && !s.at("ttps://") => {}
                 Some('@') if !s.at(is_valid_in_label_literal) => {}

tests/suite/layout/inline/linebreak.typ

@@ -10,7 +10,7 @@ Supercalifragilisticexpialidocious Expialigoricmetrioxidation.
 
 --- linebreak-hyphen-nbsp ---
 // Test for non-breaking space and hyphen.
-There are non\u{2011}breaking~characters.
+There are non-!breaking~characters.
 
 --- linebreak-narrow-nbsp ---
 // Test for narrow non-breaking space.

tests/suite/syntax/shorthand.typ

@@ -1,7 +1,7 @@
 // Test shorthands for unicode codepoints.
 
 --- shorthand-nbsp-and-shy-hyphen ---
-The non-breaking space~does work, soft-?hyphen also does.
+The non-breaking space~does work, soft-?hyphen does, and non-!breaking hyphen also does.
 
 --- shorthand-nbsp-width ---
 // Make sure non-breaking and normal space always

tools/support/typst.tmLanguage.json

@@ -42,6 +42,10 @@
           "name": "punctuation.definition.nonbreaking-space.typst",
           "match": "~"
         },
+        {
+          "name": "punctuation.definition.nonbreaking-hyphen.typst",
+          "match": "-!"
+        },
         {
           "name": "punctuation.definition.shy.typst",
           "match": "-\\?"