blob: 5b0bee9694aba9f2022693264718103fcc84280e (
plain) (
tree)
|
|
%%%-------------------------------------------------------------------
%%% File : contract3.erl
%%% Author : Tobias Lindahl <[email protected]>
%%% Description : Check overloaded domains
%%%
%%% Created : 2 Nov 2007 by Tobias Lindahl <[email protected]>
%%%-------------------------------------------------------------------
-module(contract3).
-export([t/3]).
t(X, Y, Z) ->
t1(X),
t2(X, Y),
t3(X, Y, Z).
-spec t1(atom()|integer()) -> integer();
(atom()|list()) -> atom().
t1(X) ->
foo:bar(X).
-spec t2(atom(), integer()) -> integer();
(atom(), list()) -> atom().
t2(X, Y) ->
foo:bar(X, Y).
-spec t3(atom(), integer(), list()) -> integer();
(X, integer(), list()) -> X.
t3(X, Y, Z) ->
X.
|