Commit b48dc0f1 authored by simonmar's avatar simonmar
Browse files

[project @ 2005-05-13 07:53:37 by simonmar]

accept output
parent 9dea9837
......@@ -17,6 +17,12 @@ Testing Enum Int:
(take 7 [x, x-1 ..]) = [-9223372036854775807,-9223372036854775808]
(take 7 [x, x-1 ..]) = [-9223372036854775803,-9223372036854775804,-9223372036854775805,-9223372036854775806,-9223372036854775807,-9223372036854775808]
(take 7 [x, (x+1) ..]) = [9223372036854775802,9223372036854775803,9223372036854775804,9223372036854775805,9223372036854775806,9223372036854775807]
([minBound::Int,1..]) = [-9223372036854775808,1]
([minBound::Int,0..]) = [-9223372036854775808,0]
([minBound::Int,-1..]) = [-9223372036854775808,-1,9223372036854775806]
([maxBound::Int,1..]) = [9223372036854775807,1,-9223372036854775805]
([maxBound::Int,0..]) = [9223372036854775807,0,-9223372036854775807]
([maxBound::Int,-1..]) = [9223372036854775807,-1]
(take 7 ([(1::Int) .. 5])) = [1,2,3,4,5]
(take 4 ([(1::Int) .. 1])) = [1]
(take 7 ([(1::Int) .. 0])) = []
......@@ -30,6 +36,16 @@ Testing Enum Int:
(take 7 [(2::Int),1..2]) = [2]
(take 7 [(2::Int),1..1]) = [2,1]
(take 7 [(2::Int),3..1]) = []
([minBound, 1..maxBound::Int]) = [-9223372036854775808,1]
([minBound, 0..maxBound::Int]) = [-9223372036854775808,0]
([minBound,-1..maxBound::Int]) = [-9223372036854775808,-1,9223372036854775806]
([minBound,-1..maxBound-1::Int]) = [-9223372036854775808,-1,9223372036854775806]
([minBound,-1..maxBound-2::Int]) = [-9223372036854775808,-1]
([maxBound, 1..minBound::Int]) = [9223372036854775807,1,-9223372036854775805]
([maxBound, 0..minBound::Int]) = [9223372036854775807,0,-9223372036854775807]
([maxBound, 0..minBound+1::Int]) = [9223372036854775807,0,-9223372036854775807]
([maxBound, 0..minBound+2::Int]) = [9223372036854775807,0]
([maxBound,-1..minBound::Int]) = [9223372036854775807,-1]
(take 7 [x,(x+1)..maxBound]) = [9223372036854775803,9223372036854775804,9223372036854775805,9223372036854775806,9223372036854775807]
(take 7 [x,(x-1)..minBound]) = [-9223372036854775803,-9223372036854775804,-9223372036854775805,-9223372036854775806,-9223372036854775807,-9223372036854775808]
Testing Enum Integer:
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment