支持使用宏展开为函数分支

shuying2244 · Nov 26, 2024 · a21b95c · a21b95c
1 parent b4743cf
commit a21b95c
Showing 1 changed file with 7 additions and 1 deletion.
diff --git a/apps/els_lsp/src/els_parser.erl b/apps/els_lsp/src/els_parser.erl
@@ -798,7 +798,13 @@ analyze_function(FunName, Clauses0) ->
 
 -spec function_args(tree()) -> {arity(), els_arg:args()}.
 function_args(Clause) ->
-    Patterns = erl_syntax:clause_patterns(Clause),
+    Patterns =
+        case Clause of
+            {_, macro, _, _} ->
+                erl_syntax:macro_arguments(Clause);
+            _ ->
+                erl_syntax:clause_patterns(Clause)
+        end,
     Arity = length(Patterns),
     Args = args_from_subtrees(Patterns),
     {Arity, Args}.