blob: 915ae7621c5c1cf03f581cdfc5225b6e9d6b7b99 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
%%%-------------------------------------------------------------------
%%% File : compare1.erl
%%% Author : Tobias Lindahl <[email protected]>
%%% Description :
%%%
%%% Created : 20 Apr 2007 by Tobias Lindahl <[email protected]>
%%%-------------------------------------------------------------------
-module(compare1).
-export([t/0]).
t() ->
t(42).
t(X) when X > 42 ->
error;
t(X) when X < 42 ->
error;
t(X) when X =/= 42 ->
error;
t(X) -> ok.
|
