diff options
| author | Björn-Egil Dahlberg <[email protected]> | 2014-06-23 19:52:39 +0200 |
|---|---|---|
| committer | Björn-Egil Dahlberg <[email protected]> | 2014-08-26 12:12:47 +0200 |
| commit | bbabf6204d9ac7083828ced6b9ace97e240794c8 (patch) | |
| tree | aba0e9679d50ff9f4556df257459b5d51e06d590 /lib/compiler/src/beam_validator.erl | |
| parent | 83c35c4e7bcb7cabdad5f8b1082a7bfda9101600 (diff) | |
| download | otp-bbabf6204d9ac7083828ced6b9ace97e240794c8.tar.gz otp-bbabf6204d9ac7083828ced6b9ace97e240794c8.tar.bz2 otp-bbabf6204d9ac7083828ced6b9ace97e240794c8.zip | |
compiler: Use variables in Map beam assmebler
Diffstat (limited to 'lib/compiler/src/beam_validator.erl')
| -rw-r--r-- | lib/compiler/src/beam_validator.erl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/compiler/src/beam_validator.erl b/lib/compiler/src/beam_validator.erl index 9d5563d13b..0acc7a227f 100644 --- a/lib/compiler/src/beam_validator.erl +++ b/lib/compiler/src/beam_validator.erl @@ -1123,7 +1123,9 @@ assert_freg_set(Fr, _) -> error({bad_source,Fr}). %%% Maps %% ensure that a list of literals has a strict -%% ascending term order (also meaning unique literals) +%% ascending term order (also meaning unique literals). +%% Single item lists may have registers. +assert_strict_literal_termorder([_]) -> ok; assert_strict_literal_termorder(Ls) -> Vs = lists:map(fun (L) -> get_literal(L) end, Ls), case check_strict_value_termorder(Vs) of |