aboutsummaryrefslogtreecommitdiffstats
path: root/lib/compiler/test/beam_validator_SUITE_data/accessing_tags.S
blob: 2728a2fa32af72f439d637b4c57e2e6031576a85 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
{module, accessing_tags}.  %% version = 0

{exports, [{foo,1},{bar,1}]}.

{attributes, []}.

{function, foo, 1, 2}.
  {label,1}.
    {func_info,{atom,accessing_tags},{atom,foo},1}.
  {label,2}.
    {allocate,1,1}.
    {'catch',{y,0},{f,3}}.
    {move,{y,0},{x,0}}.				%Retrieve the catch tag.
    {call,1,{f,2}}.
  {label,3}.
    {catch_end,{y,0}}.
    {deallocate,1}.
    return.

{function, bar, 1, 5}.
  {label,4}.
    {func_info,{atom,accessing_tags},{atom,bar},1}.
  {label,5}.
    {allocate,1,1}.
    {'try',{y,0},{f,6}}.
    {move,{y,0},{x,0}}.				%Retrieve the try tag.
    {call,5,{f,2}}.
  {label,6}.
    {catch_end,{y,0}}.
    {deallocate,1}.
    return.