diff options
author | Björn Gustavsson <[email protected]> | 2015-02-03 13:38:54 +0100 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2015-02-12 13:14:37 +0100 |
commit | 0910d13d2077af731a5e1eeed4ac3c11da8a329b (patch) | |
tree | 7756db77539b28c1bdf174b42a20c26cca6cb7f1 /lib/compiler/test/core_fold_SUITE.erl | |
parent | a13841ec7ef3365b5d263afd1c4398952a6844a1 (diff) | |
download | otp-0910d13d2077af731a5e1eeed4ac3c11da8a329b.tar.gz otp-0910d13d2077af731a5e1eeed4ac3c11da8a329b.tar.bz2 otp-0910d13d2077af731a5e1eeed4ac3c11da8a329b.zip |
sys_core_fold: Refactor type information access
Introduce access functions to hide the low-level details of how
type information is implemented.
Diffstat (limited to 'lib/compiler/test/core_fold_SUITE.erl')
-rw-r--r-- | lib/compiler/test/core_fold_SUITE.erl | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/compiler/test/core_fold_SUITE.erl b/lib/compiler/test/core_fold_SUITE.erl index 40a5ba2b17..a52610497f 100644 --- a/lib/compiler/test/core_fold_SUITE.erl +++ b/lib/compiler/test/core_fold_SUITE.erl @@ -280,6 +280,12 @@ coverage(Config) when is_list(Config) -> error = bsm_an_inlined(<<1,2,3>>, Config), error = bsm_an_inlined([], Config), + %% Cover eval_rel_op/4. + Tuple = id({a,b}), + false = case Tuple of + {_,_} -> + Tuple =:= true + end, ok. cover_will_match_list_type(A) -> |