aboutsummaryrefslogtreecommitdiffstats
path: root/lib/dialyzer/test/small_SUITE_data/src/fun_ref_match.erl
blob: 31e6bdfb470f475caf6a525bb02c044e89e4dbfb (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
%%%-------------------------------------------------------------------
%%% File    : fun_ref_match.erl
%%% Author  : Tobias Lindahl <[email protected]>
%%% Description : Find that newly created funs and references cannot
%%%               match on earlier bound variables.
%%%
%%% Created : 10 Mar 2005 by Tobias Lindahl <[email protected]>
%%%-------------------------------------------------------------------
-module(fun_ref_match).

-export([t1/1, t2/1]).

t1(X) ->
  X = fun(Y) -> Y end,
  ok.

t2(X) ->
  case make_ref() of
    X -> error;
    _ -> ok
  end.