diff options
author | Björn Gustavsson <[email protected]> | 2010-04-24 07:57:44 +0200 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2010-05-11 08:54:26 +0200 |
commit | f7829c91d742f1daea27b7ff5d8dcb5f262fd3a9 (patch) | |
tree | d4b261fd279f54d2e8494d2b7bf3be7e88c38495 /lib/compiler/test/misc_SUITE.erl | |
parent | f39e0b6bbc5f5d9f6a55b87847bcad7707309883 (diff) | |
download | otp-f7829c91d742f1daea27b7ff5d8dcb5f262fd3a9.tar.gz otp-f7829c91d742f1daea27b7ff5d8dcb5f262fd3a9.tar.bz2 otp-f7829c91d742f1daea27b7ff5d8dcb5f262fd3a9.zip |
compiler tests: Cover the error handling code in beam_receive
Diffstat (limited to 'lib/compiler/test/misc_SUITE.erl')
-rw-r--r-- | lib/compiler/test/misc_SUITE.erl | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/lib/compiler/test/misc_SUITE.erl b/lib/compiler/test/misc_SUITE.erl index e096571d50..df8a0ffe6f 100644 --- a/lib/compiler/test/misc_SUITE.erl +++ b/lib/compiler/test/misc_SUITE.erl @@ -154,6 +154,17 @@ silly_coverage(Config) when is_list(Config) -> {test,bs_get_binary2,{f,99},0,[{x,0},{atom,all},1,[]],{x,0}}, {block,[a|b]}]}],0}, ?line expect_error(fun() -> beam_bsm:module(BsmInput, []) end), + + %% beam_receive. + ReceiveInput = {?MODULE,[{foo,0}],[], + [{function,foo,0,2, + [{label,1}, + {func_info,{atom,?MODULE},{atom,foo},0}, + {label,2}, + {call_ext,0,{extfunc,erlang,make_ref,0}}, + {block,[a|b]}]}],0}, + ?line expect_error(fun() -> beam_receive:module(ReceiveInput, []) end), + ok. expect_error(Fun) -> |