From bc31418123c5abbdb2d2c3d3d5e4bfc53b5c7d26 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Bj=C3=B6rn-Egil=20Dahlberg?= <egil@erlang.org>
Date: Fri, 31 Jan 2014 18:01:49 +0100
Subject: compiler: Teach beam_disasm has_map_field instruction

---
 lib/compiler/src/beam_disasm.erl | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'lib/compiler/src/beam_disasm.erl')

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};
-- 
cgit v1.2.3