diff options
| author | Björn Gustavsson <[email protected]> | 2018-08-31 07:13:05 +0200 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2018-09-12 14:19:06 +0200 |
| commit | 4edd266876f2383ccc33b91a3bbe8550279368f5 (patch) | |
| tree | 0b1bab227e1ba4ef6b00440d65d2c26a865e27a5 /lib/compiler/test/guard_SUITE.erl | |
| parent | f89331e61b5b6fc6eadc289d4ce126d6a4219238 (diff) | |
| download | otp-4edd266876f2383ccc33b91a3bbe8550279368f5.tar.gz otp-4edd266876f2383ccc33b91a3bbe8550279368f5.tar.bz2 otp-4edd266876f2383ccc33b91a3bbe8550279368f5.zip | |
beam_ssa_opt: Add an optimization of tuple_size/1
This optimization working on the SSA format will replace
the similar optimization in beam_dead. See the comment
for an explanation of what the new optimization does.
Diffstat (limited to 'lib/compiler/test/guard_SUITE.erl')
| -rw-r--r-- | lib/compiler/test/guard_SUITE.erl | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/lib/compiler/test/guard_SUITE.erl b/lib/compiler/test/guard_SUITE.erl index 73a8dc0fda..6ccc0c8fd4 100644 --- a/lib/compiler/test/guard_SUITE.erl +++ b/lib/compiler/test/guard_SUITE.erl @@ -1779,16 +1779,6 @@ t_tuple_size(Config) when is_list(Config) -> error = ludicrous_tuple_size({a,b,c}), error = ludicrous_tuple_size([a,b,c]), - %% Test the "unsafe case" - the register assigned the tuple size is - %% not killed. - DataDir = test_lib:get_data_dir(Config), - File = filename:join(DataDir, "guard_SUITE_tuple_size"), - {ok,Mod,Code} = compile:file(File, [from_asm,binary]), - code:load_binary(Mod, File, Code), - 14 = Mod:t({1,2,3,4}), - _ = code:delete(Mod), - _ = code:purge(Mod), - good_ip({1,2,3,4}), good_ip({1,2,3,4,5,6,7,8}), error = validate_ip({42,11}), |