aboutsummaryrefslogblamecommitdiffstats
path: root/lib/dialyzer/test/small_SUITE_data/src/higher_order_discrepancy.erl
blob: ff5ee6bac4299cbab4afd1c62c32eba0d413894b (plain) (tree)
1
2
3
4
5
6
7
8
9
10
11
12
13
14













                                  
-module(higher_order_discrepancy).

-export([test/1]).

test(X) ->
    F =
	case X of
	    1 -> fun f/1;
	    2 -> fun g/1
	end,
    F(foo).

f(foo) -> ok.
g(bar) -> ok.