blob: c46906b2edb3a72df1e2c3e30d38ba7c2b0b5b4f (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
module 'nested_call_in_case' ['a'/2]
attributes []
'a'/2 =
fun (_x,_y) ->
case call 'erlang':'>'
(call 'erlang':'length'
(_x), _y) of
<'true'> when 'true' ->
'yes'
<'false'> when 'true' ->
'no'
( <_omega> when 'true' ->
primop 'match_fail'
('if_clause')
-| ['compiler_generated'] )
end
end
|