Introduce the attribute -optional_callbacks in the context of behaviours

richcarl · Dec 21, 2014 · 12fd492 · 12fd492
1 parent 3083382
commit 12fd492
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/src/erl_syntax.erl b/src/erl_syntax.erl
@@ -3320,6 +3320,11 @@ attribute_arguments(Node) ->
 		    [set_pos(
 		       list(unfold_function_names(Data, Pos)),
 		       Pos)];
+		optional_callbacks ->
+                    D = try list(unfold_function_names(Data, Pos))
+                        catch _:_ -> abstract(Data)
+                        end,
+		    [set_pos(D, Pos)];
 		import ->
 		    {Module, Imports} = Data,
 		    [set_pos(atom(Module), Pos),