lib/dialyzer/test/opaque_SUITE_data/src/ets/ets_use.erl


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

-module(ets_use).
-export([t1/0, t2/0]).

t1() ->
    case n() of
	T when is_atom(T) -> atm;
	T when is_integer(T) -> int
    end.

t2() ->
    case n() of
	T when is_integer(T) -> int;
	T when is_atom(T) -> atm
    end.

n() -> ets:new(n, [named_table]).