[#239] Fix #239: Attributes with strings (#241)

AdRoll · Apr 8, 2021 · 876540f · 876540f
1 parent 2548141
commit 876540f
Show file tree

Hide file tree

Showing 3 changed files with 6 additions and 0 deletions.
diff --git a/src/formatters/default_formatter.erl b/src/formatters/default_formatter.erl
@@ -1046,6 +1046,8 @@ lay_string(Node, Ctxt) ->
         end,
     lay_string_lines(string_lines(S), Ctxt).
 
+interpret_string(undefined) ->
+    undefined;
 interpret_string(S) ->
     {ok, Tokens, _} = erl_scan:string(S),
     erl_parse:parse_exprs(Tokens ++ [{dot, 0}]).

diff --git a/test_app/after/src/strings/strings.erl b/test_app/after/src/strings/strings.erl
@@ -4,6 +4,8 @@
 
 -format #{inline_expressions => true}.
 
+-attr({with, "a string"}).
+
 all() ->
     heredoc(), superlong(), repeat(), multiple_calls(), characters().
 

diff --git a/test_app/src/strings/strings.erl b/test_app/src/strings/strings.erl
@@ -4,6 +4,8 @@
 
 -format #{inline_expressions => true}.
 
+-attr({with, "a string"}).
+
 all() ->
   heredoc(),
   superlong(),