57 lines
1.7 KiB
Elixir
57 lines
1.7 KiB
Elixir
Code.require_file "test_helper.exs", __DIR__
|
|
|
|
defmodule AccessTest do
|
|
use ExUnit.Case, async: true
|
|
|
|
# Test nil at compilation time does not fail
|
|
# and that @config[:foo] has proper precedence.
|
|
@config nil
|
|
nil = @config[:foo]
|
|
|
|
@config [foo: :bar]
|
|
:bar = @config[:foo]
|
|
|
|
@mod :lists
|
|
[1, 2, 3] = @mod.flatten([1, [2], 3])
|
|
|
|
@mod -13
|
|
-13 = @mod
|
|
|
|
test "for nil" do
|
|
assert nil[:foo] == nil
|
|
assert Access.get(nil, :foo) == nil
|
|
assert Access.get_and_update(nil, :foo, fn nil -> {:ok, :bar} end) == {:ok, :bar}
|
|
end
|
|
|
|
test "for keywords" do
|
|
assert [foo: :bar][:foo] == :bar
|
|
assert [foo: [bar: :baz]][:foo][:bar] == :baz
|
|
assert [foo: [bar: :baz]][:fuu][:bar] == nil
|
|
|
|
assert Access.get([foo: :bar], :foo) == :bar
|
|
assert Access.get_and_update([], :foo, fn nil -> {:ok, :baz} end) == {:ok, [foo: :baz]}
|
|
assert Access.get_and_update([foo: :bar], :foo, fn :bar -> {:ok, :baz} end) == {:ok, [foo: :baz]}
|
|
end
|
|
|
|
test "for maps" do
|
|
assert %{foo: :bar}[:foo] == :bar
|
|
assert %{1 => 1}[1] == 1
|
|
assert %{1.0 => 1.0}[1.0] == 1.0
|
|
assert %{1 => 1}[1.0] == nil
|
|
|
|
assert Access.get(%{foo: :bar}, :foo) == :bar
|
|
assert Access.get_and_update(%{}, :foo, fn nil -> {:ok, :baz} end) == {:ok, %{foo: :baz}}
|
|
assert Access.get_and_update(%{foo: :bar}, :foo, fn :bar -> {:ok, :baz} end) == {:ok, %{foo: :baz}}
|
|
end
|
|
|
|
test "for atoms" do
|
|
assert_raise Protocol.UndefinedError, ~r"protocol Access not implemented for :foo", fn ->
|
|
Access.get(:foo, :bar)
|
|
end
|
|
|
|
assert_raise Protocol.UndefinedError, ~r"protocol Access not implemented for :foo", fn ->
|
|
Access.get_and_update(:foo, :bar, fn _ -> {:ok, :baz} end)
|
|
end
|
|
end
|
|
end
|