1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
|
-module(string_test).
-include("../../src/elixir.hrl").
-include_lib("eunit/include/eunit.hrl").
eval(Content) ->
Quoted = elixir:'string_to_quoted!'(Content, 1, 1, <<"nofile">>, []),
{Value, Binding, _} = elixir:eval_forms(Quoted, [], elixir:env_for_eval([])),
{Value, Binding}.
extract_interpolations(String) ->
case elixir_interpolation:extract(1, 1, #elixir_tokenizer{}, true, String ++ [$"], $") of
{error, Error} ->
Error;
{_, _, Parts, _, _} ->
Parts
end.
% Interpolations
extract_interpolations_without_interpolation_test() ->
["foo"] = extract_interpolations("foo").
extract_interpolations_with_escaped_interpolation_test() ->
["f\\#{o}o"] = extract_interpolations("f\\#{o}o"),
{1, 10, ["f\\#{o}o"], [], _} =
elixir_interpolation:extract(1, 2, #elixir_tokenizer{}, true, "f\\#{o}o\"", $").
extract_interpolations_with_interpolation_test() ->
["f",
{{1, 2, nil}, {1, 6, nil}, [{atom, {1, 4, _}, o}]},
"o"] = extract_interpolations("f#{:o}o").
extract_interpolations_with_two_interpolations_test() ->
["f",
{{1, 2, nil}, {1, 6, nil}, [{atom, {1, 4, _}, o}]},
{{1, 7, nil}, {1, 11, nil}, [{atom, {1, 9, _}, o}]},
"o"] = extract_interpolations("f#{:o}#{:o}o").
extract_interpolations_with_only_two_interpolations_test() ->
[{{1, 1, nil}, {1, 5, nil}, [{atom, {1, 3, _}, o}]},
{{1, 6, nil}, {1, 10, nil}, [{atom, {1, 8, _}, o}]}] = extract_interpolations("#{:o}#{:o}").
extract_interpolations_with_tuple_inside_interpolation_test() ->
["f",
{{1, 2, nil}, {1, 7, nil}, [{'{', {1, 4, nil}}, {int, {1, 5, 1}, "1"}, {'}', {1, 6, nil}}]},
"o"] = extract_interpolations("f#{{1}}o").
extract_interpolations_with_many_expressions_inside_interpolation_test() ->
["f",
{{1, 2, nil}, {2, 2, nil}, [{int, {1, 4, 1}, "1"}, {eol, {1, 5, 1}}, {int, {2, 1, 2}, "2"}]},
"o"] = extract_interpolations("f#{1\n2}o").
extract_interpolations_with_right_curly_inside_string_inside_interpolation_test() ->
["f",
{{1, 2, nil}, {1, 9, nil}, [{bin_string, {1, 4, nil}, [<<"f}o">>]}]},
"o"] = extract_interpolations("f#{\"f}o\"}o").
extract_interpolations_with_left_curly_inside_string_inside_interpolation_test() ->
["f",
{{1, 2, nil}, {1, 9, nil}, [{bin_string, {1, 4, nil}, [<<"f{o">>]}]},
"o"] = extract_interpolations("f#{\"f{o\"}o").
extract_interpolations_with_escaped_quote_inside_string_inside_interpolation_test() ->
["f",
{{1, 2, nil}, {1, 10, nil}, [{bin_string, {1, 4, nil}, [<<"f\"o">>]}]},
"o"] = extract_interpolations("f#{\"f\\\"o\"}o").
extract_interpolations_with_less_than_operation_inside_interpolation_test() ->
["f",
{{1, 2, nil}, {1, 7, nil}, [{int, {1, 4, 1}, "1"}, {rel_op, {1, 5, nil}, '<'}, {int, {1, 6, 2}, "2"}]},
"o"] = extract_interpolations("f#{1<2}o").
extract_interpolations_with_an_escaped_character_test() ->
["f",
{{1, 2, nil}, {1, 16, nil}, [{char, {1, 4, "?\\a"}, 7}, {rel_op, {1, 8, nil}, '>'}, {char, {1, 10, "?\\a"}, 7}]}
] = extract_interpolations("f#{?\\a > ?\\a }").
extract_interpolations_with_invalid_expression_inside_interpolation_test() ->
{1, 4, "unexpected token: ", _} = extract_interpolations("f#{:1}o").
%% Bin strings
empty_bin_string_test() ->
{<<"">>, _} = eval("\"\"").
simple_bin_string_test() ->
{<<"foo">>, _} = eval("\"foo\"").
bin_string_with_double_quotes_test() ->
{<<"f\"o\"o">>, _} = eval("\"f\\\"o\\\"o\"").
bin_string_with_newline_test() ->
{<<"f\no">>, _} = eval("\"f\no\"").
bin_string_with_slash_test() ->
{<<"f\\o">>, _} = eval("\"f\\\\o\"").
bin_string_with_bell_character_test() ->
{<<"f\ao">>, _} = eval("\"f\ao\"").
bin_string_with_interpolation_test() ->
{<<"foo">>, _} = eval("\"f#{\"o\"}o\"").
bin_string_with_another_string_inside_string_inside_interpolation_test() ->
{<<"fbaro">>, _} = eval("\"f#{\"b#{\"a\"}r\"}o\"").
bin_string_with_another_string_with_curly_inside_interpolation_test() ->
{<<"fb}ro">>, _} = eval("\"f#{\"b}r\"}o\"").
bin_string_with_atom_with_separator_inside_interpolation_test() ->
{<<"f}o">>, _} = eval("\"f#{\"}\"}o\"").
bin_string_with_lower_case_hex_interpolation_test() ->
{<<"jklmno">>, _} = eval("\"\\x6a\\x6b\\x6c\\x6d\\x6e\\x6f\"").
bin_string_with_upper_case_hex_interpolation_test() ->
{<<"jklmno">>, _} = eval("\"\\x6A\\x6B\\x6C\\x6D\\x6E\\x6F\"").
bin_string_without_interpolation_and_escaped_test() ->
{<<"f#o">>, _} = eval("\"f\\#o\"").
bin_string_with_escaped_interpolation_test() ->
{<<"f#{'o}o">>, _} = eval("\"f\\#{'o}o\"").
bin_string_with_the_end_of_line_slash_test() ->
{<<"fo">>, _} = eval("\"f\\\no\""),
{<<"fo">>, _} = eval("\"f\\\r\no\"").
invalid_string_interpolation_test() ->
?assertError(#{'__struct__' := 'Elixir.TokenMissingError'}, eval("\"f#{some\"")),
?assertError(#{'__struct__' := 'Elixir.TokenMissingError'}, eval("\"f#{1+")).
unterminated_string_interpolation_test() ->
?assertError(#{'__struct__' := 'Elixir.TokenMissingError'}, eval("\"foo")).
%% List strings
empty_list_string_test() ->
{[], _} = eval("\'\'").
simple_list_string_test() ->
{"foo", _} = eval("'foo'").
list_string_with_double_quotes_test() ->
{"f'o'o", _} = eval("'f\\'o\\'o'").
list_string_with_newline_test() ->
{"f\no", _} = eval("'f\no'").
list_string_with_slash_test() ->
{"f\\o", _} = eval("'f\\\\o'").
list_string_with_bell_character_test() ->
{"f\ao", _} = eval("'f\ao'").
list_string_with_interpolation_test() ->
{"foo", _} = eval("'f#{\"o\"}o'").
list_string_with_another_string_with_curly_inside_interpolation_test() ->
{"fb}ro", _} = eval("'f#{\"b}r\"}o'").
list_string_with_atom_with_separator_inside_interpolation_test() ->
{"f}o", _} = eval("'f#{\"}\"}o'").
list_string_with_lower_case_hex_interpolation_test() ->
{"JKLMNO", _} = eval("'\\x4a\\x4b\\x4c\\x4d\\x4e\\x4f'").
list_string_with_upper_case_hex_interpolation_test() ->
{"JKLMNO", _} = eval("'\\x4A\\x4B\\x4C\\x4D\\x4E\\x4F'").
list_string_without_interpolation_and_escaped_test() ->
{"f#o", _} = eval("'f\\#o'").
list_string_with_escaped_interpolation_test() ->
{"f#{\"o}o", _} = eval("'f\\#{\"o}o'").
list_string_with_the_end_of_line_slash_test() ->
{"fo", _} = eval("'f\\\no'"),
{"fo", _} = eval("'f\\\r\no'").
char_test() ->
{99, []} = eval("?1 + ?2"),
{10, []} = eval("?\\n"),
{40, []} = eval("?(").
%% Binaries
bitstr_with_int_test() ->
{<<"fdo">>, _} = eval("<< \"f\", 50+50, \"o\" >>").
|