Make type consistent with whats written on line 20 (#688)
Make type consistent with whats written on line 20
This commit is contained in:
parent
ca2eb0461e
commit
cdda7bcf8d
1 changed files with 4 additions and 1 deletions
|
@ -10,6 +10,7 @@ need to have some language extensions and imports:
|
||||||
module ApiType where
|
module ApiType where
|
||||||
|
|
||||||
import Data.Text
|
import Data.Text
|
||||||
|
import Data.Time (UTCTime)
|
||||||
import Servant.API
|
import Servant.API
|
||||||
```
|
```
|
||||||
|
|
||||||
|
@ -34,7 +35,9 @@ data SortBy = Age | Name
|
||||||
|
|
||||||
data User = User {
|
data User = User {
|
||||||
name :: String,
|
name :: String,
|
||||||
age :: Int
|
age :: Int,
|
||||||
|
email :: String,
|
||||||
|
registration_date :: UTCTime
|
||||||
}
|
}
|
||||||
```
|
```
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue