mirror of
https://github.com/idris-lang/Idris2.git
synced 2024-12-24 20:23:11 +03:00
53 lines
1.3 KiB
Plaintext
53 lines
1.3 KiB
Plaintext
1/1: Building Issue1831_1 (Issue1831_1.idr)
|
|
Issue1831_1> Issue1831_1.test2
|
|
Arguments [{arg:0}]
|
|
Compile time tree: case {arg:0} of
|
|
S {e:0} => case {e:0} of
|
|
S {e:1} => case {e:1} of
|
|
Z => True
|
|
_ => False
|
|
_ => False
|
|
_ => False
|
|
Compiled: \ {arg:0} => case {arg:0} of
|
|
{ 0 => 0
|
|
; _ => let {e:0} = {arg:0} - 1 in
|
|
case {e:0} of
|
|
{ 0 => 0
|
|
; _ => let {e:1} = {e:0} - 1 in
|
|
case {e:1} of
|
|
{ 0 => 1
|
|
; _ => 0
|
|
}
|
|
}
|
|
}
|
|
Refers to: Prelude.Basics.True, Prelude.Basics.False
|
|
Flags: allguarded, covering
|
|
Issue1831_1>
|
|
Bye for now!
|
|
1/1: Building Issue1831_2 (Issue1831_2.idr)
|
|
Issue1831_2> Issue1831_2.test2
|
|
Arguments [{arg:0}]
|
|
Compile time tree: case {arg:0} of
|
|
S {e:0} => case {e:0} of
|
|
S {e:1} => case {e:1} of
|
|
Z => True
|
|
_ => False
|
|
_ => False
|
|
_ => False
|
|
Compiled: \ {arg:0} => case {arg:0} of
|
|
{ 0 => 0
|
|
; _ => let {e:0} = {arg:0} - 1 in
|
|
case {e:0} of
|
|
{ 0 => 0
|
|
; _ => let {e:1} = {e:0} - 1 in
|
|
case {e:1} of
|
|
{ 0 => 1
|
|
; _ => 0
|
|
}
|
|
}
|
|
}
|
|
Refers to: Prelude.Basics.True, Prelude.Basics.False
|
|
Flags: allguarded, covering
|
|
Issue1831_2>
|
|
Bye for now!
|