lib/dialyzer/test/small_SUITE_data/src/recursive_types2.erl


1
2
3
4
5
6
7
8
9
10
11
12

-module(recursive_types2).

-export([test/0]).

-type tree() :: 'nil' | {non_neg_integer(), subtree(), subtree()}.

-type subtree() :: tree().

-spec test() -> {42, tree(), tree()}.

test() ->
  {42, {42, nil, nil}, {42, {42, nil, nil}, {42, nil, nil}}}.