diff options
| author | Björn Gustavsson <[email protected]> | 2011-02-23 13:18:28 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2011-02-23 13:25:52 +0100 |
| commit | c347415765f4e30e38e49f5bd369f48523ef935e (patch) | |
| tree | 5b19c0a50acc4337257e7292e832a06d1cd0beb5 /lib/compiler/test/lc_SUITE.erl | |
| parent | 88994f8e203dc6bf31968cad0bc70b6789a15a0b (diff) | |
| download | otp-c347415765f4e30e38e49f5bd369f48523ef935e.tar.gz otp-c347415765f4e30e38e49f5bd369f48523ef935e.tar.bz2 otp-c347415765f4e30e38e49f5bd369f48523ef935e.zip | |
compiler: Eliminate some warnings
Diffstat (limited to 'lib/compiler/test/lc_SUITE.erl')
| -rw-r--r-- | lib/compiler/test/lc_SUITE.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/compiler/test/lc_SUITE.erl b/lib/compiler/test/lc_SUITE.erl index 6dd950eade..bcdcf2fd9f 100644 --- a/lib/compiler/test/lc_SUITE.erl +++ b/lib/compiler/test/lc_SUITE.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 2001-2010. All Rights Reserved. +%% Copyright Ericsson AB 2001-2011. All Rights Reserved. %% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in @@ -180,7 +180,7 @@ empty_generator(Config) when is_list(Config) -> id(I) -> I. fc(Args, {'EXIT',{function_clause,[{?MODULE,_,Args}|_]}}) -> ok; -fc(Args, {'EXIT',{function_clause,[{?MODULE,Name,Arity}|_]}}) +fc(Args, {'EXIT',{function_clause,[{?MODULE,_,Arity}|_]}}) when length(Args) =:= Arity -> true = test_server:is_native(?MODULE); fc(Args, {'EXIT',{{case_clause,ActualArgs},_}}) |