blob: 8151e595a0a299d4c6cb3bf4db8e523017ea5534 (
plain) (
tree)
|
|
%%%-------------------------------------------------------------------
%%% File : record_test.erl
%%% Author : Tobias Lindahl <[email protected]>
%%% Description :
%%%
%%% Created : 22 Oct 2004 by Tobias Lindahl <[email protected]>
%%%-------------------------------------------------------------------
-module(record_test).
-export([t/0]).
-record(foo, {bar}).
t() ->
doit(foo).
doit(X) ->
case X of
#foo{} -> error1;
foo -> ok;
_ -> error2
end.
|