diff options
| author | Björn Gustavsson <[email protected]> | 2010-03-18 13:51:28 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2010-03-26 08:09:26 +0100 |
| commit | f1e60ef101b6bb6e262c2387cf1b408c66b94c31 (patch) | |
| tree | a0ff680fb454970229598c875cdc36be7abb53d3 /lib/compiler/test/bs_utf_SUITE.erl | |
| parent | 0320836d1b58438ef4467832b00306672d22f8d6 (diff) | |
| download | otp-f1e60ef101b6bb6e262c2387cf1b408c66b94c31.tar.gz otp-f1e60ef101b6bb6e262c2387cf1b408c66b94c31.tar.bz2 otp-f1e60ef101b6bb6e262c2387cf1b408c66b94c31.zip | |
compiler tests: Compile a few more modules with 'inline'
Since a function_clause exception in an inlined function will
be changed to a case_clause exception, we must test for both.
Diffstat (limited to 'lib/compiler/test/bs_utf_SUITE.erl')
| -rw-r--r-- | lib/compiler/test/bs_utf_SUITE.erl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/compiler/test/bs_utf_SUITE.erl b/lib/compiler/test/bs_utf_SUITE.erl index d93bdef73d..d1a74f4393 100644 --- a/lib/compiler/test/bs_utf_SUITE.erl +++ b/lib/compiler/test/bs_utf_SUITE.erl @@ -314,7 +314,7 @@ coverage(Config) when is_list(Config) -> ?line 0 = coverage_2(<<4096/utf8,65536/utf8,0>>), ?line 1 = coverage_2(<<1024/utf8,1025/utf8,1>>), - ?line {'EXIT',{function_clause,_}} = (catch coverage_3(1)), + ?line fc(catch coverage_3(1)), %% Cover beam_flatten (combining the heap allocation in %% a subsequent test_heap instruction into the bs_init2 @@ -394,3 +394,5 @@ utf32_data() -> <<16#41:32/little,NotIdentical:32/little, 16#0391:32/little,16#2E:32/little>>}. +fc({'EXIT',{function_clause,_}}) -> ok; +fc({'EXIT',{{case_clause,_},_}}) when ?MODULE =:= bs_utf_inline_SUITE -> ok. |