diff options
| author | Björn-Egil Dahlberg <[email protected]> | 2014-01-31 18:01:49 +0100 |
|---|---|---|
| committer | Björn-Egil Dahlberg <[email protected]> | 2014-01-31 18:01:49 +0100 |
| commit | bc31418123c5abbdb2d2c3d3d5e4bfc53b5c7d26 (patch) | |
| tree | 37218544705881d326795ad57f383d894e1eeb88 /lib/compiler/src/beam_disasm.erl | |
| parent | 26a5dea3cb5e101ab35bc4730b7b29516c29b00e (diff) | |
| download | otp-bc31418123c5abbdb2d2c3d3d5e4bfc53b5c7d26.tar.gz otp-bc31418123c5abbdb2d2c3d3d5e4bfc53b5c7d26.tar.bz2 otp-bc31418123c5abbdb2d2c3d3d5e4bfc53b5c7d26.zip | |
compiler: Teach beam_disasm has_map_field instruction
Diffstat (limited to 'lib/compiler/src/beam_disasm.erl')
| -rw-r--r-- | lib/compiler/src/beam_disasm.erl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/compiler/src/beam_disasm.erl b/lib/compiler/src/beam_disasm.erl index e0d0d0fd1d..57fdf95677 100644 --- a/lib/compiler/src/beam_disasm.erl +++ b/lib/compiler/src/beam_disasm.erl @@ -1134,7 +1134,7 @@ resolve_inst({line,[Index]},_,_,_) -> {line,resolve_arg(Index)}; %% -%% R17A. +%% 17.0 %% resolve_inst({put_map_assoc,Args},_,_,_) -> [FLbl,Src,Dst,{u,N},{{z,1},{u,_Len},List0}] = Args, @@ -1150,6 +1150,10 @@ resolve_inst({is_map,Args0},_,_,_) -> [FLbl|Args] = resolve_args(Args0), {test, is_map, FLbl, Args}; +resolve_inst({has_map_field,Args0},_,_,_) -> + [FLbl|Args] = resolve_args(Args0), + {test,has_map_field,FLbl,Args}; + resolve_inst({get_map_element,Args},_,_,_) -> [FLbl,Src,Key,Dst] = resolve_args(Args), {get_map_element,FLbl,Src,Key,Dst}; |