Merge branch 'mr/pmderodat/static-expr' into 'master'

ada/tokens.lkt: split a pattern to fit 80 columns See merge request eng/libadalang/libadalang!1881
AdaCore · Dec 17, 2024 · 2cdbabb · 2cdbabb
2 parents 53c458d + 047653a
commit 2cdbabb
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/ada/tokens.lkt b/ada/tokens.lkt
@@ -28,7 +28,10 @@ lexer ada_lexer {
     # TODO: handle Unicode properties in Langkit and switch back to
     # \p{ID_Start} and \p{ID_Continue}.
     val identifier =
-        p"[\\$_]?(\\p{Lu}|\\p{Ll}|\\p{Lt}|\\p{Lm}|\\p{Lo}|\\p{Nl}|{bracket_char})(\\p{Lu}|\\p{Ll}|\\p{Lt}|\\p{Lm}|\\p{Lo}|\\p{Nl}|\\p{Nd}|\\p{Mn}|\\p{Mc}|_|{bracket_char})*"
+        p"[\\$_]?"
+        & p"(\\p{Lu}|\\p{Ll}|\\p{Lt}|\\p{Lm}|\\p{Lo}|\\p{Nl}|{bracket_char})"
+        & p"(\\p{Lu}|\\p{Ll}|\\p{Lt}|\\p{Lm}|\\p{Lo}|\\p{Nl}|\\p{Nd}|\\p{Mn}"
+        & p"|\\p{Mc}|_|{bracket_char})*"
 
 
     @unparsing_spacing(with=alphanumericals)