aboutsummaryrefslogtreecommitdiffstats
path: root/lib/compiler/test/bs_shadowed_size_var.core
blob: d1d5ebba6da361113ecffae493c1c253d63170a1 (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
module 'bs_shadowed_size_var' ['filter_essentials'/1]
    attributes []

%% Reduced code from beam_asm inlined using the old inliner.

'filter_essentials'/1 =
    fun (_cor0) ->
	case _cor0 of
	  <[#{#<Sz>(32,1,'integer',['unsigned','big']) }#|T]> when 'true' ->
	      let <_cor4> =
                      case T of
			%% Variable 'Sz' repeated here. Should work.
			<#{#<Sz>(32,1,'integer',['unsigned','big']),
			    #<Data>(Sz,8,'binary',['unsigned','big'])}#> when 'true' ->
			    Data
			<_cor5> when 'true' ->
			    primop 'match_fail'
				({'case_clause',{_cor5}})
		      end
	      in  [Sz|_cor4]
	  <_cor5> when 'true' ->
	      primop 'match_fail'
		  ({'function_clause',_cor5})
	end
end