Commit b003cc7b authored by simonpj's avatar simonpj
Browse files

[project @ 2004-08-26 12:46:50 by simonpj]

New output for enum01
parent ee20a24b
...@@ -17,6 +17,12 @@ Testing Enum Int: ...@@ -17,6 +17,12 @@ Testing Enum Int:
(take 7 [x, x-1 ..]) = [-2147483647,-2147483648] (take 7 [x, x-1 ..]) = [-2147483647,-2147483648]
(take 7 [x, x-1 ..]) = [-2147483643,-2147483644,-2147483645,-2147483646,-2147483647,-2147483648] (take 7 [x, x-1 ..]) = [-2147483643,-2147483644,-2147483645,-2147483646,-2147483647,-2147483648]
(take 7 [x, (x+1) ..]) = [2147483642,2147483643,2147483644,2147483645,2147483646,2147483647] (take 7 [x, (x+1) ..]) = [2147483642,2147483643,2147483644,2147483645,2147483646,2147483647]
([minBound::Int,1..]) = [-2147483648,1]
([minBound::Int,0..]) = [-2147483648,0]
([minBound::Int,-1..]) = [-2147483648,-1,2147483646]
([maxBound::Int,1..]) = [2147483647,1,-2147483645]
([maxBound::Int,0..]) = [2147483647,0,-2147483647]
([maxBound::Int,-1..]) = [2147483647,-1]
(take 7 ([(1::Int) .. 5])) = [1,2,3,4,5] (take 7 ([(1::Int) .. 5])) = [1,2,3,4,5]
(take 4 ([(1::Int) .. 1])) = [1] (take 4 ([(1::Int) .. 1])) = [1]
(take 7 ([(1::Int) .. 0])) = [] (take 7 ([(1::Int) .. 0])) = []
...@@ -30,6 +36,16 @@ Testing Enum Int: ...@@ -30,6 +36,16 @@ Testing Enum Int:
(take 7 [(2::Int),1..2]) = [2] (take 7 [(2::Int),1..2]) = [2]
(take 7 [(2::Int),1..1]) = [2,1] (take 7 [(2::Int),1..1]) = [2,1]
(take 7 [(2::Int),3..1]) = [] (take 7 [(2::Int),3..1]) = []
([minBound, 1..maxBound::Int]) = [-2147483648,1]
([minBound, 0..maxBound::Int]) = [-2147483648,0]
([minBound,-1..maxBound::Int]) = [-2147483648,-1,2147483646]
([minBound,-1..maxBound-1::Int]) = [-2147483648,-1,2147483646]
([minBound,-1..maxBound-2::Int]) = [-2147483648,-1]
([maxBound, 1..minBound::Int]) = [2147483647,1,-2147483645]
([maxBound, 0..minBound::Int]) = [2147483647,0,-2147483647]
([maxBound, 0..minBound+1::Int]) = [2147483647,0,-2147483647]
([maxBound, 0..minBound+2::Int]) = [2147483647,0]
([maxBound,-1..minBound::Int]) = [2147483647,-1]
(take 7 [x,(x+1)..maxBound]) = [2147483643,2147483644,2147483645,2147483646,2147483647] (take 7 [x,(x+1)..maxBound]) = [2147483643,2147483644,2147483645,2147483646,2147483647]
(take 7 [x,(x-1)..minBound]) = [-2147483643,-2147483644,-2147483645,-2147483646,-2147483647,-2147483648] (take 7 [x,(x-1)..minBound]) = [-2147483643,-2147483644,-2147483645,-2147483646,-2147483647,-2147483648]
Testing Enum Integer: 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