aboutsummaryrefslogtreecommitdiffstats
path: root/lib/dialyzer/test/opaque_SUITE_data/src/weird/weird_warning3.erl
blob: b70ca645cbe8eda566d71396d97555269d181d81 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
-module(weird_warning3).
-export([public_func/0]).

-record(a, {
          d = dict:new() :: dict:dict()
         }).

-record(b, {
          q = queue:new() :: queue:queue()
         }).

public_func() ->
    %% Notice that t_to_string() will create "#a{d::queue:queue(_)}".
    add_element({a, queue:new()}, my_key, my_value).

add_element(#a{d = Dict}, Key, Value) ->
    dict:store(Key, Value, Dict);
add_element(#b{q = Queue}, Key, Value) ->
    queue:in({Key, Value}, Queue).