aboutsummaryrefslogtreecommitdiffstats
path: root/lib/compiler/test/core_SUITE_data/cover_v3_kernel_3.core
blob: 88a9edc3549bc9417ddf156f1c41b59964d88e77 (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
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
module 'cover_v3_kernel_3' ['cover_v3_kernel_3'/0,
			    'module_info'/0,
			    'module_info'/1]
    attributes []
'cover_v3_kernel_3'/0 =
    %% Line 4
    fun () ->
	case <> of
	  <> when 'true' ->
	      %% Line 5
	      case apply 'strange_case'/1
		       (1) of
		<'ok'> when 'true' ->
		    %% Line 6
		    case apply 'strange_case'/1
			     (2) of
		      <'ok'> when 'true' ->
			  %% Line 7
			  case apply 'strange_case'/1
				   (42) of
			    <'error'> when 'true' ->
				%% Line 8
				case apply 'strange_case'/1
					 ('atom') of
				  <'error'> when 'true' ->
				      %% Line 9
				      'ok'
				  ( <_cor3> when 'true' ->
					primop 'match_fail'
					    ({'badmatch',_cor3})
				    -| ['compiler_generated'] )
				end
			    ( <_cor2> when 'true' ->
				  primop 'match_fail'
				      ({'badmatch',_cor2})
			      -| ['compiler_generated'] )
			  end
		      ( <_cor1> when 'true' ->
			    primop 'match_fail'
				({'badmatch',_cor1})
			-| ['compiler_generated'] )
		    end
		( <_cor0> when 'true' ->
		      primop 'match_fail'
			  ({'badmatch',_cor0})
		  -| ['compiler_generated'] )
	      end
	  ( <> when 'true' ->
		( primop 'match_fail'
		      ({'function_clause'})
		  -| [{'function_name',{'cover_v3_kernel_3',0}}] )
	    -| ['compiler_generated'] )
	end
'strange_case'/1 =
    %% Line 12
    fun (_cor0) ->
	case _cor0 of
	  <X> when
	        case X of
	          <1> when 'true' -> 'true'
	          <2> when 'true' -> 'true'
		  <Other> when 'true' -> 'false'
	        end ->
	      'ok'
	  %% Line 13
	  <_cor4> when 'true' ->
	      'error'
	  ( <_cor3> when 'true' ->
		( primop 'match_fail'
		      ({'function_clause',_cor3})
		  -| [{'function_name',{'strange_case',1}}] )
	    -| ['compiler_generated'] )
	end
'module_info'/0 =
    fun () ->
	case <> of
	  <> when 'true' ->
	      call 'erlang':'get_module_info'
		  ('cover_v3_kernel_3')
	  ( <> when 'true' ->
		( primop 'match_fail'
		      ({'function_clause'})
		  -| [{'function_name',{'module_info',0}}] )
	    -| ['compiler_generated'] )
	end
'module_info'/1 =
    fun (_cor0) ->
	case _cor0 of
	  <X> when 'true' ->
	      call 'erlang':'get_module_info'
		  ('cover_v3_kernel_3', X)
	  ( <_cor1> when 'true' ->
		( primop 'match_fail'
		      ({'function_clause',_cor1})
		  -| [{'function_name',{'module_info',1}}] )
	    -| ['compiler_generated'] )
	end
end