From 84adefa331c4159d432d22840663c38f155cd4c1 Mon Sep 17 00:00:00 2001 From: Erlang/OTP Date: Fri, 20 Nov 2009 14:54:40 +0000 Subject: The R13B03 release. --- .../beam_validator_SUITE_data/overwrite_catchtag.S | 38 ++++++++++++++++++++++ 1 file changed, 38 insertions(+) create mode 100644 lib/compiler/test/beam_validator_SUITE_data/overwrite_catchtag.S (limited to 'lib/compiler/test/beam_validator_SUITE_data/overwrite_catchtag.S') diff --git a/lib/compiler/test/beam_validator_SUITE_data/overwrite_catchtag.S b/lib/compiler/test/beam_validator_SUITE_data/overwrite_catchtag.S new file mode 100644 index 0000000000..f6ad0ac50a --- /dev/null +++ b/lib/compiler/test/beam_validator_SUITE_data/overwrite_catchtag.S @@ -0,0 +1,38 @@ +{module, overwrite_catchtag}. %% version = 0 + +{exports, [{foo,1},{module_info,0},{module_info,1}]}. + +{attributes, []}. + +{labels, 8}. + + +{function, foo, 1, 2}. + {label,1}. + {func_info,{atom,overwrite_catchtag},{atom,foo},1}. + {label,2}. + {allocate,1,1}. + {'catch',{y,0},{f,3}}. + {move,{x,0},{y,0}}. % <= {catchtag,3} + {call,1,{f,2}}. + {label,3}. + {catch_end,{y,0}}. + {deallocate,1}. + return. + + +{function, module_info, 0, 5}. + {label,4}. + {func_info,{atom,overwrite_catchtag},{atom,module_info},0}. + {label,5}. + {move,{atom,overwrite_catchtag},{x,0}}. + {call_ext_only,1,{extfunc,erlang,get_module_info,1}}. + + +{function, module_info, 1, 7}. + {label,6}. + {func_info,{atom,overwrite_catchtag},{atom,module_info},1}. + {label,7}. + {move,{x,0},{x,1}}. + {move,{atom,overwrite_catchtag},{x,0}}. + {call_ext_only,2,{extfunc,erlang,get_module_info,2}}. -- cgit v1.2.3