From 047653a6d3aacfb21ad5904683421d6ddbefb3b6 Mon Sep 17 00:00:00 2001 From: Pierre-Marie de Rodat Date: Tue, 17 Dec 2024 09:40:35 +0000 Subject: [PATCH] ada/tokens.lkt: split a pattern to fit 80 columns --- ada/tokens.lkt | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/ada/tokens.lkt b/ada/tokens.lkt index bab598b20..f7b520127 100644 --- 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)