Comments (3)
OK, now I understood what you meant.
from learn4haskell.
Hey @twolodzko ! I think that you defined lastDigit
as:
lastDigit :: Integer -> Integer
while
firstDigit :: Int -> Int
It is better to have consistent types here π
Hope it helps!
from learn4haskell.
@vrom911 thanks, but I also tried using Integer
instead and I still get
test/Test/Chapter1.hs:72:14: error:
β’ Couldn't match expected type βIntβ with actual type βIntegerβ
β’ In the first argument of β(===)β, namely β(firstDigit x :: Int)β
In a stmt of a 'do' block:
(firstDigit x :: Int) === (lastDigit (reverseInt x) :: Int)
In the second argument of β($)β, namely
βdo x <- forAll $ Gen.int (Range.linear (- 200) 200)
(firstDigit x :: Int) === (lastDigit (reverseInt x) :: Int)β
|
72 | (firstDigit x :: Int) === (lastDigit (reverseInt x) :: Int)
| ^^^^^^^^^^^^
test/Test/Chapter1.hs:72:25: error:
β’ Couldn't match expected type βIntegerβ with actual type βIntβ
β’ In the first argument of βfirstDigitβ, namely βxβ
In the first argument of β(===)β, namely β(firstDigit x :: Int)β
In a stmt of a 'do' block:
(firstDigit x :: Int) === (lastDigit (reverseInt x) :: Int)
|
72 | (firstDigit x :: Int) === (lastDigit (reverseInt x) :: Int)
| ^
test/Test/Chapter1.hs:72:40: error:
β’ Couldn't match expected type βIntβ with actual type βIntegerβ
β’ In the second argument of β(===)β, namely
β(lastDigit (reverseInt x) :: Int)β
In a stmt of a 'do' block:
(firstDigit x :: Int) === (lastDigit (reverseInt x) :: Int)
In the second argument of β($)β, namely
βdo x <- forAll $ Gen.int (Range.linear (- 200) 200)
(firstDigit x :: Int) === (lastDigit (reverseInt x) :: Int)β
|
72 | (firstDigit x :: Int) === (lastDigit (reverseInt x) :: Int)
| ^^^^^^^^^^^^^^^^^^^^^^^^
test/Test/Chapter1.hs:72:51: error:
β’ Couldn't match expected type βIntegerβ with actual type βIntβ
β’ In the first argument of βlastDigitβ, namely β(reverseInt x)β
In the second argument of β(===)β, namely
β(lastDigit (reverseInt x) :: Int)β
In a stmt of a 'do' block:
(firstDigit x :: Int) === (lastDigit (reverseInt x) :: Int)
|
72 | (firstDigit x :: Int) === (lastDigit (reverseInt x) :: Int)
| ^^^^^^^^^^^^
make: *** [Makefile:12: test-chapter1] Error 1
from learn4haskell.
Related Issues (20)
- Use default main branch
- Unable to open pull request for Chapter 4 HOT 2
- Build dependency happy fails on OSX 10.15.7 HOT 2
- Update GHC to 8.10.4
- [RFC] Create certificate when all Chapters are passed HOT 1
- Chapter 3 knight Monster clarification HOT 2
- Create 2021 Hacktoberfest logo
- Chapter2: takeEven or dropEven? HOT 1
- Odd test output results HOT 4
- Question about a test HOT 2
- Useful to have docker instructions in README.md? HOT 3
- Is this wording about typeclasses correct in Chapter3.hs? HOT 1
- Save @vrom911's and @chshersh's time by including solutions HOT 1
- are my solutions be mentored ? HOT 1
- Error resolving dependencies while make test-chapter1-basic. HOT 10
- Typo in chapter 1: `Add` instead of `add`
- Upgrade to GHC 9.2
- Upgrade to GHC-9.4
- [Chapter 4] Is it possible to have an instance of Functor for "Trap e" of "Secret e a"?
Recommend Projects
-
React
A declarative, efficient, and flexible JavaScript library for building user interfaces.
-
Vue.js
π Vue.js is a progressive, incrementally-adoptable JavaScript framework for building UI on the web.
-
Typescript
TypeScript is a superset of JavaScript that compiles to clean JavaScript output.
-
TensorFlow
An Open Source Machine Learning Framework for Everyone
-
Django
The Web framework for perfectionists with deadlines.
-
Laravel
A PHP framework for web artisans
-
D3
Bring data to life with SVG, Canvas and HTML. πππ
-
Recommend Topics
-
javascript
JavaScript (JS) is a lightweight interpreted programming language with first-class functions.
-
web
Some thing interesting about web. New door for the world.
-
server
A server is a program made to process requests and deliver data to clients.
-
Machine learning
Machine learning is a way of modeling and interpreting data that allows a piece of software to respond intelligently.
-
Visualization
Some thing interesting about visualization, use data art
-
Game
Some thing interesting about game, make everyone happy.
Recommend Org
-
Facebook
We are working to build community through open source technology. NB: members must have two-factor auth.
-
Microsoft
Open source projects and samples from Microsoft.
-
Google
Google β€οΈ Open Source for everyone.
-
Alibaba
Alibaba Open Source for everyone
-
D3
Data-Driven Documents codes.
-
Tencent
China tencent open source team.
from learn4haskell.