Skip to content

Commit 3223c18

Browse files
committed
lens-person: add explicit args
1 parent 30cec37 commit 3223c18

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

exercises/lens-person/src/Person.hs

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -31,13 +31,13 @@ data Address = Address { _street :: String
3131
}
3232

3333
bornStreet :: Born -> String
34-
bornStreet = error "You need to implement this function."
34+
bornStreet born = error "You need to implement this function."
3535

3636
setCurrentStreet :: String -> Person -> Person
37-
setCurrentStreet = error "You need to implement this function."
37+
setCurrentStreet street person = error "You need to implement this function."
3838

3939
setBirthMonth :: Int -> Person -> Person
40-
setBirthMonth = error "You need to implement this function."
40+
setBirthMonth month person = error "You need to implement this function."
4141

4242
renameStreets :: (String -> String) -> Person -> Person
43-
renameStreets = error "You need to implement this function."
43+
renameStreets f person = error "You need to implement this function."

0 commit comments

Comments
 (0)