diff options
author | Björn Gustavsson <[email protected]> | 2014-02-14 09:58:36 +0100 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2014-02-14 09:58:36 +0100 |
commit | 172e25ac3a50ec8447b37512d71ddfa9332c912c (patch) | |
tree | 369242324c108ade9b8e8f1787cb8de0c5522cdb | |
parent | 26b83d85f82a0ff59821eeb7ccecc5d57a767ce5 (diff) | |
parent | 306a28b7d4c670e54e6bbc0b6b4bd4f3b6a8e2dc (diff) | |
download | otp-172e25ac3a50ec8447b37512d71ddfa9332c912c.tar.gz otp-172e25ac3a50ec8447b37512d71ddfa9332c912c.tar.bz2 otp-172e25ac3a50ec8447b37512d71ddfa9332c912c.zip |
Merge branch 'kostis/beam_validator-minor-fix'
* kostis/beam_validator-minor-fix:
Change a list comprehension to a foreach/2 call
-rw-r--r-- | lib/compiler/src/beam_validator.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/compiler/src/beam_validator.erl b/lib/compiler/src/beam_validator.erl index 682f7adbc2..2486d486ed 100644 --- a/lib/compiler/src/beam_validator.erl +++ b/lib/compiler/src/beam_validator.erl @@ -882,7 +882,7 @@ valfun_4(_, _) -> verify_put_map(Fail, Src, Dst, Live, List, Vst0) -> verify_live(Live, Vst0), verify_y_init(Vst0), - [assert_term(Term, Vst0) || Term <- List], + foreach(fun (Term) -> assert_term(Term, Vst0) end, List), assert_term(Src, Vst0), Vst1 = heap_alloc(0, Vst0), Vst2 = branch_state(Fail, Vst1), @@ -909,7 +909,7 @@ validate_bs_skip_utf(Fail, Ctx, Live, Vst0) -> branch_state(Fail, Vst). %% -%% Special state handling for setelement/3 and the set_tuple_element/3 instruction. +%% Special state handling for setelement/3 and set_tuple_element/3 instructions. %% A possibility for garbage collection must not occur between setelement/3 and %% set_tuple_element/3. %% |